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

help me pliz Alchemy
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7024
Page 1 of 1

Author:  P [ 2006-03-18 02:40:01 ]
Post subject:  help me pliz Alchemy

Кароче надо зделать так чтобы если физл то он переделывал т.е начинал заного

Quote:
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
end sub

#==============================================================
# makega() - toss greater agility potion
#--------------------------------------------------------------
sub makega()
alchemy('0x0F7B', 3, "'Greater Agility'")
end sub


#==============================================================
# makedp() - toss deadly poison potion
#--------------------------------------------------------------
sub makedp()
alchemy('0x0F88', 8, "'Deadly Poison'")
end sub


#==============================================================
# makegp() - toss greater poison potion
#--------------------------------------------------------------
sub makegp()
alchemy('0x0F88', 4, "'Greater Poison'")
end sub


#==============================================================
# makeinvis() - toss invisibility potion
#--------------------------------------------------------------
sub makeinvis()
alchemy('0x0F91', 4, "'Invisibility'")
end sub


#==============================================================
# maketm() - toss total mana potion
#--------------------------------------------------------------
sub maketm()
alchemy('0x0F87', 6, "'Total Mana'")
end sub


#==============================================================
# makegh() - toss total mana potion
#--------------------------------------------------------------
sub makegh()
alchemy('0x0F85', 7, "'Greater Heal'")
end sub


#==============================================================
# makegc() - toss Greater Cure potion
#--------------------------------------------------------------
sub makegc()
alchemy('0x0F84', 6, "'Greater Cure'")
end sub


#==============================================================
# makess() - toss stoneskin potion
#--------------------------------------------------------------
sub makess()
alchemy('0x0F85', 1, "'Stoneskin'")
end sub


#==============================================================
# makens() - toss Night Sight potion
#--------------------------------------------------------------
sub makens()
alchemy('0x0F8D', 2, "'Nightsight'")
end sub


#==============================================================
# makeh() - toss Heal potion
#--------------------------------------------------------------
sub makeh()
alchemy('0x0F85', 5, "'(2)'")
end sub


#==============================================================
# maketr() - toss total refresh potion
#--------------------------------------------------------------
sub maketr()
alchemy('0x0F7A', 6, "'Total Refresh'")
end sub


#==============================================================
# makegs() - toss total refresh potion
#--------------------------------------------------------------
sub makegs()
alchemy('0x0F86', 5, "'Greater Strength'")
end sub


#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makege()
alchemy('0x0F8C', 10, "'Greater Explosion'")
end sub

#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makele()
alchemy('0x0F8C', 3, "'Lesser Explosion'")
end sub



Пожалуйсто помогите

Author:  Kynep [ 2006-03-18 08:10:26 ]
Post subject:  Re: help me pliz Alchemy

P wrote:
Кароче надо зделать так чтобы если физл то он переделывал т.е начинал заного

Quote:
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
end sub

#==============================================================
# makega() - toss greater agility potion
#--------------------------------------------------------------
sub makega()
alchemy('0x0F7B', 3, "'Greater Agility'")
end sub


#==============================================================
# makedp() - toss deadly poison potion
#--------------------------------------------------------------
sub makedp()
alchemy('0x0F88', 8, "'Deadly Poison'")
end sub


#==============================================================
# makegp() - toss greater poison potion
#--------------------------------------------------------------
sub makegp()
alchemy('0x0F88', 4, "'Greater Poison'")
end sub


#==============================================================
# makeinvis() - toss invisibility potion
#--------------------------------------------------------------
sub makeinvis()
alchemy('0x0F91', 4, "'Invisibility'")
end sub


#==============================================================
# maketm() - toss total mana potion
#--------------------------------------------------------------
sub maketm()
alchemy('0x0F87', 6, "'Total Mana'")
end sub


#==============================================================
# makegh() - toss total mana potion
#--------------------------------------------------------------
sub makegh()
alchemy('0x0F85', 7, "'Greater Heal'")
end sub


#==============================================================
# makegc() - toss Greater Cure potion
#--------------------------------------------------------------
sub makegc()
alchemy('0x0F84', 6, "'Greater Cure'")
end sub


#==============================================================
# makess() - toss stoneskin potion
#--------------------------------------------------------------
sub makess()
alchemy('0x0F85', 1, "'Stoneskin'")
end sub


#==============================================================
# makens() - toss Night Sight potion
#--------------------------------------------------------------
sub makens()
alchemy('0x0F8D', 2, "'Nightsight'")
end sub


