传奇私服
当前位置:首页 > 变态传奇 > 正文

东南西赌博系统

传奇东南西赌博系统

(@@InPutString @@InPutInteger)

[@MAIN]

#IF

ISADMIN

;CHECKVAR GLOBAL 赌城开关检测 1

#ACT

GOTO @赌城管理

BREAK

#IF

#ACT

OpenBigDialogBox 43

MOV N30 0

DIV N30 100 $GLOBAL(税收比例)

#SAY

刷新/@MAIN

#IF

ISADMIN

#SAY

        邀请赌徒/@@InPutString15 赌城管理/@赌城管理 返回土城/@返回土城\

#ELSESAY

              邀请赌徒/@@InPutString15 返回土城/@返回土城\

#IF

#SAY

 \

        【庄家名字】/SCOLOR=249:$GLOBAL(庄家名字)\

        【庄家本钱】/SCOLOR=249:{$GLOBAL(庄家本钱)/SCOLOR=249}元宝\

 \

             抢庄/@@InPutInteger11\

         庄家点数:/SCOLOR=45{$GLOBAL(庄家总体点数)/SCOLOR=5}点\

 \

 \

                             【庄家本钱】:/SCOLOR=249共 {$GLOBAL(庄家本钱)/SCOLOR=249} 元宝\

下注/@@InPutInteger12                 下注/@@InPutInteger13        【总计下注】:/SCOLOR=249共 {$GLOBAL(总体下注数)/SCOLOR=249} 元宝\

西家点数:/SCOLOR=45{$GLOBAL(西家总体点数)/SCOLOR=5}点         东家点数:/SCOLOR=45{$GLOBAL(东家总体点数)/SCOLOR=5}点\

                             【西总下注】:/SCOLOR=250共 {$GLOBAL(西家总下注)/SCOLOR=254} 元宝\

                             【南总下注】:/SCOLOR=250共 {$GLOBAL(南家总下注)/SCOLOR=254} 元宝\

                             【东总下注】:/SCOLOR=250共 {$GLOBAL(东家总下注)/SCOLOR=254} 元宝\

             下注/@@InPutInteger14\

         南家点数:/SCOLOR=45{$GLOBAL(南家总体点数)/SCOLOR=5}点\

{掉线、小退都将无法结算 每局收取赢家$STR(N30)%的手续费!/SCOLOR=249}\

我的下注:【西】:/SCOLOR=228{$STR(M18)/SCOLOR=250}元宝 【南】:/SCOLOR=228{$STR(M14)/SCOLOR=250}元宝 【东】:/SCOLOR=228{$STR(M13)/SCOLOR=250}元宝

[@赌城管理]

#IF

ISADMIN

#ACT

MOV N17 0

MOV N18 0

MOV N19 0

MOV N20 0

MOV N21 0

MOV N22 0

MOV N23 0

MOV N24 0

MOV N25 0

MOV N26 0

MOV N27 0

MOV N28 0

MOV N29 0

MOV N30 0

DIV N30 100 $GLOBAL(税收比例)

CALCVAR GLOBAL 赌博计时 = 46

SAVEVAR GLOBAL 赌博计时 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

SENDMSG 5 赌博已经开始,请GM您不要重新点NPC否则重新开始。

OpenBigDialogBox

#SAY

 \

 \

注意:设定骰子点数时,无论设置哪家,必须3个骰子都设定点数,并且点数必须在1-6点,否则无效!/SCOLOR=249\

 \

 位置/SCOLOR=249 一号骰子目前点数/SCOLOR=254 操作/SCOLOR=249 二号骰子目前点数/SCOLOR=254 操作/SCOLOR=249 二号骰子目前点数/SCOLOR=254 操作/SCOLOR=249\

 \

{【西家】  【$STR(G17)】/SCOLOR=250}点   『修改/@@InPutInteger17』  {【$STR(G18)】/SCOLOR=250}点   『修改/@@InPutInteger18』  {【$STR(G19)】/SCOLOR=250}点   『修改/@@InPutInteger19』\

 \

