Yoko
http://forum.yoko.com.ua/

крафт шринок
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12865
Page 1 of 1

Author:  Sp [ 2007-12-07 15:06:00 ]
Post subject:  крафт шринок

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

сделать так что чар шринки крафтал...

Author:  -=JoKeR=- [ 2007-12-08 00:00:34 ]
Post subject: 

гЫ...из "этого" никак :D

Author:  stickman [ 2007-12-08 04:25:02 ]
Post subject: 

Code:
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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/