Page 1 of 1
Нужна помошь )
Posted: 2008-04-09 11:15:07
by Unfogiven
Проблема такая не пашет почемуто
if uo.injournal('The spell fizzles.') then
goto poly
Видать чёто я намудил с
uo.deletejournal()
Code: Select all
sub Prodaga()
var booka='0x404b13de'
var cont1='0x404EA22C'
var mesh='0x0E76'
var fl=0
var m
var oldX=UO.GetX()
var oldY=UO.GetY()
while fl==0
poly:
while uo.mana<50
uo.useskill('Meditation')
wait(8000)
wend
uo.Print('>Trying to polymorph...')
uo.Exec("waitmenu 'What do you' 'Daemon'")
uo.deletejournal()
uo.Cast('Polymorph')
repeat
wait(4000)
if uo.injournal('The spell fizzles.') then
goto poly
else
endif
Posted: 2008-04-10 08:16:46
by Destruction
1. Показали бы весь скрипт, или он очень большой ?
2. Не используйте конструкцию goto внутри циклов.
3. В приниципе код корректный, возможно в буковках опечатка.
4. else endif - гениальная конструкция
5. Всё проще:
Code: Select all
sub Prodaga()
var poly = false;
var booka='0x404b13de'
var cont1='0x404EA22C'
var mesh='0x0E76'
var fl=0
var m
var oldX=UO.GetX()
var oldY=UO.GetY()
while fl==0
poly = false
repeat
while uo.mana<50
uo.useskill('Meditation')
wait(8000)
wend
uo.Print('>Trying to polymorph...')
uo.Exec("waitmenu 'What do you' 'Daemon'")
uo.deletejournal()
uo.Cast('Polymorph')
wait(4000)
if not uo.injournal('The spell fizzles.') then
poly = true
endif
until poly
repeat
PS: Мне нравится как этот человек ставит вопрос... Все бы так, а то куда не глянешь - скрипт на 5к строк и вопрос - "почему не работает?"...
Posted: 2008-04-10 13:25:43
by Unfogiven
В таком варианте через каждые 10-15 мин парсе ерор (
Code: Select all
sub Prodaga()
var poly = false;
var booka='0x404b13de'
var cont1='0x404EA22C'
var mesh='0x0E76'
var fl=0
var m
var oldX=UO.GetX()
var oldY=UO.GetY()
while fl==0
poly = false
repeat
while uo.mana<50
uo.useskill('Meditation')
wait(8000)
wend
uo.Print('>Trying to polymorph...')
uo.Exec("waitmenu 'What do you' 'Daemon'")
uo.deletejournal()
uo.Cast('Polymorph')
wait(4000)
if not uo.injournal('The spell fizzles.') then
poly = true
endif
until poly
repeat
for m=1 to 5
uo.useskill('Meditation')
wait(111)
uo.useobject(safe)
wait(900)
uo.useobject(cont1)
wait(800)
CheckLag()
uo.findtype('0x0eed',-1,safe)
wait(300)
uo.moveitem('finditem','100','backpack')
wait(1500)
uo.findtype(mesh,-1,cont1)
if uo.findcount() then
uo.moveitem('finditem','1','backpack')
CheckLag()
else
fl=1
endif
uo.findtype(mesh,-1,cont1)
if uo.findcount() then
uo.moveitem('finditem','1','backpack')
CheckLag()
wait(1500)
else
fl=1
endif
uo.findtype(mesh,-1,cont1)
if uo.findcount() then
uo.moveitem('finditem','1','backpack')
CheckLag()
else
fl=1
endif
cast1:
uo.deletejournal()
while uo.mana<20
uo.useskill('Meditation')
wait(1000)
wend
uo.cast('Recall','Rune')
wait(5000)
if uo.injournal('spell fizzles.') then
goto cast1
endif
uo.useskill('Meditation')
wait(111)
CheckLag()
uo.useobject('0x400b4c3f')
wait(2000)
CheckLag()
uo.lclick(406,314)
wait(3000)
GotoXY(2950,3345)
wait(500)
GotoXY(2952,3345)
wait(800)
sell()
uo.useskill('Meditation')
wait(111)
GotoXY(2950,3345)
wait(800)
CheckLag()
uo.useobject('0x403762b5')
wait(2000)
CheckLag()
uo.lclick(77,126)
wait(6000)
cast2:
uo.deletejournal()
while uo.mana<20
uo.useskill('Meditation')
wait(1000)
wend
uo.cast('Recall','runehome')
wait(5000)
if uo.injournal('spell fizzles.') then
goto cast2
endif
# GotoXY(1773,623)
# wait(800)
unload()
next
wend
endsub
Posted: 2008-04-10 14:28:18
by Destruction
У меня в подписи две ссылки.
Скормите скрипт по-первой ссылке, потом, после устранения ошибок - выложите нормальную версию, если проблема конечно не пропадёт.
Posted: 2008-04-11 06:53:14
by Unfogiven
Destruction wrote:У меня в подписи две ссылки.
Скормите скрипт по-первой ссылке, потом, после устранения ошибок - выложите нормальную версию, если проблема конечно не пропадёт.
да я заменил свой кусок на ваш )вроде стало норм всё )
Правда было такое что я спецально при преврашение в демона физлил после 3 физла он пошёл дальше )))
А и ешё один вопросик
Вот скриптик довно с ним бегаю )
Одевает лук нажемаеш ешё раз одевает мечь а шит нет , пишет Moving item to fast ( это иза нововедений дрв )
Так вот проблема куда бы всунуть задержку или чтото чтобы норм одевалась всё ?
Code: Select all
sub BowGet()
uo.findtype ('0x13B1',-1,'backpack')
if Uo.ContainerOf('finditem')==Uo.GetSerial('backpack') then
UO.Setarm('BowArm')
uo.waittargetobject('laststatus')
uo.usetype('0x13B1')
uo.concolor('0x09DA')
uo.print('luk')
else
UO.Arm('BowArm')
wait(100)
UO.Arm('BowArm')
uo.concolor('0x09DA')
uo.print('me4 sit')
end if
UO.Attack('laststatus')
end sub
Posted: 2008-04-11 10:55:15
by Kynep
Чтоб норм все одевалось нужно в клиенте написать
Posted: 2008-04-11 13:35:29
by Unfogiven
Kynep wrote:Чтоб норм все одевалось нужно в клиенте написать
)))) точно а я уже забыл про ето )