Tweet
Se può esservi utile in qualche script, ecco una funzione per runebook che ho creato io.
Le spiegazioni sono all'inizio dello script, con anche un esempio.
In pratica se volete che nello script il vostro pg si recalli con la runa 12 del vostro runebook usando Recall (magery) dovrete scrivere:
GoSub Recall 12 Magery <l'ID del vostro runebook>
Spero vi sia utile =)
Le spiegazioni sono all'inizio dello script, con anche un esempio.
In pratica se volete che nello script il vostro pg si recalli con la runa 12 del vostro runebook usando Recall (magery) dovrete scrivere:
GoSub Recall 12 Magery <l'ID del vostro runebook>
codice:
; GoSub Recall <runa> <skill> <RuneBookID>
; Skill: Magery, Chiva
; Runa: da 1 a 16
GoSub Recall 10 Magery XXXXXXX
;----------------------------------
;--- Funzione RuneBook ----------
;----------------------------------
;--- Autore: Drael/Slyon ----------
;--- Versione: 1.0.0 ----------
;----------------------------------
Sub Recall
Set %runa %1
Set %Recall %2
Set %RuneBook %3
GoSub OpenBook
GoSub Pagina
GoSub PaginaSet
GoSub Skill
Wait 10
Return
Sub OpenBook
OpenBook:
Set #lObjectID %RuneBook
Event Macro 17
Wait 1s
If #ContName = generic_gump
{
Return
}
GoTo OpenBook
Sub Pagina
If %runa <= 16
{
Set %ClickX #ContPosX + 415
Set %ClickY #ContPosY + 195
}
If %runa <= 14
{
Set %ClickX #ContPosX + 380
Set %ClickY #ContPosY + 195
}
If %runa <= 12
{
Set %ClickX #ContPosX + 345
Set %ClickY #ContPosY + 195
}
If %runa <= 10
{
Set %ClickX #ContPosX + 310
Set %ClickY #ContPosY + 195
}
If %runa <= 8
{
Set %ClickX #ContPosX + 245
Set %ClickY #ContPosY + 195
}
If %runa <= 6
{
Set %ClickX #ContPosX + 210
Set %ClickY #ContPosY + 195
}
If %runa <= 4
{
Set %ClickX #ContPosX + 175
Set %ClickY #ContPosY + 195
}
If %runa <= 2
{
Set %ClickX #ContPosX + 140
Set %ClickY #ContPosY + 195
}
Wait 10
Click %ClickX %ClickY
Return
Sub PaginaSet
If %Runa = 1
{
Set %Pagina 1
return
}
If %Runa in 1_3_5_7_9_11_13_15
{
Set %Pagina 1
}
If %Runa in 2_4_6_8_10_12_14_16
{
Set %Pagina 2
}
Return
Sub Skill
If %Pagina = 1
{
If %Recall = Magery
{
Set %ClickX #ContPosX + 140
Set %ClickY #ContPosY + 145
}
If %Recall = Chiva
{
Set %ClickX #ContPosX + 140
Set %ClickY #ContPosY + 180
}
}
If %Pagina = 2
{
If %Recall = Magery
{
Set %ClickX #ContPosX + 300
Set %ClickY #ContPosY + 145
}
If %Recall = Chiva
{
Set %ClickX #ContPosX + 300
Set %ClickY #ContPosY + 180
}
}
Wait 10
Click %ClickX %ClickY
Return
;----------------------------------
;---- Funzione RuneBook Fine ------
;----------------------------------
Commenta