Yoko

Code: Select all

if uo.injournal('text') then
действие
endif

Code: Select all

var i
var Trup = 'lastcorpse'
var Text1="You see: Body"

sub main()
while 1==1
if uo.injournal(text1) then
rezat()
end if
wend
next
end sub

sub Rezat()
UO.UseObject(trup) 
		if UO.GetQuantity(trup) then 
	UO.SetArm('temp') 
	UO.WaitTargetObject(trup) 
	UO.UseType('0x0F51') ; Òèï Äàãåðà (Íþáè)
		wait(500) 
	UO.Arm('temp') 
		wait(1000) 
		endif 
		
lootall()
	uo.print('Zakonchili...') 
wait(500)
info()
wait(100)
end sub


sub Lootall()
DIM Loot[5]
	Loot[0] = '0x0EED'
	Loot[1] = '0x1BFB'
	Loot[2] = '0x1BDD'
	Loot[3] = '0x1BDD'
	Loot[4] = '0x0F90'
	
	
For i = 0 to 4
	Uo.FindType(Loot[i], '-1', trup)
			wait(100)
		while UO.FindCount() > 0
			wait(100)
	UO.MoveItem('finditem')
			wait(1000)
	Uo.FindType(Loot[i], '-1', trup)
	wend
	next
	uo.print('Netu nix...')
end sub

Code: Select all

var Text1="You see: Body"

sub main() 
while 1==1 
if uo.injournal(text1) then 
rezat() 
end if 
wend 
next 
end sub 

Code: Select all

var Text1 = "Body of" 

sub main()
while 1=1
if uo.injournal(text1) then
rezat()
Wait(100)
uo.deletejournal()
wait(5000)
else
up.print("vse...")
end if
wend
wait(10000)
end sub

Code: Select all

var Text1 = "Body of" 

sub main()
while 1=1
if UO.InJournal(text1) then
rezat()
end if
wait(100)
wend
end sub

Sub rezat() 
uo.deletejournal() 
;и че там дальше у тебя
...
end sub