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

ДАвайте подумаем...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3290		 Page 1 of 1
Author:  CErebrus [ 2005-03-04 06:51:43 ]
Post subject:  ДАвайте подумаем...
Помогитте реализовать циклический скрипт на рекол по рунбуку по всем руна начиная с 1 заканчивая 9
Типо такого
Code:
   recallNumber=recallNumber+2 <++++здесь мы пишем такую формулу чтобы употребляять значения смотри ниже

UO.Recall('РУНБУК',recallNumber)

Значения которые должны получаться ихз формулы
UO.Recall(RuneBook, 21) ; - 1
UO.Recall(RuneBook, 33) ; - 2
UO.Recall(RuneBook, 46) ; - 3
UO.Recall(RuneBook, 58) ; - 4
UO.Recall(RuneBook, 64) ; - 5
UO.Recall(RuneBook, 73) ; - 6
UO.Recall(RuneBook, 88) ; - 7
UO.Recall(RuneBook, 94) ; - 8
UO.Recall(RuneBook, 1025) ; - 9
Голову ломаю уже давно но вот решил написать!
НЕ ПРЕДЛАГАТЬ ВОТ ЕТОТ ВАРИАНТ
Code:
sub RunebookRecall(n) 
oldX=uo.getX() 
oldY=uo.getY() 
repeat 
uo.Exec('warmode 0') 
uo.UseObject('magery') 
wait(1000) 
uo.LClick(135, n*15+55) 
wait(500) 
uo.LClick(135, n*15+55) 
time=uo.Timer() 
repeat 
wait(500) 
until oldX<>uo.getX() or oldY<>uo.getY() or uo.Life==0 or uo.InJournal('needs') or time+200<uo.Timer() 
uo.DeleteJournal() 
until oldX<>uo.getX() or oldY<>uo.getY() 
end sub
Author:  666Man666 [ 2005-03-04 07:49:13 ]
Post subject: 
Как вариант...
Code:
sub test()
var n
Dim Test[3]
Test[1] = '21'
Test[2] = '41'
Test[3] = '59'
   For n = 1 TO 3
      UO.Recall(RuneBook,Test[n])
   Next
end sub
Author:  CErebrus [ 2005-03-05 15:54:31 ]
Post subject: 
Нада чтобы с задержкой было ! Ето все нада для скрипта скупки товаров у вендора чтобы он по рунбуку к оодному пришел потом к другому и т д
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/