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

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