我腳本已經到可以給錢->骰完->贏了可以點買家交易、輸了就說沒中,但是點交易卻不能成功給錢,會在交易時呆掉
a. 點交易卻不能成功給錢,會在交易時呆掉
b. "恭喜 $DealID 中獎! 請領取獎金~" 在BB中沒有出現ID,只有顯示 "恭喜 中獎! 請領取獎金~",不知有沒有關係?但是可以成功點買家交易!
以下是一個賭贏的BB內容
天使 魔心 (等級 107) 向您要求一個交易
請輸入'deal'以開始交易, 或'deal no'以拒絕本交易.
Config 'dealAuto' 設定為 2 (原為 0)
開始與 天使 魔心 進行交易
請輸入 deal add 背包物品編號 數量 來進行物品交易
或輸入 deal add z 金額 來進行金額交易
確認 或 交換 都是輸入 deal 來執行
一次完整的交易都要輸入3次"deal"
您完成了本交易
天使 魔心 加入 1,000,008 z 以交易
[macro] automacro Deal2 triggered.
Config 'dealAuto' 設定為 0 (原為 2)
天使 魔心 完成了本交易
Config 'dealAuto' 設定為 2 (原為 0)
交易完成
[macro] automacro DealMoney triggered.
您 獲得 1,000,008 zeny.
Config 'dealAuto' 設定為 0 (原為 2)
RuinKy : 押"中" 金額:1000008 Z
RuinKy : 開
RuinKy: *骰子4點*
[macro] automacro Emotions triggered.
RuinKy : 開出: "骰子4" (中)
Config 'dealAuto' 設定為 1 (原為 0)
'e' 功能語法錯誤 (表情符號)
使用方法: e <指令>
RuinKy : 恭喜 中獎! 請領取獎金~
Config 'dealAuto' 設定為 0 (原為 1)
'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消
'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消
試圖與 Player 天使 魔心 (0) 交易
開始與 天使 魔心 進行交易
請輸入 deal add 背包物品編號 數量 來進行物品交易
或輸入 deal add z 金額 來進行金額交易
確認 或 交換 都是輸入 deal 來執行
一次完整的交易都要輸入3次"deal"
天使 魔心 完成了本交易
Config 'dealAuto' 設定為 2 (原為 0)
您完成了本交易
'deal' 功能錯誤 (與玩家交易)
您接受了最終的交易
交易完成
'deal' 功能錯誤 (與玩家交易)
無交易訊息可供接受
'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消
'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消
automacro CreateChat {
console /您的座標: (.*), (.*)/
call {
pause 0.2
release all
pause 1
lock WinDeal
pause 2.5
do look 5 0
do sit
pause 0.2
do chat create "100~300W大中小1:2.5猜數字1:5" 20 1
pause 0.2
do conf dealAuto 2
}
}
automacro JoinChat {
console /(.*) 已加入這個聊天室/
run-once 1
call {
lock JoinChat
pause 0.1
if ($.lastMatch1 == GM01) goto next
pause 0.1
if ($.lastMatch1 == GM02) goto next
pause 0.1
if ($.lastMatch1 == GM03) goto next
pause 0.1
if ($.lastMatch1 == GM[0-99]) goto next
pause 0.5
do c 押注方式: [押金] + [1~9z]玩法
pause 1
do c 可押注金額: 100萬 200萬 300萬
pause 1
do c 交易 1,000,007 押小 骰子開(1,2)
pause 1
do c 交易 1,000,008 押中 骰子開(3,4)
pause 1
do c 交易 1,000,009 押大 骰子開(5,6)
pause 1
do c 猜數字(1~6): 交易 1,000,001 猜數字1
pause 1
do c 猜數字(1~6): 交易 1,000,003 猜數字3
pause 1
do c 猜數字(1~6): 交易 1,000,006 猜數字6
:next
release all
}
}
automacro DenyDeal {
console /Engaged Deal with (.*)/
run-once 1
call {
lock JoinChat
$DealID = $.lastMatch1
do conf dealAuto 0
pause 0.1
lock WinDeal
lock DealEnd
lock DenyDeal
pause 40
do deal no
}
}
#如果對方放入的是物品,則取消交易
automacro DealItem {
console /(.*) 加入物品以交易: (.*)/
call {
do deal no
}
}
#對方放入(.*),(.*),(.*)賭金後,執行確認交易動作!
#(.*),(.*),(.*) z 是百萬的情況, (.*),(.*) z 是十萬的情況 ,
#十萬百萬都接受則要其他寫法, 在此不提供
automacro Deal2 {
console /(.*) 加入 (.*),(.*),(.*) z 以交易/
run-once 1
call {
do conf dealAuto 0
pause 0.1
lock Deal2
pause 0.1
lock WinDeal
pause 0.1
lock DealEnd
pause 0.1
lock DenyDeal
pause 0.1
lock DealEnd
pause 0.1
$LabMoney = $.lastMatch2$.lastMatch3$.lastMatch4
pause 0.5
$AssignNumber = @eval($LabMoney % 10)
pause 0.5
if ($AssignNumber = 0) goto NO
pause 0.2
$SureDealZ = @eval($LabMoney - $AssignNumber)
pause 1.5
#----------------------修 改 能 投 注 的 金 額 ---------------------------------------------------------
if ($SureDealZ == 1000000) goto conn
pause 0.2
if ($SureDealZ == 2000000) goto conn
pause 0.2
if ($SureDealZ == 3000000) goto conn
pause 0.2
:NO
do c $LabMoney Z << 放入金額,錯誤!
do c 可押注金額: 100萬 200萬 300萬
do c 交易 1,000,007 押小 骰子開(1,2)
do c 交易 1,000,008 押中 骰子開(3,4)
do c 交易 1,000,009 押大 骰子開(5,6)
do c 猜數字2: 交易 1,000,002 猜數字 2
do c 猜數字5: 交易 1,000,005 猜數字 5
do deal no
pause 0.2
do deal no
release all
stop
:conn
do conf dealAuto 2
pause 50
do deal no
}
}
automacro DealMoney {
console /交易完成/
call {
lock DealRe
do conf dealAuto 0
pause 0.2
if ($AssignNumber == 7) goto SEVEN
pause 0.2
if ($AssignNumber == 8) goto EIGHT
pause 0.2
if ($AssignNumber == 9) goto NIGHT
pause 0.2
:ONETOSIX
do c $DealID 猜數字-"$AssignNumber" 金額: $LabMoney Z
goto connnn
:SEVEN
do c $DealID 押"小" 金額:$LabMoney Z
goto connnn
:EIGHT
do c $DealID 押"中" 金額:$LabMoney Z
goto connnn
:NIGHT
do c $DealID 押"大" 金額:$LabMoney Z
goto connnn
:connnn
lock DealMoney
pause 0.5
do c 開
pause 0.2
do e 骰子
}
}
automacro Emotions {
console /RuinKy: \*骰子(.*)點\*/
call {
pause 0.2
$emotion = $.lastMatch1
pause 0.5
if ($AssignNumber < 7) goto OneToSix
pause 0.2
#賭大中小,開出點數為 1,2
if ($emotion < 3) goto Seven
pause 0.2
#賭大中小,開出點數為 5,6
if ($emotion > 4) goto Nine
pause 0.2
#賭大中小,開出點數為 3,4
goto Eight
#------------------[ 開數字 ]---------------------#
:OneToSix
pause 1
do c 開出: 數字-$emotion
pause 0.1
if ($emotion == $AssignNumber) goto OneToSixWin
goto loss
#------------------[ 開大中小 ]---------------------#
:Seven
pause 1
do c 開出: "骰子$emotion" (小)
pause 0.1
if ($AssignNumber == 7) goto SevenToNineWin
goto loss
:Eight
pause 1
do c 開出: "骰子$emotion" (中)
pause 0.1
if ($AssignNumber == 8) goto SevenToNineWin
goto loss
:Nine
pause 1
do c 開出: "骰子$emotion" (大)
pause 0.1
if ($AssignNumber == 9) goto SevenToNineWin
goto loss
#-------------------- [1 ~ 6] ----------------------------------------------
:OneToSixWin
lock DealRe
pause 0.2
$WinSum = @eval ($LabMoney * 5.3)
pause 0.5
do conf dealAuto 1
pause 0.3
do e pea
pause 0.1
release WinDeal
do c 恭喜 $DealID 中獎! 請領取獎金~
pause 0.2
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
lock JoinChat
pause 60
do conf dealAuto 2
do deal no
do deal no
release all
goto end
#--------------------------[大 --- 中 --- 小 ]------------------------------
:SevenToNineWin
lock DealRe
pause 0.2
$WinSum = @eval ($LabMoney * 2.8)
pause 0.5
do conf dealAuto 1
pause 0.3
do e pea
pause 0.2
release WinDeal
do c 恭喜 $DealID 中獎! 請領取獎金~
pause 0.2
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
lock JoinChat
pause 5
do conf dealAuto 2
do deal no
do deal no
release all
goto end
#-------------------------------[loss]-------------------------------------
:loss
pause 0.5
do e 流冷汗
pause 0.2
do c 沒中~ 祝您下次中獎~
do deal no
do conf dealAuto 2
release all
:end
}
}
automacro WinDeal {
console /開始與 (.*) 進行交易/
run-once 1
call {
$DealIDA = $.lastMatch1
if ( $DealID == $DealIDA ) goto Deal
lock DealRe
do conf dealAuto 1
pause 0.3
do c $DealID 讀取不到座標,請移動一格!
pause 0.1
release WinDeal
pause 0.1
release payagen
pause 0.1
release IngRE
pause 0.1
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
goto end
:Deal
pause 0.2
release DealEnd
pause 2.5
do deal add z $WinSum
pause 0.5
do deal add z $WinSum
pause 0.5
do conf dealAuto 2
:end
}
}
automacro DealEnd {
console /交易完成/
run-once 1
call {
do conf dealAuto 2
pause 0.2
do e omg
pause 0.2
do c 恭喜 $DealID 獲得:$WinSum z
pause 0.2
do deal no
release all
stop
}
}
automacro DealRe {
console /交易已取消/
run-once 1
call {
do conf dealAuto 2
pause 0.1
lock WinDeal
pause 0.1
release all
stop
}
}
automacro IngRE {
console /您必須先取消傳過來的交易訊息|對方正在進行另一個交易中./
run-once 1
call {
lock DealRe
do c 交易未結束,勿點交易!
pause 0.2
do conf dealAuto 1
pause 0.3
release IngRE
pause 0.1
release payagen
pause 0.1
release WinDeal
pause 0.1
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
pause 60
do conf dealAuto 2
do deal no
release all
}
}
automacro payagen {
console /對方距離您太遠以致於無法交易./
run-once 1
call {
lock DealRe
do deal no
do c $DealID 讀取不到座標,請移動一格!
pause 0.1
do conf dealAuto 1
pause 0.3
release payagen
pause 0.1
release WinDeal
pause 0.1
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
pause 60
do conf dealAuto 2
do deal no
do deal no
release all
}
}
automacro DealE {
console /您已經在交易中了/
run-once 1
call {
lock DealRe
release DealE
pause 0.1
do c $DealID 讀取不到您的座標,請移動一格!
do conf dealAuto 1
pause 0.3
release WinDeal
pause 0.1
release payagen
pause 0.1
release IngRE
pause 0.1
do conf dealAuto 0
do deal no
pause 0.3
do deal no
do deal @player($DealID)
}
}
|