Yoko

All sides of Injection
It is currently 2026-01-16 19:54:52

All times are UTC+02:00




Post new topic  Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 2004-08-02 16:01:57 
Offline

Joined: 2004-07-12 20:55:24
Posts: 11
Скрипт не мой вырезал из чьегото непомню из чьего так что автор не оббесуть :)) Помогите зациклить скрипт чето у меня не получается:(

sub Poison()
UO.FindType('0x0F0E','0x0998','my')
If UO.GetQuantity('finditem')>0 then
UO.UseSkill('Poisoning')
UO.WaitTargetObject('0x4019A500','finditem') ; dagger
; UO.UseSkill('Poisoning')
wait(4000)
Else
TryToPoison=0
Endif
EndIf
UO.UseSkill('Spirit Speak')
wait(3000)
end sub

И если можно поподробнее хочу вникнуть ! или хотяб поправте что тут не так !


Top
   
PostPosted: 2004-08-03 14:56:53 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Nick wrote:
Скрипт не мой вырезал из чьегото непомню из чьего так что автор не оббесуть :)) Помогите зациклить скрипт чето у меня не получается:(


Code:
sub Poison()
VAR TryToPoison = 1
repeat
UO.FindType('0x0F0E','0x0998','my')
If UO.GetQuantity('finditem')>0 then
UO.UseSkill('Poisoning')
UO.WaitTargetObject('0x4019A500','finditem') ; dagger
; UO.UseSkill('Poisoning')
wait(4000)
Else
TryToPoison=0
Endif
UO.UseSkill('Spirit Speak')
wait(3000)
until TryToPoison == 0
end sub


Добавил ровно три строки и удалил лишний Endif. Не думаю, что нужны какие-то подробные комментарии. И так должно быть все ясно.


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 2 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 4 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited