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

Runebook DRW
http://forum.yoko.com.ua/viewtopic.php?f=3&t=14414		 Page 1 of 1
Author:  Nelson [ 2009-02-13 07:15:28 ]
Post subject:  Runebook DRW
Собственно нигде немогу найти нормальный скрипт на рунбуку....

Code:
############################################################### 
#### Рунбука для шарда DRW с использованием команды ONGUMP #### 
############################################################### 
####                   Crafted by Askaneli                 #### 
############################################################### 
####     Необходима Injection.dll не ниже версии 505.16    #### 
############################################################### 
####           Передаваемы параметры в процедуру           #### 
############################################################### 
####  idrb - ИД рунбуки                                    #### 
####  rejim - режим работы процедуры (1-4)                 #### 
####       1 - рекол по рунбуке по рунке номер nrune       #### 
####       2 - достать рунку nrune из рунбуки              #### 
####       3 - перезарядить рунбуку                        #### 
####       4 - вставить в рунбуку рунку с ИД idrune        #### 
############################################################### 
Sub Runebook(idrb,rejim,nrune,idrune) 
Dim gumpreturn[9] 
gumpreturn[1]="0x0015" 
gumpreturn[2]="0x0021" 
gumpreturn[3]="0x002E" 
gumpreturn[4]="0x003A" 
gumpreturn[5]="0x0040" 
gumpreturn[6]="0x0049" 
gumpreturn[7]="0x0058" 
gumpreturn[8]="0x005E" 
gumpreturn[9]="0x0401" 
UO.exec('resend') 
UO.UseObject('backpack') 
if rejim==1 then ; Реколимся по рунбуке 
   uo.useobject(idrb) 
   uo.exec("ongump anygump "+gumpreturn[nrune]) 
end if 
if rejim==2 then ; Выдёргиваем рунку из рунбука 
   uo.useobject(idrb) 
   uo.exec("ongump anygump "+uo.int2hex(11+nrune)) 
end if 
if rejim==3 then ;Перезаряжаем рунбуку 
   uo.useobject(idrb) 
   uo.exec("ongump anygump 0x0001") 
end if 
if rejim==4 then ;Засовываем рунку в рунбук 
   uo.waittargetobject(idrune) 
   wait(100) 
   uo.useobject(idrb) 
   uo.exec("ongump anygump 0x000B") 
end if 
end sub


Пробовал сие чудо. Но оно отказывается работать...
В гампах я неселён.

Ещё видел в скрипте на майнинг ВЕТЕРАНа интересный рекол по рунбуке...Но там только по первой и восьмой... А другие номера я так и не понял как определить... ВОт эти собсвтенно две строчки..
Code:
uo.exec("recall Runebook 21") ;(слот 1)
uo.exec("recall Runebook 94") ;(слот 8)

Но мне хотелось бы понять как можно сделать так чтоб летал например по 5 рунке... Потратил часа 4 на форуме в поисках... так и ненашел. Помогите плиз!
Author:  Kynep [ 2009-02-13 07:46:45 ]
Post subject:  Re: Runebook DRW
Nelson wrote:
Но мне хотелось бы понять как можно сделать так чтоб летал например по 5 рунке... Потратил часа 4 на форуме в поисках... так и ненашел. Помогите плиз!


Code:
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
 
Author:  Nelson [ 2009-02-13 16:44:45 ]
Post subject: 
Большое спасибо ! =)
Author:  ADEPT_ABP [ 2009-02-19 15:28:22 ]
Post subject: 
И вроде ещё надо:
Code:
uo.set('norbcheck',1)
uo.set('norbcalc',1)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/