Лут (игнорирование цвета)

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Qualis Eram
Posts: 104
Joined: 2005-04-16 23:33:13
Contact:

Лут (игнорирование цвета)

Post by Qualis Eram »

For i=0 to 49
exit=0
repeat
if LootingItem==0x0F0E then
k=0x09DF
else
k=-1
endif
Uo.FindType(LootingItem,k,'lastcontainer')
if Uo.FindCount('finditem') then
Uo.Grab('0','finditem')
wait(180)
else
exit=1
endif
until Exit==1 OR uo.injournal('LootingItem')
Next
Uo.Print('End loot!')
end sub
Привет помогите я не знаю как сделать так чтобы игнорировался в луте вот этот цвет 0х0000, просто не реально когда человек в айроне и приходиться его лутить то берем и айрон.........подправьте окончание скрипта чтобы игнорировал цвет (0х0000)
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Re: Лут (игнорирование цвета)

Post by Sfagnum »

Qualis Eram wrote:

Code: Select all

For i=0 to 49
      exit=0 
      repeat 
      if LootingItem[i]==0x0F0E then 
         k=0x09DF 
      else 
         k=-1 
      endif 
       Uo.FindType(LootingItem[i],k,'lastcontainer') 
        if Uo.FindCount('finditem') and UO.GetGraphic('finditem')<>'0x0000' then 
         Uo.Grab('0','finditem') 
          wait(180) 
          else 
         exit=1 
        endif 
      until Exit==1 OR uo.injournal('LootingItem') 
   Next 
Uo.Print('End loot!')
end sub
бери
Qualis Eram
Posts: 104
Joined: 2005-04-16 23:33:13
Contact:

Post by Qualis Eram »

Sfagnum
Слушай все равно лутит почему-то и айрон и цветные девайсы.....

Code: Select all

Sub Lootbody() 
Var i,k,Exit 
DIM LootingItem[33] 
###################################
#######		Weapon-Fence 	#######
###################################
LootingItem[0] = 0x1400  ## -> Kryss 
LootingItem[1] = 0x0F62  ## -> Spear 
LootingItem[2] = 0x1404  ## -> War Fork
LootingItem[3] = 0x1402  ## -> Short Spear
###################################
#######		Weapon-Sword	#######
################################### 
LootingItem[4] = 0x13FE  ## -> Katana
LootingItem[5] = 0x13B5  ## -> Scimitar
LootingItem[6] = 0x1440	 ## -> Cutlas
LootingItem[7] = 0x13B9  ## -> Viking Sword
LootingItem[8] = 0x143E  ## -> Halberd
###################################
#######		Weapon-Mace		#######
###################################
LootingItem[9] = 0x0F5C  ## -> Mace
LootingItem[10] = 0x13AF ## -> War Axe
LootingItem[11] = 0x143C ## -> Hammer Pick
LootingItem[12] = 0x1438 ## -> War Hammer
LootingItem[13] = 0x0F49 ## -> Axe
LootingItem[14] = 0x0F4B ## -> Double Axe
LootingItem[15] = 0x13FA ## -> Large Battle Axe
LootingItem[16] = 0x1442 ## -> Two Handed Axe
###################################
#######		Shields			#######
###################################
LootingItem[17] = 0x1B7B ## -> Metal
LootingItem[18] = 0x1B76 ## -> Heater
LootingItem[19] = 0x1B78 ## -> Wooden Kite
###################################
#######		Plate Armore	#######
###################################
LootingItem[20] = 0x1415 ## -> Platemail
LootingItem[21] = 0x1411 ## -> Legs 
LootingItem[22] = 0x1410 ## -> Arms 
LootingItem[23] = 0x1414 ## -> Gloves 
LootingItem[24] = 0x1412 ## -> Helm 
LootingItem[25] = 0x1413 ## -> Gorget  
###################################
#######		Leather Armore	#######
###################################
LootingItem[26] = 0x13CC ## -> Tunic
LootingItem[27] = 0x13CB ## -> Leggings
LootingItem[28] = 0x13C5 ## -> Sleeves
LootingItem[29] = 0x13C6 ## -> Gloves
LootingItem[30] = 0x1DB9 ## -> Cap
LootingItem[31] = 0x13C7 ## -> Gorget 
LootingItem[32] = 0x170F ## -> Shoes
For i=0 to 32
      exit=0 
      repeat 
      if LootingItem[i]==0x0F0E then 
         k=0x09DF 
      else 
         k=-1 
      endif 
       Uo.FindType(LootingItem[i],k,'lastcontainer') 
        if Uo.FindCount('finditem') and UO.GetGraphic('finditem')<>'0x0000' then 
         Uo.Grab('0','finditem') 
          wait(180) 
          else 
         exit=1 
        endif 
      until Exit==1 OR uo.injournal('LootingItem') 
   Next 
