[@猜点数]
{
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
┆ ○ ┆ ┆ ○ ┆ ┆ ○ ┆ ○ ○ ┆\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择点数> ┆ 开始猜点 ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
[@1点]
#ACT
MOV P0 1
BREAK
GOTO @已选择
[@2点]
#ACT
MOV P0 2
BREAK
GOTO @已选择
[@3点]
#ACT
MOV P0 3
BREAK
GOTO @已选择
[@4点]
#ACT
MOV P0 4
BREAK
GOTO @已选择
[@5点]
#ACT
MOV P0 5
BREAK
GOTO @已选择
[@6点]
#ACT
MOV P0 6
BREAK
GOTO @已选择
[@已选择]
#IF
EQUAL P0 1
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
┆ ● ┆ ┆ ○ ┆ ┆ ○ ┆ ○ ○ ┆\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
;游龙 -技术交流QQ57168666
#IF
EQUAL P0 2
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ● ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
┆ ○ ┆ ┆ ○ ┆ ┆ ○ ┆ ○ ○ ┆\\
┆ ┆ ● ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P0 3
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ● ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
┆ ○ ┆ ┆ ● ┆ ┆ ○ ┆ ○ ○ ┆\\
┆ ┆ ○ ┆ ● ┆ ○ ○ ┆ ○ ○ ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P0 4
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ○ ┆ ● ● ┆ ○ ○ ┆ ○ ○ ┆\\
┆ ○ ┆ ┆ ○ ┆ ┆ ○ ┆ ○ ○ ┆\\
┆ ┆ ○ ┆ ○ ┆ ● ● ┆ ○ ○ ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P0 5
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ● ● ┆ ○ ○ ┆\\
┆ ○ ┆ ┆ ○ ┆ ┆ ● ┆ ○ ○ ┆\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ● ● ┆ ○ ○ ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P0 6
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ● ● ┆\\
┆ ○ ┆ ┆ ○ ┆ ┆ ○ ┆ ● ● ┆\\
┆ ┆ ○ ┆ ○ ┆ ○ ○ ┆ ○ ○ ┆ ● ● ┆\\
╟┄┄┴┄┄┴┄┄┴┄┄┄-┴┄┄┄┄┴┄┄┄-╢\\
┆ <1/@1点> ┆ <2/@2点> ┆ <3/@3点> ┆ <4/@4点> ┆ <5/@5点> ┆ <6/@6点> ┆\\
╟┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\\
┆ 中奖提示：<请选择开始> ┆ <开始猜点/@开始猜点> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
[@开始猜点]
#IF
CHECKGAMEGOLD > 0
#ACT
GAMEGOLD - 1
MOVR P1 1 7
GOTO @生成数据
#ELSESAY
你的元宝不够！\\
<关闭/@EXIT>
[@生成数据]
#IF
EQUAL P0 <$STR(P1)>
#ACT
GAMEGOLD + 2
MOV S1 恭喜您：猜对了
MOV S2 奖金：[元宝:2]
GOTO @显示结果
#ELSEACT
MOV S1 很遗憾，猜错了
MOV S2 奖金：[元宝:0]
GOTO @显示结果
[@显示结果]
#IF
EQUAL P1 1
#SAY
;游龙 -技术交流QQ57168666
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ┆\\
┆ ● ┆\\
┆ ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
;游龙 -技术交流QQ57168666
#IF
EQUAL P1 2
#SAY
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ● ┆\\
┆ ┆\\
┆ ● ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P1 3
#SAY
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ● ┆\\
┆ ● ┆\\
┆ ● ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P1 4
#SAY
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ● ● ┆\\
┆ ┆\\
┆ ● ● ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P1 5
#SAY
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ● ● ┆\\
┆ ● ┆\\
┆ ● ● ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
#IF
EQUAL P1 6
#SAY
╔┄┄┄┄┄╗\\
┆ 本盘点数 ┆\\
╟┄┄┄┄┄╢\\
┆ ● ● ┆\\
┆ ● ● ┆\\
┆ ● ● ┆\\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\\
┆ <$STR(S1)> ┆ <$STR(S2)> ┆\\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\\
}
评论