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

подскажите правильную команду
http://forum.yoko.com.ua/viewtopic.php?f=3&t=13759
Page 1 of 1

Author:  krestii [ 2008-07-06 15:11:58 ]
Post subject:  подскажите правильную команду

как сделать так чтоб скрипт не выключать а н апаузу ставить?
чтоб потом возобновить его какая команда нужна?
вот у меня при атаке люмбет выключается
что нада изменить?


Code:
sub AttackEnts() 
uo.DeleteJournal()
var Enemy='0x00000000'
repeat
if uo.InJournal('is attacking you') or uo.InJournal('OOPS!!!') or uo.InJournal('Wis Quas') then
uo.Exec('terminate Lumberjacking') 
Enemy=uo.JournalSerial(uo.InJournal('is attacking you')-1)
##uo.PlayWav(LumberSound)
if CastAtAttack==1 then
uo.UseObject('parabow')
uo.WarMode(1)
uo.attack(Enemy)
end if
uo.DeleteJournal()
end if
wait(1000)
until false
end sub

Author:  Destruction [ 2008-07-06 21:04:51 ]
Post subject: 

Нет такого.

Как вариант - ставить после каждой строки вызов функции эмулирующей паузу..

Ну или в плане экономии места - переписать все uo.* функции :)

Типа:
Code:
sub test()
repeat
uo.print ( "Hello world!" )
checkpause()
wait( 1000 )
checkpause()
until false
endsub

sub pause()
uo.setglobal( "paused", "1" )
endsub

sub resume()
uo.setglobal( "paused", "0" )
endsub

sub checkpause()
while uo.getGlobal( "paused" ) == "1"
wait( 100 )
wend
endsub

Author:  krestii [ 2008-07-06 22:18:17 ]
Post subject: 

жалко что нету
спасибо за идею
тож как вариант
буду пытаться какнить втереть паузу сюда :|

Author:  krestii [ 2008-07-07 01:22:37 ]
Post subject: 

ну вот чтото такое натворил)
получилась только убивалка
отдельно убивалка пашет гуд как надо
Code:
sub AttackEnts()
uo.DeleteJournal()
var Enemy='0x00000000'
uo.setglobal( "paused", "0" )
repeat
While uo.InJournal('is attacking you') or uo.getGlobal( "paused" ) == "1"
Enemy=uo.JournalSerial(uo.InJournal('is attacking you')-1)
 If uo.InJournal('Body') then
   uo.setglobal( "paused", "0" )
   uo.WarMode(0)
   wait(100)
   uo.DeleteJournal()
 Else
   uo.setglobal( "paused", "1" )
   uo.sayu('.camp heal')
   uo.UseObject('parabow')
   uo.WarMode(1)   
   uo.attack(Enemy)
   wait(20000)
 End if
Wend
until false
end sub


но как к общему скрипту приделать непойму чтото :(

Author:  krestii [ 2008-07-07 02:34:37 ]
Post subject: 

ДОДЕЛАЛ
спасибо Destruction за помощь
не подсказал бы не справился

а доделал так
дописал код в 3 местах во время рубки
Code:
While uo.getGlobal( "paused" ) == "1"
wait(100)
wend

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