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

Ув. скриптеры пожалуйста помогите(срочно)
http://forum.yoko.com.ua/viewtopic.php?f=20&t=5656		 Page 1 of 1
Author:  GrandMaster Ranger [ 2006-02-11 20:16:25 ]
Post subject:  Ув. скриптеры пожалуйста помогите(срочно)
Code:
sub main()
var i,k
UO.Set('finddistance','2') 
UO.Set('distance','2') 
While true

heal()
wait(2000)
UO.ServerPrint(".hungry")
wait(1000)
i=UO.LastMessage()
If i=="You aren't hungry at all" Then
UO.Exec("usetype '0x097B'")
Wait(1000)
while uo.GetHP()==uo.GetMaxHP()
uo.say('Shadowjumper')
endif
end sub 

sub heal()
var bint

while UO.Life<149 
UO.waittargetobject('0x007F0CB6')
UO.Useobject("bint")
wait(1000)
    
end if
end sub

как зациклить этот сккрипт :( очень надо помогите пожлуйста.. ато он чтото 1 раз пытется оюзнуть с пола бинт и отключается....
Author:  Grin [ 2006-02-11 20:22:46 ]
Post subject: 
Code:
sub main() 
var i,k 
UO.Set('finddistance','2') 
UO.Set('distance','2') 
While true 

heal() 
wait(2000) 
while uo.GetHP()==uo.GetMaxHP() 
uo.say('Shadowjumper') 
wait(4000) 
UO.ServerPrint(".hungry") 
Wait(1000) 
i=UO.LastMessage() 
If i=="You are a little hungry" Then 
UO.Exec("usetype '0x097B'") 
endif 
wend 
end sub 

sub heal() 
var bint 

while UO.Life<149 
UO.waittargetobject('0x007F0CB6') 
UO.Useobject("bint") 
wait(1000)
wend
    
end sub

какойто бредовый скрипт...
доделал по интуиции...
Author:  GrandMaster Ranger [ 2006-02-11 20:25:42 ]
Post subject: 
Grin wrote:
Code:
sub main() 
var i,k 
UO.Set('finddistance','2') 
UO.Set('distance','2') 
While true 

heal() 
wait(2000) 
while uo.GetHP()==uo.GetMaxHP() 
uo.say('Shadowjumper') 
wait(4000) 
UO.ServerPrint(".hungry") 
Wait(1000) 
i=UO.LastMessage() 
If i=="You are a little hungry" Then 
UO.Exec("usetype '0x097B'") 
endif 
wend 
end sub 

sub heal() 
var bint 

while UO.Life<149 
UO.waittargetobject('0x007F0CB6') 
UO.Useobject("bint") 
wait(1000)
wend
    
end sub

какойто бредовый скрипт...
доделал по интуиции...

бредовай не бредовый не важно!!! он просто должен хилить себя бинтами с пола если хоть 1 хп отняло! а если хп полное он должен орать фразу, тогда его дальше бить будут!
з.ы. все равно он 1 раз отхиливает и скрипт просто выключается!
Author:  Grin [ 2006-02-11 20:31:44 ]
Post subject: 
Code:
sub main() 
   UO.Set('finddistance','2') 
   UO.Set('distance','2') 
   While not uo.Dead() 
      heal() 
      wait(2000) 
      while uo.GetHP()==uo.GetMaxHP() 
         uo.say('Shadowjumper') 
         wait(4000) 
         uo.DeleteJournal()
         UO.ServerPrint(".hungry") 
         Wait(1000)
         If uo.inJournal('little hungry') Then
            uo.usetype( '0x097B')
         end if 
      wend
   wend

end sub 

sub heal() 
   while UO.Life<149 
      UO.waittargetself() 
      UO.Useobject("bint") 
      wait(1000) 
   wend   
end sub
Author:  GrandMaster Ranger [ 2006-02-11 20:38:23 ]
Post subject: 
Grin wrote:
Code:
sub main() 
   UO.Set('finddistance','2') 
   UO.Set('distance','2') 
   While not uo.Dead() 
      heal() 
      wait(2000) 
      while uo.GetHP()==uo.GetMaxHP() 
         uo.say('Shadowjumper') 
         wait(4000) 
         uo.DeleteJournal()
         UO.ServerPrint(".hungry") 
         Wait(1000)
         If uo.inJournal('little hungry') Then
            uo.usetype( '0x097B')
         end if 
      wend
   wend

end sub 

sub heal() 
   while UO.Life<149 
      UO.waittargetself() 
      UO.Useobject("bint") 
      wait(1000) 
   wend   
end sub

огромное... просто большущеее спасибо :)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/