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

Почему не режу кожу?
http://forum.yoko.com.ua/viewtopic.php?f=3&t=5344		 Page 1 of 1
Author:  MKS [ 2005-10-03 09:12:29 ]
Post subject:  Почему не режу кожу?
Code:
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:
sub AddObject()
UO.exec('addobject Body')
while UO.targeting()
wait(50)
wend
end sub


Монстров всех режет и лутит нормально. Но вот столкнулся с тем, что скрипт отказываеться работать на Ограх. Parse error выводит. Запускал скрипт по частям, стопориться сразу же после команды UO.UseObject.

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

P.S. Шард Антарес
Author:  Mamoru [ 2005-10-03 10:43:07 ]
Post subject: 
Попробуй вставить паузу после UseObject.
Может Огры дольше открываюся :?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/