{【南家】  【$STR(G23)】/SCOLOR=253}点   『修改/@@InPutInteger23』  {【$STR(G24)】/SCOLOR=253}点   『修改/@@InPutInteger24』  {【$STR(G25)】/SCOLOR=253}点   『修改/@@InPutInteger25』\

 \

{【东家】  【$STR(G20)】/SCOLOR=254}点   『修改/@@InPutInteger20』  {【$STR(G21)】/SCOLOR=254}点   『修改/@@InPutInteger21』  {【$STR(G22)】/SCOLOR=254}点   『修改/@@InPutInteger22』\

 \

{【庄家】  【$STR(G26)】/SCOLOR=249}点   『修改/@@InPutInteger26』  {【$STR(G27)】/SCOLOR=249}点   『修改/@@InPutInteger27』  {【$STR(G28)】/SCOLOR=249}点   『修改/@@InPutInteger28』\

 \

目前税收比例为【{$STR(N30)%/SCOLOR=249}】   税收比例设置为【{$GLOBAL(税收比例)/SCOLOR=250}】   『修改/@@InPutInteger29』\

 \

[@CALLInPutInteger17]

#IF

新开传奇网站

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N17 0

SMALL N17 7

#ACT

MOV G17 $STR(N17)

CALCVAR GLOBAL 控制检测西家 + 1

SAVEVAR GLOBAL 控制检测西家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『西家一号骰子』点数成功.点数设置为$STR(N17)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger18]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N18 0

SMALL N18 7

#ACT

MOV G18 $STR(N18)

CALCVAR GLOBAL 控制检测西家 + 1

SAVEVAR GLOBAL 控制检测西家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『西家二号骰子』点数成功.点数设置为$STR(N18)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger19]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N19 0

SMALL N19 7

#ACT

MOV G19 $STR(N19)

CALCVAR GLOBAL 控制检测西家 + 1

SAVEVAR GLOBAL 控制检测西家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『西家三号骰子』点数成功.点数设置为$STR(N19)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger20]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N20 0

SMALL N20 7

#ACT

MOV G20 $STR(N20)

CALCVAR GLOBAL 控制检测东家 + 1

SAVEVAR GLOBAL 控制检测东家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『东家一号骰子』点数成功.点数设置为$STR(N20)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BRau私服EAK

[@CALLInPutInteger21]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N21 0

SMALL N21 7

#ACT

MOV G21 $STR(N21)

CALCVAR GLOBAL 控制检测东家 + 1

SAVEVAR GLOBAL 控制检测东家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『东家二号骰子』点数成功.点数设置为$STR(N21)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger22]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N22 0

SMALL N22 7

#ACT

MOV G22 $STR(N22)

CALCVAR GLOBAL 控制检测东家 + 1

SAVEVAR GLOBAL 控制检测东家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『东家三号骰子』点数成功.点数设置为$STR(N22)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger23]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N23 0

SMALL N23 7

#ACT

MOV G23 $STR(N23)

CALCVAR GLOBAL 控制检测南家 + 1

SAVEVAR GLOBAL 控制检测南家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『南家一号骰子』点数成功.点数设置为$STR(N23)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger24]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N24 0

SMALL N24 7

#ACT

MOV G24 $STR(N24)

CALCVAR GLOBAL 控制检测南家 + 1

SAVEVAR GLOBAL 控制检测南家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『南家二号骰子』点数成功.点数设置为$STR(N24)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger25]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N25 0

SMALL N25 7

#ACT

MOV G25 $STR(N25)

CALCVAR GLOBAL 控制检测南家 + 1

SAVEVAR GLOBAL 控制检测南家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『南家三号骰子』点数成功.点数设置为$STR(N25)点...

GOTO @赌城管理

BREAK

#ELSEA炎黄传奇CT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger26]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N26 0

SMALL N26 7

#ACT

MOV G26 $STR(N26)

CALCVAR GLOBAL 控制检测庄家 + 1

SAVEVAR GLOBAL 控制检测庄家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『庄家一号骰子』点数成功.点数设置为$STR(N26)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger27]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N27 0

SMALL N27 7

#ACT

MOV G27 $STR(N27)

CALCVAR GLOBAL 控制检测庄家 + 1

SAVEVAR GLOBAL 控制检测庄家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『庄家二号骰子』点数成功.点数设置为$STR(N27)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger28]

