我剛剛已經買了賭場腳本
如果我想把它改成只偵測最後一個數字
OP就知道他要壓 大.中.或者小
因為原有有巨集只能設定壓3個金額
100萬.200萬.300萬
所以我想把它改成能壓範圍內的任何金額
例如1~300萬
假如我壓2121208 他就知道要壓中 這樣...
請問有辦法改出來嗎?
__________________
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
}
}
#對方放入(.*),(.*),(.*)賭金後,執行確認交易動作!
automacro Deal2 {
#看你設定的價錢, (.*),(.*),(.*) z 是百萬的情況, (.*),(.*) z 是十萬的情況 , 十萬百萬都接受則要其他寫法, 在此不提供
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 dice2
}
}
automacro Emotions {
#名字請打你的id上去, 如果你的表情table不是中文,請把骰子改成dice
console /名字: \*骰子\#(.*)\*/
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 60
do conf dealAuto 2
do deal no
do deal no
release all
goto end |