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

Skript for Переплавка
http://forum.yoko.com.ua/viewtopic.php?f=20&t=692		 Page 1 of 1
Author:  oper of Ocllo [ 2004-06-27 14:32:41 ]
Post subject:  Skript for Переплавка
Skript for Переплавка
У когонить есть скрипт на переплавку (в инги)
Author:  BETEPAH [ 2004-06-27 14:36:21 ]
Post subject: 
http://yoko.netroof.net/forum/viewforum.php?f=8


Там и не только на переплавку
Author:  oper of Ocllo [ 2004-06-27 15:00:04 ]
Post subject: 
не мне надобно чтоб из (к примеру) Breastplate он плавил в инготы
Author:  Bloodmoon [ 2004-06-28 13:14:04 ]
Post subject: 
Че-то ты очень много хочешь:)!Шучу:)!!!
Author:  Yoko [ 2004-06-28 15:05:02 ]
Post subject: 
вот скелет скрипта

while ...
uo.waittargettype("breast_type")
uo.usefromground("forge_type")
wait(delay_ms)
wend

конечно на разных шардах разные алгоритмы переплавки, и раз ты не указал какой именно то сам переделаешь если надо
Author:  Daioh [ 2004-06-28 19:55:30 ]
Post subject: 
Code:
sub main()
   Var Forge='0x401C966B'
   Var C=1
   dim Armors[10]
   Armors[1]='0x13F0'
   Armors[2]='0x13BF'
   Armors[3]='0x1415'
   Armors[4]='0x13EC'
   Armors[5]='0x1411'
   Armors[6]='0x13EE'
   Armors[7]='0x13EB'
   Armors[8]='0x13BE'
   Armors[9]='0x1410'
   for c=1 to 9
      while UO.Count(Armors[c])
      UO.waittargettype(Armors[c])
      UO.UseObject(Forge)
      CheckLag()
      wait(500)
      wend
   next
end sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub

Скрипт под ДРВ. Если нужно, меняйте типы(в данный момент плавит все виды железных арморов(насчет цветных - хз - выньте на всякий пожарный из бекпека), кроме перчаток, горгеток, шлемов и щитов
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/