#IF

ISADMIN

#ACT

#ELSEACT

BREAK

#IF

LARGE N28 0

SMALL N28 7

#ACT

MOV G28 $STR(N28)

CALCVAR GLOBAL 控制检测庄家 + 1

SAVEVAR GLOBAL 控制检测庄家 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 5 设定『庄家三号骰子』点数成功.点数设置为$STR(N28)点...

GOTO @赌城管理

BREAK

#ELSEACT

GOTO @赌城管理

SENDMSG 5 设定点数必须在1-6点...

BREAK

[@CALLInPutInteger29]

#IF

ISADMIN

#ACT

CALCVAR GLOBAL 税收比例 = $STR(N29)

SAVEVAR GLOBAL 税收比例 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

DIV N30 100 $STR(N29)

SENDMSG 5 设定『税收比例』成功.比例设置为$STR(N30)%...

MOV N29 0

MOV N30 0

GOTO @赌城管理

BREAK

[@CALLInPutString15]

#IF

EQUAL S15 $USERNAME

#ACT

SENDMSG 7 无法邀请自己

MOV S15

GOTO @MAIN

BREAK

#IF

CheckOnline $STR(S15)

#ACT

MOV A45 $USERNAME

HCALL $STR(S15) @赌城邀请

GOTO @MAIN

SENDMSG 6 邀请信已经发出!

BREAK

#ELSEACT

SENDMSG 7 你要邀请的$STR(S15)玩家不在线,无法邀请

GOTO @MAIN

BREAK

[@返回土城]

#IF

#ACT

MapMove 3 330 330

BREAK

[@CALLInPutInteger11]

#IF

CHECKVAR GLOBAL 赌博计时 30

CHECKVAR GLOBAL 赌博计时 47

#ACT

#ELSEACT

MOV N11 0

MESSAGEBOX 抢庄时间已经结束,请等待开局......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

#ACT

MOV N11 0

MESSAGEBOX 你目前已经是庄家,无法重复坐庄......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\西家名单.TXT

#ACT

MOV N11 0

MESSAGEBOX 你已经下注压西家了,无法坐庄......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\东家名单.TXT

#ACT

MOV N11 0

MESSAGEBOX 你已经下注压东家了,无法坐庄......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\南家名单.TXT

#ACT

MOV N11 0

MESSAGEBOX 你已经下注压南家了,无法坐庄......

GOTO @MAIN

BREAK

#IF

SMALL N11 150

#ACT

MOV N11 0

MESSAGEBOX 坐庄最少需要150元宝以上......

GOTO @MAIN

BREAK

#IF

CHECKGAMEGOLD $STR(N11)

#ACT

MOV N11 0

MESSAGEBOX 你身上的元宝不足......

GOTO @MAIN

BREAK

#IF

CHECKVAR GLOBAL 庄家本钱 = 0

#ACT

GAMEGOLD - $STR(N11)

MAPMOVE TXDGA 9 10

CALCVAR GLOBAL 庄家检测 = 1

CALCVAR GLOBAL 庄家名字 = $USERNAME

CALCVAR GLOBAL 庄家本钱 = $STR(N11)

CALCVAR GLOBAL 庄家本钱1 = $STR(N11)

CALCVAR GLOBAL 庄家本钱2 = $STR(N11)

SAVEVAR GLOBAL 庄家检测 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家名字 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱2 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

AddNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

SENDMSG 4 『%S』使用($STR(N11))个元宝坐庄成功......

MESSAGEBOX 使用($STR(N11))个元宝坐庄成功......

MOV N11 0

GOTO @MAIN

BREAK

#IF

LARGE N11 $GLOBAL(庄家本钱)

#ACT

GMEXECUTE 调整元宝 $GLOBAL(庄家名字) + $GLOBAL(庄家本钱)

CLEARNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

GAMEGOLD - $STR(N11)

MOV S11 $GLOBAL(庄家名字)

S11.MAPMOVE TXDGA 12 10

MAPMOVE TXDGA 9 10

MOV S11

CALCVAR GLOBAL 庄家检测 = 1

CALCVAR GLOBAL 庄家名字 = $USERNAME

