sub strelka() VAR NS='0x0F88' ; Тип Nighshade. VAR BP='0x0F7A' ; Тип Black Pearls. VAR Sunduk='0x404D9CEC' ; Сериал(ID) Сундука. VAR Kolvo=200 while not uo.dead() If UO.NS == 0 Then wait(1000) UO.FindType(NS, '-1', Sunduk) UO.Grab(str(Kolvo), 'finditem') repeat wait(100) until UO.NS>0 Endif
If UO.BP == 0 Then wait(1000) UO.FindType(BP, '-1', Sunduk) UO.Grab(str(Kolvo), 'finditem') repeat wait(100) until UO.BP>0 Endif
if uo.mana>10 then ;uo.cast('Magic Arrow','laststatus'); ;uo.cast('Magic Arrow','laststatus') uo.waittargetobject('0x0014709E') #ID игрока, на которого будем ;wait(100) UO.Exec("cast 'Magic Arrow'") wait(2000) else ;UO.UseSkill("Spirit Speak") ;wait(3000) While UO.Mana<5. UO.DeleteJournal() wait(1000) uo.findtype(0x0F0E,0x09DF) uo.useobject('finditem') UO.Useskill('Meditation') Repeat wait(100) until UO.InJournal("You are") OR UO.InJournal("You lose") Wend
wait(1000) endif wend end sub sub strelka() VAR NS='0x0F88' ; Тип Nighshade. VAR BP='0x0F7A' ; Тип Black Pearls. VAR Sunduk='0x404D9CEC' ; Сериал(ID) Сундука. VAR Kolvo=200 while not uo.dead() If UO.NS == 0 Then wait(1000) UO.FindType(NS, '-1', Sunduk) UO.Grab(str(Kolvo), 'finditem') repeat wait(100) until UO.NS>0 Endif
If UO.BP == 0 Then wait(1000) UO.FindType(BP, '-1', Sunduk) UO.Grab(str(Kolvo), 'finditem') repeat wait(100) until UO.BP>0 Endif
if uo.mana>10 then ;uo.cast('Magic Arrow','laststatus'); ;uo.cast('Magic Arrow','laststatus') uo.waittargetobject('0x0014709E') #ID игрока, на которого будем ;wait(100) UO.Exec("cast 'Magic Arrow'") wait(2000) else ;UO.UseSkill("Spirit Speak") ;wait(3000) While UO.Mana<5. UO.DeleteJournal() wait(1000) uo.findtype(0x0F0E,0x09DF) uo.useobject('finditem') UO.Useskill('Meditation') Repeat wait(100) until UO.InJournal("You are") OR UO.InJournal("You lose") Wend
