|
|
默认地图是GA1
如换地图，请自己修改
QM：
[@摇色子]
#if
IsOnMap GA1
#act
MOV d0 <$STR(G198)>
playdice 1 @cube_cds-1
#say
.\正在摇骰子....
[@cube_cds-1]
#IF
check [030] 1
equal d0 1
LARGE N1 0
#ACT
set [030] 0
MUL N12 <$STR(N1)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [030] 1
equal d0 2
LARGE N1 0
#ACT
set [030] 0
MUL N12 <$STR(N1)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [030] 1
equal d0 3
LARGE N2 0
#ACT
set [030] 0
MUL N12 <$STR(N2)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [030] 1
equal d0 4
LARGE N2 0
#ACT
set [030] 0
MUL N12 <$STR(N2)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [030] 1
equal d0 5
LARGE N3 0
#ACT
set [030] 0
MUL N12 <$STR(N3)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [030] 1
equal d0 6
LARGE N3 0
#ACT
set [030] 0
MUL N12 <$STR(N3)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 1
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 2
LARGE N4 0
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 3
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 4
LARGE N4 0
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 5
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [032] 1
equal d0 6
LARGE N4 1
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
本帖隐藏的内容
#IF
check [031] 1
equal d0 1
LARGE N6 0
#ACT
set [031] 0
MUL N12 <$STR(N6)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N6)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N6)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [031] 1
equal d0 2
LARGE N7 0
#ACT
set [031] 0
MUL N12 <$STR(N7)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N7)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N7)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [031] 1
equal d0 3
LARGE N8 0
#ACT
set [031] 0
MUL N12 <$STR(N8)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N8)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N8)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [031] 1
equal d0 4
LARGE N9 0
#ACT
set [031] 0
MUL N12 <$STR(N9)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N9)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N9)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [031] 1
equal d0 5
LARGE N10 0
#ACT
set [031] 0
MUL N12 <$STR(N10)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N10)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N10)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#IF
check [031] 1
equal d0 6
LARGE N11 0
#ACT
set [031] 0
MUL N12 <$STR(N11)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在猜猜过程中，用<$STR(N11)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N11)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
#ELSEact
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 7 很遗憾,没有摇到你需要的点数.你可以重新下注了！
break
close
[@再接再厉]
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 5 您当前的元宝为：<$GAMEGOLD>个.你可以继续押注了.
break
close
NPC脚本
(@@InPutInteger)
[@main]
#IF
ISADMIN
#say
-------------------拥有元宝数{<$GAMEGOLD>}-----------------\
<切记：每局只能押一次.第二次押注将作废所有押注！/AUTOCOLOR=253,245> \
<赔率6倍>：【<①/@@InPutInteger6>】【<②/@@InPutInteger7>】【<③/@@InPutInteger8>】【<④/@@InPutInteger9>】【<⑤/@@InPutInteger10>】【<⑥/@@InPutInteger11>】\
<赔率3倍>：【<大/@@InPutInteger3>】【<中/@@InPutInteger2>】【<小/@@InPutInteger1>】 ①②为小,③④为中,⑤⑥为大\
<赔率2倍>：【<单/@@InPutInteger5>】【<双/@@InPutInteger4>】 ①③⑤为单,②④⑥为双\ \
说明：点击您要竞猜的数字，输入您要下注的金额，按确定..\
压住离手还剩下<$STR(G203)>秒,请要下注的朋友速度哦\
<刷新一下/@main> <游戏规则/@游戏规则> <返回土城/@土城>
#elsesay
-------------------拥有元宝数{<$GAMEGOLD>}-----------------\
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注/AUTOCOLOR=253,245> \
<赔率6倍>：【<①/@@InPutInteger6>】【<②/@@InPutInteger7>】【<③/@@InPutInteger8>】【<④/@@InPutInteger9>】【<⑤/@@InPutInteger10>】【<⑥/@@InPutInteger11>】\
<赔率3倍>：【<大/@@InPutInteger3>】【<中/@@InPutInteger2>】【<小/@@InPutInteger1>】 ①②为小,③④为中,⑤⑥为大\
<赔率2倍>：【<单/@@InPutInteger5>】【<双/@@InPutInteger4>】 ①③⑤为单,②④⑥为双\ \
说明：点击您要竞猜的数字，输入您要下注的金额，按确定..\
压住离手还剩下<$STR(G203)>秒,请要下注的朋友速度哦\
<刷新一下/@main> <游戏规则/@游戏规则> <返回土城/@土城> \
[@土城]
#act
mapmove 3 333 332
[@游戏规则]
.\
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注>\.\
押注数额是1-20000元宝\
每次猜中扣除5%的手续费\
所有在这个地图的人摇的点数都是一样的\
[@InPutInteger1]
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
Goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger1
[~InPutInteger1]
#IF
LARGE N1 20000
#ACT
MOV N1 0
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N1 1
#ACT
MOV N1 0
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N1)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N1)>
set [030] 1
sendmsg 4 [%s]压小[<$STR(N1)>元宝]，赔率3倍
break
close
;=======================================小==============================================
[@InPutInteger2]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger2
[~InPutInteger2]
#IF
LARGE N2 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N2 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N2)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N2)>
set [030] 1
sendmsg 4 [%s]压中[<$STR(N2)>元宝]，赔率3倍
break
close
;=======================================中==============================================
[@InPutInteger3]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger3
[~InPutInteger3]
#IF
LARGE N3 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N3 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N3)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N3)>
set [030] 1
sendmsg 4 [%s]压大[<$STR(N3)>元宝]，赔率3倍
break
close
;=======================================大==============================================
[@InPutInteger4]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger4
[~InPutInteger4]
#IF
LARGE N4 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N4 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N4)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N4)>
set [032] 1
sendmsg 4 [%s]压双[<$STR(N4)>元宝]，赔率2倍
break
close
;=======================================双==============================================
[@InPutInteger5]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger5
[~InPutInteger5]
#IF
LARGE N5 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N5 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N5)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N5)>
set [032] 1
sendmsg 4 [%s]压单[<$STR(N5)>元宝]，赔率2倍
break
close
;=======================================单==============================================
[@InPutInteger6]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger6
[~InPutInteger6]
#IF
LARGE N6 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N6 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N6)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N6)>
set [031] 1
sendmsg 4 [%s]压数字①[<$STR(N6)>元宝]，赔率6倍
break
close
;=======================================数字1==============================================
[@InPutInteger7]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger7
[~InPutInteger7]
#IF
LARGE N7 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N7 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N7)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N7)>
set [031] 1
sendmsg 4 [%s]压数字②[<$STR(N7)>元宝]，赔率6倍
break
close
;=======================================数字2==============================================
[@InPutInteger8]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger8
[~InPutInteger8]
#IF
LARGE N8 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N8 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N8)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N8)>
set [031] 1
sendmsg 4 [%s]压数字③[<$STR(N8)>元宝]，赔率6倍
break
close
;=======================================数字3==============================================
[@InPutInteger9]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger9
[~InPutInteger9]
#IF
LARGE N9 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N9 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N9)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N9)>
set [031] 1
sendmsg 4 [%s]压数字④[<$STR(N9)>元宝]，赔率6倍
break
close
;=======================================数字4==============================================
[@InPutInteger10]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger10
[~InPutInteger10]
#IF
LARGE N10 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N10 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N10)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N10)>
set [031] 1
sendmsg 4 [%s]压数字⑤[<$STR(N10)>元宝]，赔率6倍
break
close
;=======================================数字5==============================================
[@InPutInteger11]
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [032] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
check [031] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注
goto @押注作废
break
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger11
[~InPutInteger11]
#IF
LARGE N11 20000
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
SMALL N11 1
#ACT
MESSAGEBOX [提示]：押注失败,请输入1-20000之间的数值！
goto @押注作废
BREAK
#IF
CHECKGAMEGOLD < <$STR(N11)>
#ACT
messagebox [提示]：元宝不足
goto @押注作废
#ELSEact
GAMEGOLD - <$STR(N11)>
set [031] 1
sendmsg 4 [%s]压数字⑥[<$STR(N11)>元宝]，赔率6倍
break
close
;=======================================数字6==============================================
[@押注作废]
#act
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
goto @main
机器人脚本：
1：AutoRunRobot.txt 文档下
#AutoRun NPC SEC 64 @开始猜猜A
#AutoRun NPC SEC 1 @押注倒计时A
2：RobotManage.txt 文档下
[@开始猜猜A]
#act
MOV G203 60
MOV G204 1
break
[@押注倒计时A]
#if
EQUAL G203 0
EQUAL G204 1
#act
MOV G204 0
movr G198 1 7
Gmexecute StartQuest @摇色子
break
#if
EQUAL G204 1
#act
DEC G203 1
break |
|
发表于 2022-8-11 20:48:24
