我剛剛已經買了賭場腳本 
如果我想把它改成只偵測最後一個數字 
 
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 |