Uo.Print('End loot!') 
end sub
Вот помогите плиз чтобы игнорировал цвет (0x0000)
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Qualis Eram wrote:Sfagnum
Слушай все равно лутит почему-то и айрон и цветные девайсы.....

Code: Select all

Sub Lootbody() 
Var i,k,Exit 
DIM LootingItem[33] 
###################################
#######		Weapon-Fence 	#######
###################################
LootingItem[0] = 0x1400  ## -> Kryss 
LootingItem[1] = 0x0F62  ## -> Spear 
LootingItem[2] = 0x1404  ## -> War Fork
LootingItem[3] = 0x1402  ## -> Short Spear
###################################
#######		Weapon-Sword	#######
################################### 
LootingItem[4] = 0x13FE  ## -> Katana
LootingItem[5] = 0x13B5  ## -> Scimitar
LootingItem[6] = 0x1440	 ## -> Cutlas
LootingItem[7] = 0x13B9  ## -> Viking Sword
LootingItem[8] = 0x143E  ## -> Halberd
###################################
#######		Weapon-Mace		#######
###################################
LootingItem[9] = 0x0F5C  ## -> Mace
LootingItem[10] = 0x13AF ## -> War Axe
LootingItem[11] = 0x143C ## -> Hammer Pick
LootingItem[12] = 0x1438 ## -> War Hammer
LootingItem[13] = 0x0F49 ## -> Axe
LootingItem[14] = 0x0F4B ## -> Double Axe
LootingItem[15] = 0x13FA ## -> Large Battle Axe
LootingItem[16] = 0x1442 ## -> Two Handed Axe
###################################
#######		Shields			#######
###################################
LootingItem[17] = 0x1B7B ## -> Metal
LootingItem[18] = 0x1B76 ## -> Heater
LootingItem[19] = 0x1B78 ## -> Wooden Kite
###################################
#######		Plate Armore	#######
###################################
LootingItem[20] = 0x1415 ## -> Platemail
LootingItem[21] = 0x1411 ## -> Legs 
LootingItem[22] = 0x1410 ## -> Arms 
LootingItem[23] = 0x1414 ## -> Gloves 
LootingItem[24] = 0x1412 ## -> Helm 
LootingItem[25] = 0x1413 ## -> Gorget  
###################################
#######		Leather Armore	#######
###################################
LootingItem[26] = 0x13CC ## -> Tunic
LootingItem[27] = 0x13CB ## -> Leggings
LootingItem[28] = 0x13C5 ## -> Sleeves
LootingItem[29] = 0x13C6 ## -> Gloves
LootingItem[30] = 0x1DB9 ## -> Cap
LootingItem[31] = 0x13C7 ## -> Gorget 
LootingItem[32] = 0x170F ## -> Shoes
For i=0 to 32
      exit=0 
      repeat 
      if LootingItem[i]==0x0F0E then 
         k=0x09DF 
      else 
         k=-1 
      endif 
       Uo.FindType(LootingItem[i],k,'lastcontainer') 
        if (Uo.FindCount('finditem')>0) and (UO.GetGraphic('finditem')<>'0x0000') then 
         Uo.Grab('0','finditem') 
          wait(180) 
          else 
         exit=1 
        endif 
      until Exit==1 OR uo.injournal('LootingItem') 
   Next 
Uo.Print('End loot!') 
end sub
Вот помогите плиз чтобы игнорировал цвет (0x0000)
хз.. хз.. ну так попробуй :roll:
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Code: Select all

For i=0 to 32 
      exit=0 
      repeat 
       Uo.FindType(LootingItem[i],-1,'lastcontainer') 
        if Uo.FindCount('finditem')>0 and UO.GetColor('finditem')<>'0x0000' then 
         Uo.Grab('0','finditem') 
          wait(180) 
          else 
         exit=1 
        endif 
      until Exit==1 OR uo.injournal('LootingItem') 
   Next 
Uo.Print('End loot!')
Post Reply