CALCVAR GLOBAL 庄家本钱 = $STR(N11)

CALCVAR GLOBAL 庄家本钱1 = $STR(N11)

CALCVAR GLOBAL 庄家本钱2 = $STR(N11)

SAVEVAR GLOBAL 庄家检测 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家名字 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 庄家本钱2 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

AddNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

SENDMSG 4 『%S』使用($STR(N11))个元宝抢庄成功......

MESSAGEBOX 使用($STR(N11))个元宝抢庄成功......

MOV N11 0

GOTO @MAIN

BREAK

#ELSEACT

MESSAGEBOX 你必须出多余($GLOBAL(庄家本钱))个元宝才能抢庄成功......

MOV N11 0

GOTO @MAIN

BREAK

[@CALLInPutInteger12]

#IF

CHECKVAR GLOBAL 赌博计时 0

CHECKVAR GLOBAL 赌博计时 31

#ACT

#ELSEACT

MOV N12 0

MESSAGEBOX 现在不是下注时间,请稍后......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

#ACT

MOV N12 0

MESSAGEBOX 你目前已将是庄家了,无法下注西家......

GOTO @MAIN

BREAK

#IF

SMALL N12 50

#ACT

MOV N12 0

MESSAGEBOX 下注西家最少需要50元宝以上......

GOTO @MAIN

BREAK

#IF

LARGE N12 $GLOBAL(庄家本钱1)

#ACT

MOV N12 0

MESSAGEBOX 下注总金额已经达到庄家本钱上限诛仙传奇\目前你只可以下注($GLOBAL(庄家本钱1))以下的元宝...

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\西家名单.TXT

CHECKGAMEGOLD $STR(N12)

#ACT

GAMEGOLD - $STR(N12)

INC M18 $STR(N12)

CALCVAR GLOBAL 庄家本钱1 - $STR(N12)

CALCVAR GLOBAL 西家总下注 + $STR(N12)

CALCVAR GLOBAL 总体下注数 + $STR(N12)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐神圣恳求庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 西家总下注 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 4 『%S』追加($STR(N12))个元宝下注西家.

MESSAGEBOX 你使用($STR(N12))个元宝追加下注西家.

MOV N12 0

GOTO @MAIN

BREAK

#IF

CHECKGAMEGOLD $STR(N12)

#ACT

GAMEGOLD - $STR(N12)

MOV M18 $STR(N12)

CALCVAR GLOBAL 庄家本钱1 - $STR(N12)

CALCVAR GLOBAL 西家总下注 + $STR(N12)

CALCVAR GLOBAL 总体下注数 + $STR(N12)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 西家总下注 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

AddNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\西家名单.TXT

SENDMSG 4 『%S』使用($STR(N12))个元宝下注西家.

MESSAGEBOX 你使用($STR(N12))个元宝下注西家.

MOV N12 0

GOTO @MAIN

BREAK

#ELSEACT

MESSAGEBOX 你身上的元宝不足.

MOV N12 0

GOTO @MAIN

BREAK

[@CALLInPutInteger13]

#IF

CHECKVAR GLOBAL 赌博计时 0

CHECKVAR GLOBAL 赌博计时 31

#ACT

#ELSEACT

MOV N13 0

MESSAGEBOX 现在不是下注时间,请稍后......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

#ACT

MOV N13 0

MESSAGEBOX 你目前已将是庄家了,无法下注东家......

GOTO @MAIN

BREAK

#IF

SMALL N13 50

#ACT

MOV N13 0

MESSAGEBOX 下注西家最少需要50元宝以上......

GOTO @MAIN

BREAK

#IF

LARGE N13 $GLOBAL(庄家本钱1)

#ACT

MOV N13 0

MESSAGEBOX 下注总金额已经达到庄家本钱上限\目前你只可以下注($GLOBAL(庄家本钱1))以下的元宝...

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\东家名单.TXT

CHECKGAMEGOLD $STR(N13)

#ACT

GAMEGOLD - $STR(N13)

INC M13 $STR(N13)

CALCVAR GLOBAL 庄家本钱1 - $STR(N13)

CALCVAR GLOBAL 东家总下注 + $STR(N13)

