крафт шринок

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Sp
Posts: 83
Joined: 2005-07-22 13:43:25

крафт шринок

Post by Sp »

как из этого:
sub TMana()
alchemy('0x0F87', 6, "'Total Mana'")
end sub

сделать так что чар шринки крафтал...
-=JoKeR=-
Posts: 173
Joined: 2007-05-26 00:00:56
Location: Украина, Ode$$a:[X-TEAM Group]
Contact:

Post by -=JoKeR=- »

гЫ...из "этого" никак :D
Image
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:

Post by stickman »

Code: Select all

Sub Alchemy(reagent, min_reg, choice)
while UO.Count('0x0F0E','0x0000')>0 AND UO.Count(reagent)>=min_reg
UO.DeleteJournal()
UO.Exec("waitmenu 'What sort of potion do you want to' "+choice)
UO.UseType(reagent)
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed")
wait(300)
wend
wend
gong(2)
end sub

sub makeSHRINK()
alchemy('0x0F78', 10, "'Shrink'")
end sub
Post Reply