Почему не режу кожу?

Ask for help

Moderators: Murderator+, Murderator

Post Reply
MKS
Posts: 3
Joined: 2005-07-26 03:49:49
Contact:

Почему не режу кожу?

Post by MKS »

Code: Select all

sub Loot() 
VAR i
DIM Loot[2]  
Loot[0]=0x0F87; Eyes of newt
Loot[1]=0x0F7E; Bones
Loot[2]=0x1078; Skin
AddObject()
UO.UseObject('Body')

if UO.GetQuantity('Body') then
	UO.WaitTargetObject('Body')
	UO.WarMode(0)
	UO.UseType('0x0F51');dagger
	wait(500)
	UO.UseType('0x13B1');bow
	UO.WarMode(1) 
	wait(100)
else
	wait(50)
endif

For i=0 to 2		
	If UO.GetQuantity('Body') then
		CheckLag()
		UO.FindType(Loot[i],-1,'Body')
		if UO.GetQuantity('finditem')>0 then
		UO.MoveItem('finditem')          
		wait(300)
	else
		wait(50)
	endif
next
	
If UO.Count('0x1078')>0 then
	UO.WaitTargetType('0x1078')
	CheckLag()
	UO.UseType('0x0F9E')
else
	wait(50)
endif

end sub

Code: Select all

sub AddObject()
UO.exec('addobject Body')
while UO.targeting()
wait(50)
wend
end sub
Монстров всех режет и лутит нормально. Но вот столкнулся с тем, что скрипт отказываеться работать на Ограх. Parse error выводит. Запускал скрипт по частям, стопориться сразу же после команды UO.UseObject.

Менял Body на lastcorpes, толку 0.

P.S. Шард Антарес
Mamoru
Posts: 45
Joined: 2005-07-10 11:26:37

Post by Mamoru »

Попробуй вставить паузу после UseObject.
Может Огры дольше открываюся :?
Post Reply