HGE人民币提现脚本，提现手续费为10%,合区后开放提现功能

admin

(@@InPutInteger @@InPutString)
        [@main]
        #IF
        #ACT
        OPENMERCHANTDLG 19|1280|0|0|0|0|0|0|1|390|28
        #say
         
        --------------------------------------------------------
       
       
       
       
       
        --------------------------------------------------------
            
        　　　
       
        [@兑换人民币]
        #ACT
        #SAY
       
         
          
       
       
         　　 　　　
         　　 　　　  
       
       
       
        [@兑换1元]
        #IF
        CHECKGameGird > 0
        #ACT
        GameGird - 1
        GIVE 1元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换1元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
        [@兑换5元]
        #IF
        CHECKGameGird > 4
        #ACT
        GameGird - 5
        GIVE 5元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换5元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
        [@兑换10元]
        #IF
        CHECKGameGird > 9
        #ACT
        GameGird - 10
        GIVE 10元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换10元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
       
       
        [@兑换20元]
        #IF
        CHECKGameGird > 19
        #ACT
        GameGird - 20
        GIVE 20元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换20元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
       
       
        [@兑换50元]
        #IF
        CHECKGameGird > 49
        #ACT
        GameGird - 50
        GIVE 50元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换50元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
       
       
       
        [@兑换100元]
        #IF
        CHECKGameGird > 99
        #ACT
        GameGird - 100
        GIVE 100元人民币 1
        GOTO @兑换人民币
        SENDMSG 0 玩家【】成功兑换100元人民币券(可交易)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换人民币券。
        BREAK
       
       
       
       
       
       
       
       
       
       
       
       
        [@兑换充值点]
        #ACT
        #SAY
       
         
          
       
       
         　　 　　　
         　　 　　　  
       
       
        [@兑换1元券]
        #IF
        CHECKGameGird > 0
        #ACT
        GameGird - 1
        GAMEDIAMOND + 1
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换1元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
        [@兑换5元券]
        #IF
        CHECKGameGird > 4
        #ACT
        GameGird - 5
        GAMEDIAMOND + 5
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换5元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
        [@兑换10元券]
        #IF
        CHECKGameGird > 9
        #ACT
        GameGird - 10
        GAMEDIAMOND + 10
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换10元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
       
       
        [@兑换20元券]
        #IF
        CHECKGameGird > 19
        #ACT
        GameGird - 20
        GAMEDIAMOND + 20
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换20元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
       
       
        [@兑换50元券]
        #IF
        CHECKGameGird > 49
        #ACT
        GameGird - 50
        GAMEDIAMOND + 50
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换50元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
       
       
        [@兑换100元券]
        #IF
        CHECKGameGird > 99
        #ACT
        GameGird - 100
        GAMEDIAMOND + 100
        GOTO @兑换充值点
        SENDMSG 0 玩家【】成功兑换100元充值点(可开礼包)。 0 251
        #ELSEACT
        MESSAGEBOX 你的人民币点不足以兑换充值点。
        BREAK
       
       
       
       
       
        [@提现]
        #IF
        NOT EQUAL A146 新区
        #ACT
        OPENMERCHANTDLG 50|707|0|0|0|0|0|0|1|480|28
        GetRandomName D:提现文件提现名字.txt A231 1 1
        GetRandomName D:提现文件提现名字.txt A232 2 1
        GetRandomName D:提现文件提现名字.txt A233 3 1
        GetRandomName D:提现文件提现名字.txt A234 4 1
        GetRandomName D:提现文件提现名字.txt A235 5 1
        GetRandomName D:提现文件提现名字.txt A236 6 1
        GetRandomName D:提现文件提现名字.txt A237 7 1
        GetRandomName D:提现文件提现名字.txt A238 8 1
        GetRandomName D:提现文件提现名字.txt A239 9 1
        GetRandomName D:提现文件提现名字.txt A240 10 1
       
        GetRandomName D:提现文件提现金额.txt A251 1 1
        GetRandomName D:提现文件提现金额.txt A252 2 1
        GetRandomName D:提现文件提现金额.txt A253 3 1
        GetRandomName D:提现文件提现金额.txt A254 4 1
        GetRandomName D:提现文件提现金额.txt A255 5 1
        GetRandomName D:提现文件提现金额.txt A256 6 1
        GetRandomName D:提现文件提现金额.txt A257 7 1
        GetRandomName D:提现文件提现金额.txt A258 8 1
        GetRandomName D:提现文件提现金额.txt A259 9 1
        GetRandomName D:提现文件提现金额.txt A260 10 1
       
        GetRandomName D:提现文件提现时间.txt A241 1 1
        GetRandomName D:提现文件提现时间.txt A242 2 1
        GetRandomName D:提现文件提现时间.txt A243 3 1
        GetRandomName D:提现文件提现时间.txt A244 4 1
        GetRandomName D:提现文件提现时间.txt A245 5 1
        GetRandomName D:提现文件提现时间.txt A246 6 1
        GetRandomName D:提现文件提现时间.txt A247 7 1
        GetRandomName D:提现文件提现时间.txt A248 8 1
        GetRandomName D:提现文件提现时间.txt A249 9 1
        GetRandomName D:提现文件提现时间.txt A250 10 1
       
       
        #SAY
        ;服务器时间变量
            
         
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
       
          
        　　　　　　　　　 元　  
        　　　　　
        　　　
       
        #ELSEACT
        GOTO @提现2
       
       
       
        [@提现2]
        #ACT
        OPENMERCHANTDLG 50|707|0|0|0|0|0|0|1|480|28
        GetRandomName D:提现文件提现名字.txt A231 1 1
        GetRandomName D:提现文件提现名字.txt A232 2 1
        GetRandomName D:提现文件提现名字.txt A233 3 1
        GetRandomName D:提现文件提现名字.txt A234 4 1
        GetRandomName D:提现文件提现名字.txt A235 5 1
        GetRandomName D:提现文件提现名字.txt A236 6 1
        GetRandomName D:提现文件提现名字.txt A237 7 1
        GetRandomName D:提现文件提现名字.txt A238 8 1
        GetRandomName D:提现文件提现名字.txt A239 9 1
        GetRandomName D:提现文件提现名字.txt A240 10 1
       
        GetRandomName D:提现文件提现金额.txt A251 1 1
        GetRandomName D:提现文件提现金额.txt A252 2 1
        GetRandomName D:提现文件提现金额.txt A253 3 1
        GetRandomName D:提现文件提现金额.txt A254 4 1
        GetRandomName D:提现文件提现金额.txt A255 5 1
        GetRandomName D:提现文件提现金额.txt A256 6 1
        GetRandomName D:提现文件提现金额.txt A257 7 1
        GetRandomName D:提现文件提现金额.txt A258 8 1
        GetRandomName D:提现文件提现金额.txt A259 9 1
        GetRandomName D:提现文件提现金额.txt A260 10 1
       
        GetRandomName D:提现文件提现时间.txt A241 1 1
        GetRandomName D:提现文件提现时间.txt A242 2 1
        GetRandomName D:提现文件提现时间.txt A243 3 1
        GetRandomName D:提现文件提现时间.txt A244 4 1
        GetRandomName D:提现文件提现时间.txt A245 5 1
        GetRandomName D:提现文件提现时间.txt A246 6 1
        GetRandomName D:提现文件提现时间.txt A247 7 1
        GetRandomName D:提现文件提现时间.txt A248 8 1
        GetRandomName D:提现文件提现时间.txt A249 9 1
        GetRandomName D:提现文件提现时间.txt A250 10 1
       
       
        #SAY
        ;服务器时间变量
            
         
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
        　　　　　
          
       
        　　　　　　　　　　　　　　　　　　
       
        [@InPutString11]
        #IF
        CHECKLEVELEX > 0
        #ACT
        DELAYGOTO 1 ~InPutString11
        [~InPutString11]
        #IF
        #ACT
        GOTO @提现
        BREAK
       
       
        [@InPutString12]
        #IF
        LARGE S12 49
        ;CHECKLEVELEX > 0
        #ACT
        DELAYGOTO 1 ~InPutString12
        #ELSEACT
        MESSAGEBOX 提现要求最低50元.
        MOV S12 0
        BREAK
        [~InPutString12]
        #IF
        LARGE S12 49
        #ACT
        GOTO @提现
        #ELSEACT
        MESSAGEBOX 提现要求最低50元.
        BREAK
       
       
       
        [@确认提现50]
        #IF
        CHECKGAMEGIRD ≥
        #ACT
        GAMEGIRD -
        GOTO @确认提现2
        BREAK
        #ELSEACT
        MESSAGEBOX 你的人民币点不足。
        BREAK
       
       
       
       
       
        [@确认提现2]
        #IF
        #ACT
        ;GetFileToVar D:提现文件提现名单.txt 1 S11 S12
        AddTextListEX  D:提现文件提现时间.txt 0 1
        AddTextListEX  D:提现文件提现名字.txt 0 1
        AddTextListEX  D:提现文件提现金额.txt 0 1
        AddTextListEX  D:提现文件提现支付宝.txt 0 1
        MESSAGEBOX 提现成功!请于23点后查看支付宝账户到账提示! 若有延迟，请耐心等待。
        SendCenterMsg 150 249 系统：恭喜玩家【】成功提现元人民币到支付宝账户。 1 15 3
        SendCenterMsg 150 249 系统：恭喜玩家【】成功提现元人民币到支付宝账户。 1 15 3
        SendCenterMsg 150 249 系统：恭喜玩家【】成功提现元人民币到支付宝账户。 1 15 3
        GOTO @提现
        BREAK