放完傳陣之後
如果有放表情
就不會開聊天室了
但是我表情那也有設定聊天室
為啥會開不起來
有人知道哪要改or設定什麼?
幫個忙
謝謝
automacro a {
console /您現在已在遊戲中/
call {
pause 4
do conf ignoreAll 1
if (@invamount(藍色魔力礦石) == 0) goto qk
pause 1
do conf dealAuto 3
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 456789
pause 1
do sit
do look 4
stop
:qk
do chat create "停飛中" 2 0 456789
do conf dealAuto 1
do sit
do look 4
stop
}
}
automacro b {
console /(.*) ((.*) (.*)) 向您要求一個交易/
run-once 1
call {
$i = $.lastMatch1
do deal
pause 15
do deal no
stop
}
}
automacro c {
console /(.*) 加入物品以交易: (.*)/
call {
do deal no
stop
}
}
automacro d {
console /(.*) 加入 (.*) z 以交易/
call {
$a = $.lastMatch2
if ($a = 700) goto bb
if ($a = 800) goto bb
if ($a = 900) goto bb
if ($a = 1,000) goto bb
pause 1
do deal no
stop
:bb
pause 1
do deal
pause 1
do deal
pause 10
do deal no
stop
}
}
automacro e {
console /您 獲得 (.*) zeny/
call {
do conf dealAuto 1
do chat leave
$a = $.lastMatch1
if ($a = 700) goto a1
if ($a = 800) goto b2
if ($a = 900) goto c3
if ($a = 1,000) goto d4
:a1
call aa1
stop
:b2
call bb2
stop
:c3
call cc3
stop
:d4
call dd4
stop
}
}
macro aa1 {
$aa1 = @invamount(藍色魔力礦石)
$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
do warp yuno
pause 1
$aa2 = @invamount(藍色魔力礦石)
if ($aa1 == $aa2) goto ax
do c XXXXX($x0, $y0)
stop
:ax
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
call axx
stop
}
}
macro axx {
call aa1
}
macro bb2 {
$bb1 = @invamount(藍色魔力礦石)
$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
do warp yuno_fild03
pause 1
$bb2 = @invamount(藍色魔力礦石)
if ($bb1 == $bb2) goto bx
do c XXXXX($x0, $y0)
stop
:bx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
call bxx
stop
}
}
macro bxx {
call bb2
}
macro cc3 {
$cc1 = @invamount(藍色魔力礦石)
$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
do warp glast_01
pause 1
$cc2 = @invamount(藍色魔力礦石)
if ($cc1 == $cc2) goto cx
do c XXXXX($x0, $y0)
stop
:cx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
call cxx
stop
}
}
macro cxx {
call cc3
}
macro dd4 {
$dd1 = @invamount(藍色魔力礦石)
$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
do warp lhz_fild01
pause 1
$cc2 = @invamount(藍色魔力礦石)
if ($dd1 == $cc2) goto dx
do c XXXXX($x0, $y0)
stop
:dx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
call dxx
stop
}
}
macro dxx {
call dd4
}
automacro g {
console /XXXXX((.*), (.*))/
call {
if (@invamount(藍色魔力礦石) == 0) goto qk
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
pause 1
do sit
do look 4
release all
stop
:qk
do c 沒藍石了,要停飛了,晚點再來。
pause 2
do chat create "停飛中" 2 0 456789
do sit
do look 4
stop
}
}
###############################################
automacro emotionTrigger {
console /\[距離=(.*)\] (.*) \((\d+)\): \*(開玩笑|害羞|摸對方的頭髮|補充SP休息中|嗯)\*$/
exclusive 1
call {
$dist = $.lastMatch1
if ($dist > 4) goto stop
$p = $.lastMatch2
$i = $.lastMatch3
$g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
if ("$g" == "XXXXX") goto ok
if ("$g" == "XXXXX") goto ok
stop
:stop
stop
:ok
if ($.lastMatch4 == "開玩笑") goto wave
if ($.lastMatch4 == "害羞") goto peace
if ($.lastMatch4 == "摸對方的頭髮") goto fist
if ($.lastMatch4 == "補充SP休息中") goto koko
if ($.lastMatch4 == "嗯") goto aaaa
stop
:wave
do conf dealAuto 1
do chat leave
$aa1 = @invamount(藍色魔力礦石)
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
pause 1
do c XXXXX
pause 3
do sl 27 $x0 $y0
pause 2
do warp yuno
pause 1
$aa2 = @invamount(藍色魔力礦石)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
if ($aa1 == $aa2) goto ax
do c 歡迎歡迎!!,朱諾開了!($x0, $y0)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
pause 1
do sit
do look 4
stop
:ax
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
goto wave
stop
:peace
do conf dealAuto 1
do chat leave
$bb1 = @invamount(藍色魔力礦石)
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
pause 1
do c XXXXX
pause 3
do sl 27 $x0 $y0
pause 2
do warp yuno_fild03
pause 1
$bb2 = @invamount(藍色魔力礦石)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
if ($bb1 == $bb2) goto bx
do c 歡迎歡迎!!,火洞開了!($x0, $y0)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
pause 1
do sit
do look 4
stop
:bx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
goto peace
stop
:fist
do conf dealAuto 1
do chat leave
$cc1 = @invamount(藍色魔力礦石)
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
pause 1
do c XXXXX
pause 3
do sl 27 $x0 $y0
pause 2
do warp glast_01
pause 1
$cc2 = @invamount(藍色魔力礦石)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
if ($cc1 == $cc2) goto cx
do c 歡迎歡迎!!,古城開了!($x0, $y0)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
pause 1
do sit
do look 4
stop
:cx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
goto fist
stop
:koko
do conf dealAuto 1
do chat leave
$dd1 = @invamount(藍色魔力礦石)
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
pause 1
do c XXXXX
pause 3
do sl 27 $x0 $y0
pause 2
do warp lhz_fild01
pause 1
$dd2 = @invamount(藍色魔力礦石)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
if ($dd1 == $dd2) goto dx
do c 歡迎歡迎!!,企都開了!($x0, $y0)
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
pause 1
do sit
do look 4
stop
:dx
pause 1
do c 等我一下!!
pause 1
do c 再傳一次!!!
goto koko
stop
:zzzzz
do c 沒藍石了,要停飛了,晚點再來。
pause 1
do chat create "停飛中" 2 0 1356
pause 1
do sit
do look 4
stop
:aaaa
do conf dealAuto 1
do chat leave
pause 1
do sp 34 $p 10
pause 1
do sp 29 $p 10
if (@invamount(藍色魔力礦石) == 0) goto zzzzz
pause 1
do chat create "朱諾700火洞800古城900企都1000" 2 0 1356
do conf dealAuto 3
do sit
do look 4
stop
}
}
###############################################
|