CALCVAR GLOBAL 总体下注数 + $STR(N13)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 东家总下注 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 4 『%S』追加($STR(N13))个元宝下注东家.

MESSAGEBOX 你使用($STR(N13))个元宝追加下注东家.

MOV N13 0

GOTO @MAIN

BREAK

#IF

CHECKGAMEGOLD $STR(N13)

#ACT

GAMEGOLD - $STR(N13)

MOV M13 $STR(N13)

CALCVAR GLOBAL 庄家本钱1 - $STR(N13)

CALCVAR GLOBAL 东家总下注 + $STR(N13)

CALCVAR GLOBAL 总体下注数 + $STR(N13)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 东家总下注 ..\QuestDiary\系列脚本\坐庄赌博最新网通传奇私服\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

AddNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\东家名单.TXT

SENDMSG 4 『%S』使用($STR(N13))个元宝下注东家.

MESSAGEBOX 你使用($STR(N13))个元宝下注东家.

MOV N13 0

GOTO @MAIN

BREAK

#ELSEACT

MESSAGEBOX 你身上的元宝不足.

MOV N13 0

GOTO @MAIN

BREAK

[@CALLInPutInteger14]

#IF

CHECKVAR GLOBAL 赌博计时 0

CHECKVAR GLOBAL 赌博计时 31

#ACT

#ELSEACT

MOV N14 0

MESSAGEBOX 现在不是下注时间,请稍后......

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\庄家名单.TXT

#ACT

MOV N14 0

MESSAGEBOX 你目前已将是庄家了,无法下注南家......

GOTO @MAIN

BREAK

#IF

SMALL N14 50

#ACT

MOV N14 0

MESSAGEBOX 下注西家最少需要50元宝以上......

GOTO @MAIN

BREAK

#IF

LARGE N14 $GLOBAL(庄家本钱1)

#ACT

MOV N14 0

MESSAGEBOX 下注总金额已经达到庄家本钱上限\目前你只可以下注($GLOBAL(庄家本钱1))以下的元宝...

GOTO @MAIN

BREAK

#IF

CheckNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\南家名单.TXT

CHECKGAMEGOLD $STR(N14)

#ACT

GAMEGOLD - $STR(N14)

INC M14 $STR(N14)

CALCVAR GLOBAL 庄家本钱1 - $STR(N14)

CALCVAR GLOBAL 南家总下注 + $STR(N14)

CALCVAR GLOBAL 总体下注数 + $STR(N14)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 南家总下注 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SENDMSG 4 『%S』追加($STR(N14))个元宝下注南家.

MESSAGEBOX 你使用($STR(N14))个元宝追加下注南家.

MOV N14 0

GOTO @MAIN

BREAK

#IF

CHECKGAMEGOLD $STR(N14)

#ACT

GAMEGOLD - $STR(N14)

MOV M14 $STR(N14)

CALCVAR GLOBAL 庄家本钱1 - $STR(N14)

CALCVAR GLOBAL 南家总下注 + $STR(N14)

CALCVAR GLOBAL 总体下注数 + $STR(N14)

SAVEVAR GLOBAL 庄家本钱1 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 南家总下注 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

SAVEVAR GLOBAL 总体下注数 ..\QuestDiary\系列脚本\坐庄赌博\自定义全局变量数据.txt

AddNAMELIST ..\QuestDiary\系列脚本\坐庄赌博\南家名单.TXT

SENDMSG 4 『%S』使用($STR(N14))个元宝下注南家.

MESSAGEBOX 你使用($STR(N14))个元宝下注南家.

MOV N14 0

GOTO @MAIN

BREAK

#ELSEACT

MESSAGEBOX 你身上的元宝不足.

MOV N14 0

GOTO @MAIN

BREAK

[@IsInFilterList]

#IF

#ACT

MESSAGEBOX [错误]:输入数据中包含了非法字符,请重新编辑!

  

传奇私服
CopyRight 2013-2015 Powered by 3000ok All Right Reserved .免责声明:如有侵犯版权之处,我们将会在第一时间删除!网站地图
注:本站所有信息均来自互联网,请用户确认避免上当受骗! 3000ok为国内最专业的热血传奇资讯网站之一。手机