Page 2 of 2

Posted: 2006-05-31 15:13:53
by Nmy

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() 

Posted: 2006-05-31 15:15:55
by Nmy

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


пробуй... :wink:

Posted: 2006-05-31 15:19:55
by BigMouseI
NMY wrote:может надо

Code: Select all

until not uo.dead() 


Сорь, не углядел :D

Posted: 2006-05-31 15:24:59
by Nmy
так это я так написал :mrgreen: совсем разучился писать скрипты :oops:

Posted: 2006-05-31 16:02:39
by ghost_hnt
NMY 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


пробуй... :wink:

ВАРИБЛ ИНДЕВЕНДЕТ you

Posted: 2006-05-31 16:06:36
by Nmy
а ? :shock:

Posted: 2006-05-31 16:17:01
by SLAK

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

Posted: 2006-05-31 16:19:04
by Grin
переменая you не объявленна

Posted: 2006-05-31 16:21:25
by ghost_hnt
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
и еще через некторое время выдает ошибку и скрипт вырубается

Posted: 2006-05-31 16:26:45
by Grin
гдето цикл не закрыт если ошибка вылезает

Posted: 2006-05-31 17:19:34
by SLAK
я просто исправил явные ошибки предидущих аффторов...

Posted: 2006-05-31 17:24:27
by SLAK
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
и еще через некторое время выдает ошибку и скрипт вырубается


Ты с сообщениями определись!!! ты отквотил как бы выложеный мной код, но с другими месагами...

Posted: 2006-05-31 17:26:15
by Nmy
забей типо с мой или я писал... я ваще этот скрипт написал в окне ответа...

Posted: 2006-05-31 18:14:53
by ghost_hnt
определился
You are hungry голодный чар
You fell наедаться до такого состояния

Posted: 2006-05-31 19:14:18
by SLAK

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

Posted: 2006-06-01 14:36:11
by ghost_hnt
да все спс - ПОЛНОСТЬЮ РАБОЧИЙ СКРИПТ :D :!: :!: