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

Scrolls, type, оптимизация
http://forum.yoko.com.ua/viewtopic.php?f=20&t=17504		 Page 1 of 1
Author:  Gromiz [ 2014-11-02 20:41:44 ]
Post subject:  Scrolls, type, оптимизация
hi

использую, как и многие, скрипт на переклад вещей из сумки в сумку, где указываются типы и сериалы, всего бы ничего, но из-за свитков возникает некоторые вопросы, например, собираю свитки, но т.к. их огромное кол-во, то они занимают значимую часть скрипта, я всегда рад любой возможности по сокращению скриптов с сохранением функционала.

возможно как-то оптимизировать указание типов предметов, которые надо собирать?

а то сейчас часть кода имеет вид: "в бесконечность и далее"

Code:
   ...
   lootGM('0x1F31', '0x0000', '0x404079D4'); Scrolls 
   lootGM('0x1F32', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F33', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F34', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F35', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F36', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F37', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F38', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F39', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F3A', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F3B', '0x0000', '0x404079D4'); Scrolls
   lootGM('0x1F3C', '0x0000', '0x404079D4'); Scrolls
   ...
Author:  Mirage [ 2014-11-03 13:48:14 ]
Post subject:  Re: Scrolls, type, оптимизация
строка PUTLoot2(0x1f19, 0x1f71, '-1', corps, pack,'','','')
переместит ВСЕ свитки из контейнера corps в контейнер pack - даже если их там будет 100500 по 1 разложены.


Code:
sub main()
   PUTLoot2(0x1f19, 0x1f71, '-1', corps, pack,'','','')   ; scroll 1-8 круг
endsub

Sub PUTLoot2(Type1, Type2, Color, SourceContainer, TargetContainer,X,Y,Z)
   for TType = Type1 to Type2
      PUTLoot(TType, Color, SourceContainer, TargetContainer,X,Y,Z)
   next
end sub
Sub PUTLoot(Type, Color, SourceContainer, TargetContainer,X,Y,Z)
   UO.FindType(Type, Color, SourceContainer)
   while UO.FindCount()
      timemove=UO.Timer()
                uo.MoveItem('finditem',0,TargetContainer,X,Y,Z)
                repeat
                   wait(lootwait)
                until UO.ContainerOf(itemID)<>'TargetContainer' || timemove+30>UO.Timer()
      UO.FindType(Type, Color, SourceContainer)
   wend
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/