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

Под RUNUO(Nova) и не только,скрипт на перекладку чего угодно
http://forum.yoko.com.ua/viewtopic.php?f=15&t=10787
Page 1 of 1

Author:  Chico [ 2006-12-25 18:25:23 ]
Post subject:  Под RUNUO(Nova) и не только,скрипт на перекладку чего угодно

Начну выкладывать токо свои скрипты под рунуо, так как что то сфера всех задавила, а рунуо это круто. БУДУ ЛОЖИТЬ, НЕ ВЛИЯЮЩИЕ НА ЭКОНОМИКУ А ТОЛЬКО ОБЛЕГЧАЮЩИЕ ЖИЗНЬ скрипты
Инструкция :)
жмахаете бокс откуда, бокс куда и что перекладывать.
Code:
var Kol, I, Tip       
   uo.Exec('addobject Box1')
   while uo.Targeting()
   wait(100)
   wend
   uo.Exec('addobject Box2')
   while uo.Targeting()
   wait(100)
   wend
   uo.Exec('addobject obj')
   while uo.Targeting()
   wait(100)
   wend
    Tip = uo.GetGraphic('obj')
   uo.findtype(Tip,'-1','Box1')
    wait(300)
    kol =  uo.FindCount()
    uo.print('naideno-' + str(kol))
for i=1 to Kol
      uo.findtype(Tip,'-1','Box1')
      wait(100)
      UO.moveitem('finditem','Box1','Box2',1,1,1)
      Wait(1000)
Next
end sub

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/