Помогите со скриптом...

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Помогите со скриптом...

Post by Badb »

Есть скрипт на изготовление даггеров:

Code: Select all

sub BlackSmith() 
UO.AutoMenu('Blacksmithing','Weapons'); 
UO.AutoMenu('Weapons','Swords'); 
UO.AutoMenu('Swords','dagger'); 
UO.UseType(0x1bf2); 
wend 

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed") 
wait(100) 
wend 

If UO.InJournal("You put") then 
repeat 
EndIf 

end sub
Как сделать так что бы он повторялся n-нное кол-во раз, почему после использования этого скрипта при дабл-клике ни ингах делаются даггеры? И возможно ли сделать скрипт для перетаскивания даггеров мусорщику за реварды, и как?

Помогите, плиз, ньюбику...
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Помогите со скриптом...

Post by Askaneli »

Code: Select all

sub BlackSmith() 
uo.cancelmenu()
UO.AutoMenu('Blacksmithing','Weapons')
UO.AutoMenu('Weapons','Swords')
UO.AutoMenu('Swords','dagger')
While not uo.dead()
UO.UseType('0x1bf2')

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed") 
wait(100) 
wend 
wend
end sub
Как надоест макросить в уо набери команду

Code: Select all

,cancelmenu
Сделал дело - флуди смело !!!
DeeJay Devil
Posts: 1
Joined: 2005-01-28 22:52:04

Post by DeeJay Devil »

Code: Select all

sub BlackSmith() 
uo.cancelmenu() 
UO.AutoMenu('Blacksmithing','Weapons') 
UO.AutoMenu('Weapons','Swords') 
UO.AutoMenu('Swords','dagger') 
While not uo.dead() 
UO.DeleteJornal() ## You need this!!!
UO.UseType('0x1bf2') 
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed") 
wait(100) 
wend 
wend 
end sub 
Post Reply