Code: Select all
Sub del(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
end sub Code: Select all
del(You are hungry)
del(You are consuming)Code: Select all
until not uo.dead() Moderators: Murderator+, Murderator
Code: Select all
Sub del(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
end sub Code: Select all
del(You are hungry)
del(You are consuming)Code: Select all
until not uo.dead() Code: Select all
sub eating()
repeat
if uo.injournal('You are hungry') then
while not uo.injournal('You are consuming')
uo.usetype('') #еда
wait(500)
wend
del(You are hungry)
del(You are consuming)
wait(10000) #время через сколько будем проверять журнал на hungry
until not uo.dead()
end if
end sub
Sub del(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
end subСорь, не угляделNMY wrote:может надоCode: Select all
until not uo.dead()
ВАРИБЛ ИНДЕВЕНДЕТ youNMY wrote:пробуй...Code: Select all
sub eating() repeat if uo.injournal('You are hungry') then while not uo.injournal('You are consuming') uo.usetype('') #еда wait(500) wend del(You are hungry) del(You are consuming) wait(10000) #время через сколько будем проверять журнал на hungry until not uo.dead() end if end sub Sub del(msg) while uo.injournal(msg) uo.setjournalline(uo.injournal(msg)-1,'') wend end sub
Code: Select all
sub eating()
repeat
if uo.injournal('You are hungry') then
while not uo.injournal('You are consuming')
uo.usetype('') #еда
wait(500)
wend
del("You are hungry")
del("You are consuming")
wait(10000) #время через сколько будем проверять журнал на hungry
end if
wait(100)
until uo.dead()
end sub
Sub del(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
end subвроде работаетSLAK wrote:Code: Select all
sub eating() repeat if uo.injournal('You are hungry') then while not uo.injournal('You feel quite') uo.usetype('') #еда wait(500) wend del("You are hungry") del("You are consuming") wait(10000) #время через сколько будем проверять журнал на hungry end if wait(100) until uo.dead() end sub Sub del(msg) while uo.injournal(msg) uo.setjournalline(uo.injournal(msg)-1,'') wend end sub
Ты с сообщениями определись!!! ты отквотил как бы выложеный мной код, но с другими месагами...ghost_hnt wrote:вроде работаетSLAK wrote:Code: Select all
sub eating() repeat if uo.injournal('You are hungry') then while not uo.injournal('You feel quite') uo.usetype('') #еда wait(500) wend del("You are hungry") del("You are consuming") wait(10000) #время через сколько будем проверять журнал на hungry end if wait(100) until uo.dead() end sub Sub del(msg) while uo.injournal(msg) uo.setjournalline(uo.injournal(msg)-1,'') wend end sub
но когда написал You are hungry, он не остановился на You feel quite
и еще через некторое время выдает ошибку и скрипт вырубается
Code: Select all
sub eating()
repeat
if uo.injournal('You are hungry') then
while not uo.injournal('fell')
uo.usetype('') #еда
wait(500)
wend
del("You are hungry")
del("fell")
wait(10000) #время через сколько будем проверять журнал на hungry
end if
wait(100)
until uo.dead()
end sub
Sub del(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,'')
wend
end sub