Yoko

VAR Sunduk='0x402B3F94' ;Это мне понятно
VAR LastTimer 
var dagger='0x402F0E97' ; Это тоже

sub Poisoning() 
uo.useobject('backpack') 
wait(1000) 
uo.useobject(Sunduk) 
wait(1000) 
while 1==1 

UO.FindType('0x0F0E','0x0998','backpack') ; Что такое '0x0F0E','0x0998' ;что это за значения
While UO.GetQuantity('finditem')<20 
UO.FindType('0x0F0E','0x0998',Sunduk) 
wait(200) 
UO.Grab('100','finditem') 
wait(200) 
Wend 

UO.FindType('0x0F0E','0x0998') 
if UO.GetQuantity('finditem')>0 then 
if uo.skillval("Poisoning",1)<1000 then 
uo.deletejournal() 
LastTimer=UO.Timer() 
uo.waittargetobject(dagger,'finditem') 
uo.useskill('Poisoning') 
repeat 
wait(10) 
until UO.InJournal("You fail to apply") OR UO.InJournal("You apply the poison") OR (UO.Timer()>LastTimer+200) 
else 
if uo.weight > 200 then 
UO.SetReceivingContainer(Sunduk) 
wait(200) 
UO.Grab('0','finditem') 
wait(200) 
UO.UnSetReceivingContainer() 
uo.closeuo() 
end if 
end if 
end if 

wend 
end sub 

sub main_pois() 

var vesh 

uo.canceltarget() 
uo.deletejournal() 
wait(2000) 

uo.print("Укажите что пойзоним...") 
uo.addObject("vesh") 
while uo.targeting() 
wait(100) 
wend 


repeat 

  repeat 

  UO.FindType('0x0F0A',-1,2)   #тип яда 

  UO.WaitTargetObject('vesh','finditem')  #В оригинале было:UO.WaitTargetObject('finditem','vesh') 
  UO.UseSkill('Poisoning') 
  wait(10500) 
  until uo.GetHP() < 16 or UO.FindCount() < 3 

  #while uo.Poisoned() 
  #uo.usetype('0x0F07')    #Cure 
  #wait(1000) 
  #wend 

#wait(9100) 

  while uo.GetHP() < 40 
  uo.usetype('0x0F0C')    #Heal 
  wait(1000) 
  wend 

until UO.FindCount()<6 

end sub   

VAR Sunduk='0x402B3F94' ;Это мне понятно