Page 1 of 1

Ув. скриптеры пожалуйста помогите(срочно)

Posted: 2006-02-11 20:16:25
by GrandMaster Ranger

Code: Select all

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 раз пытется оюзнуть с пола бинт и отключается....

Posted: 2006-02-11 20:22:46
by Grin

Code: Select all

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
какойто бредовый скрипт...
доделал по интуиции...

Posted: 2006-02-11 20:25:42
by GrandMaster Ranger
Grin wrote:

Code: Select all

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 раз отхиливает и скрипт просто выключается!

Posted: 2006-02-11 20:31:44
by Grin

Code: Select all

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

Posted: 2006-02-11 20:38:23
by GrandMaster Ranger
Grin wrote:

Code: Select all

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
огромное... просто большущеее спасибо :)