#==============================================================
# makeh() - toss Heal potion
#--------------------------------------------------------------
sub makeh()
alchemy('0x0F85', 5, "'(2)'")
end sub


#==============================================================
# maketr() - toss total refresh potion
#--------------------------------------------------------------
sub maketr()
alchemy('0x0F7A', 6, "'Total Refresh'")
end sub


#==============================================================
# makegs() - toss total refresh potion
#--------------------------------------------------------------
sub makegs()
alchemy('0x0F86', 5, "'Greater Strength'")
end sub


#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makege()
alchemy('0x0F8C', 10, "'Greater Explosion'")
end sub

#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makele()
alchemy('0x0F8C', 3, "'Lesser Explosion'")
end sub



Пожалуйсто помогите


Попробуй:

Code:
sub Alchemy(reagent, min_reg, choice)
VAR regi, puziri
while not uo.dead()
regi = UO.FindType(reagent,-1,'backpack')
puziri = UO.FindType('0x0F0E',-1,'backpack')
while UO.Count(puziri,'0x0000')>0 AND UO.Count(regi)>=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
wend
end sub

Author:  P [ 2006-03-19 22:41:22 ]
Post subject: 

можешь мне в скрипт всавить я хз куда ! И в полонм обьёме выложи ок оч надо :(

Author:  Kynep [ 2006-03-20 07:17:31 ]
Post subject: 

P wrote:
можешь мне в скрипт всавить я хз куда ! И в полонм обьёме выложи ок оч надо :(


Вот лови свой скриптик:
Code:
sub Alchemy(reagent, min_reg, choice) 
VAR regi, puziri
while not uo.dead()
regi = UO.FindType(reagent,-1,'backpack')
puziri = UO.FindType('0x0F0E',-1,'backpack')
while UO.Count(puziri,'0x0000')>0 AND UO.Count(regi)>=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
wend
end sub
#==============================================================
# makega() - toss greater agility potion
#--------------------------------------------------------------
sub makega()
alchemy('0x0F7B', 3, "'Greater Agility'")
end sub


#==============================================================
# makedp() - toss deadly poison potion
#--------------------------------------------------------------
sub makedp()
alchemy('0x0F88', 8, "'Deadly Poison'")
end sub


#==============================================================
# makegp() - toss greater poison potion
#--------------------------------------------------------------
sub makegp()
alchemy('0x0F88', 4, "'Greater Poison'")
end sub


#==============================================================
# makeinvis() - toss invisibility potion
#--------------------------------------------------------------
sub makeinvis()
alchemy('0x0F91', 4, "'Invisibility'")
end sub


#==============================================================
# maketm() - toss total mana potion
#--------------------------------------------------------------
sub maketm()
alchemy('0x0F87', 6, "'Total Mana'")
end sub


#==============================================================
# makegh() - toss total mana potion
#--------------------------------------------------------------
sub makegh()
alchemy('0x0F85', 7, "'Greater Heal'")
end sub


#==============================================================
# makegc() - toss Greater Cure potion
#--------------------------------------------------------------
sub makegc()
alchemy('0x0F84', 6, "'Greater Cure'")
end sub


#==============================================================
# makess() - toss stoneskin potion
#--------------------------------------------------------------
sub makess()
alchemy('0x0F85', 1, "'Stoneskin'")
end sub


#==============================================================
# makens() - toss Night Sight potion
#--------------------------------------------------------------
sub makens()
alchemy('0x0F8D', 2, "'Nightsight'")
end sub


#==============================================================
# makeh() - toss Heal potion
#--------------------------------------------------------------
sub makeh()
alchemy('0x0F85', 5, "'(2)'")
end sub


#==============================================================
# maketr() - toss total refresh potion
#--------------------------------------------------------------
sub maketr()
alchemy('0x0F7A', 6, "'Total Refresh'")
end sub


#==============================================================
# makegs() - toss total refresh potion
#--------------------------------------------------------------
sub makegs()
alchemy('0x0F86', 5, "'Greater Strength'")
end sub


#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makege()
alchemy('0x0F8C', 10, "'Greater Explosion'")
end sub

#==============================================================
# makege() - toss total mana potion
#--------------------------------------------------------------
sub makele()
alchemy('0x0F8C', 3, "'Lesser Explosion'")
end sub

Author:  P [ 2006-03-21 19:28:28 ]
Post subject: 

неработает :?

Author:  Savage [ 2006-03-21 20:09:19 ]
Post subject: 

Скрипт изначально варит пока есть реги и ему пофиг на физлы. Если у тебя его клинит то надо сообщения переделать. Напиши сообщение которое выскакивает при физле.

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