賣傳陣(幫買家放加速)

116.com · 發表於 2011-5-16 00:49:25

以下巨集是修改網上傳陣的巨集
因為只是作小修改

automacro Start1 {
console /您的座標/
exclusive 1
call {
pause 3
do conf ignoreAll 1
call Chat
}
}
macro Chat {
do sit
do look 4
if (@invamount(藍色魔力礦石) > 0) goto OK
do chat create "沒石頭了" 2 0 8591
stop
:OK
do chat create "朱2000石波2100跳台2500古2800" 2 0 8591
# 自行修改聊天室內容
do deal no
# 避免在使用傳陣到創聊天室之間有人點交易
}
automacro Deala {
console /向您要求一個交易/
inventory "藍色魔力礦石" > 0
call {
do deal
pause 15
do deal no
}
}
automacro Dealb {
console /加入物品以交易/
call {
do deal no
}
}
automacro Dealc {
console /(.*) 加入 (.*) z 以交易/
call {
$p = $.lastMatch1
$a = $.lastMatch2
if ($a = 2,000) goto OK
if ($a = 2,100) goto OK
if ($a = 2,500) goto OK
if ($a = 2,800) goto OK
# 自行修改金額
do deal no
stop
:OK
pause 1
do deal
pause 1
do deal
pause 10
do deal no
}
}
automacro Warp {
console /您獲得 (.*) zeny/
exclusive 1
call {
$b = @invamount(藍色魔力礦石)
do chat leave
do sp 29 $p 10
pause 1
:Top
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
do sl 27 $x0 $y0
pause 2
if ($a == "2,100") goto A
if ($a == "2,500") goto B
if ($a == "2,800") goto C
do warp yuno
# 傳送點一
goto End
:A
do warp veins
# 傳送點二
goto End
:B
do warp umbala
# 傳送點三
goto End
:C
do warp glast_01
# 傳送點四
:End
pause 2
if ($b == @invamount(藍色魔力礦石)) goto Top
# 使用傳陣藍礦未減少回到Top
do c 您好~!!您的傳陣已開啟，若看不到傳陣請左右移動一下，很高興為您服務。
call Chat
}
}

複製代碼

手機遊戲

線上遊戲

其他

賣傳陣(幫買家放加速)

大家正在看啥

×解除隱藏選擇-請關閉瀏覽器擋廣告插件