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/