传奇健康小游戏脚本

[@main]

介绍：此游戏规则取自Mazera中的找配对。

应用在传奇游戏中，是逼上梁山的原创。

游戏很简单，16个方块点击翻开，

连续翻开两个相同的方块即消掉，

当错误到第五次时就宣告游戏失败。

< 开 始 /@开始> <当前排名/@当前排名>

[@当前排名]

当前最高记录保持者排名分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<开始挑战/@开始> <离 开/@EXIT>

[@开始]

#IF

#ACT

CreateFile .QuestDiary数据文件找配对<$USERNAME>.txt

CLEARNAMELIST ..QuestDiary数据文件找配对<$USERNAME>.txt

MOV M50 0

GOTO @开始筹备

[@开始筹备]

#IF

EQUAL M50 4

#ACT

MOV M50 0

MOV S81

GOTO @找配对布版

BREAK

#ELSEACT

GetRandomText .QuestDiary数据文件找配对图码.txt S81

#IF

CheckTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

#ACT

GOTO @开始筹备

#ELSEACT

AddTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

AddTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

AddTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

AddTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

INC M50 1

GOTO @开始筹备

[@找配对布版]

#IF

EQUAL S62

#ELSEACT

MOV M10 0

SENDMSG 6 你因上一局未能完成游戏，所以过关数已清零

#IF

#ACT

MOV M60 5

MOV M40 0

MOV S61 <■/@位置1>

MOV S62 <■/@位置2>

MOV S63 <■/@位置3>

MOV S64 <■/@位置4>

MOV S65 <■/@位置5>

MOV S66 <■/@位置6>

MOV S67 <■/@位置7>

MOV S68 <■/@位置8>

MOV S69 <■/@位置9>

MOV S70 <■/@位置10>

MOV S71 <■/@位置11>

MOV S72 <■/@位置12>

MOV S73 <■/@位置13>

MOV S74 <■/@位置14>

MOV S75 <■/@位置15>

MOV S76 <■/@位置16>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S81

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S81)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S82

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S82)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S83

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S83)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S84

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S84)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S85

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S85)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S86

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S86)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S87

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S87)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S88

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S88)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S89

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S89)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S90

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S90)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S91

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S91)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S92

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S92)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S93

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S93)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S94

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S94)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S95

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S95)>

GetRandomText .QuestDiary数据文件找配对<$USERNAME>.txt S96

DelTextList .QuestDiary数据文件找配对<$USERNAME>.txt <$STR(S96)>

goto @游戏找配对

[@游戏找配对]

点击下列“■”，找出两个相同图案即消掉，有5次错误机会。

过关数：<$STR(M10)>关

机会：<$STR(M60)>　

　　　　　　<$STR(S61)>　<$STR(S62)>　<$STR(S63)>　<$STR(S64)>

　　　　　　<$STR(S65)>　<$STR(S66)>　<$STR(S67)>　<$STR(S68)>

　　　　　　<$STR(S69)>　<$STR(S70)>　<$STR(S71)>　<$STR(S72)>

　　　　　　<$STR(S73)>　<$STR(S74)>　<$STR(S75)>　<$STR(S76)>　

< 不玩了 /@不玩了>

[@位置1]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S61)>

MOV M70 1

MOV S61 <$STR(S81)>

MOV S78 <$STR(S81)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S61)>

MOV M13 1

MOV S61 <$STR(S81)>

MOV S80 <$STR(S81)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置2]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S62)>

MOV M70 2

MOV S62 <$STR(S82)>

MOV S78 <$STR(S82)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S62)>

MOV M13 2

MOV S62 <$STR(S82)>

MOV S80 <$STR(S82)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置3]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S63)>

MOV M70 3

MOV S63 <$STR(S83)>

MOV S78 <$STR(S83)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S63)>

MOV M13 3

MOV S63 <$STR(S83)>

MOV S80 <$STR(S83)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置4]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S64)>

MOV M70 4

MOV S64 <$STR(S84)>

MOV S78 <$STR(S84)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S64)>

MOV M13 4

MOV S64 <$STR(S84)>

MOV S80 <$STR(S84)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置5]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S65)>

MOV M70 5

MOV S65 <$STR(S85)>

MOV S78 <$STR(S85)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S65)>

MOV M13 5

MOV S65 <$STR(S85)>

MOV S80 <$STR(S85)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置6]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S66)>

MOV M70 6

MOV S66 <$STR(S86)>

MOV S78 <$STR(S86)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S66)>

MOV M13 6

MOV S66 <$STR(S86)>

MOV S80 <$STR(S86)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置7]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S67)>

MOV M70 7

MOV S67 <$STR(S87)>

MOV S78 <$STR(S87)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S67)>

MOV M13 7

MOV S67 <$STR(S87)>

MOV S80 <$STR(S87)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置8]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S68)>

MOV M70 8

MOV S68 <$STR(S88)>

MOV S78 <$STR(S88)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S68)>

MOV M13 8

MOV S68 <$STR(S88)>

MOV S80 <$STR(S88)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置9]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S69)>

MOV M70 9

MOV S69 <$STR(S89)>

MOV S78 <$STR(S89)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S69)>

MOV M13 9

MOV S69 <$STR(S89)>

MOV S80 <$STR(S89)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置10]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S70)>

MOV M70 10

MOV S70 <$STR(S90)>

MOV S78 <$STR(S90)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S70)>

MOV M13 10

MOV S70 <$STR(S90)>

MOV S80 <$STR(S90)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置11]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S71)>

MOV M70 11

MOV S71 <$STR(S91)>

MOV S78 <$STR(S91)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S71)>

MOV M13 11

MOV S71 <$STR(S91)>

MOV S80 <$STR(S91)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置12]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S72)>

MOV M70 12

MOV S72 <$STR(S92)>

MOV S78 <$STR(S92)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S72)>

MOV M13 12

MOV S72 <$STR(S92)>

MOV S80 <$STR(S92)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置13]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S73)>

MOV M70 13

MOV S73 <$STR(S93)>

MOV S78 <$STR(S93)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S73)>

MOV M13 13

MOV S73 <$STR(S93)>

MOV S80 <$STR(S93)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置14]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S74)>

MOV M70 14

MOV S74 <$STR(S94)>

MOV S78 <$STR(S94)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S74)>

MOV M13 14

MOV S74 <$STR(S94)>

MOV S80 <$STR(S94)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置15]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S75)>

MOV M70 15

MOV S75 <$STR(S95)>

MOV S78 <$STR(S95)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S75)>

MOV M13 15

MOV S75 <$STR(S95)>

MOV S80 <$STR(S95)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@位置16]

#IF

EQUAL M40 0

#ELSEACT

BREAK

#IF

EQUAL M20 0

#ACT

MOV M20 1

MOV S77 <$STR(S76)>

MOV M70 16

MOV S76 <$STR(S96)>

MOV S78 <$STR(S96)>

GOTO @游戏找配对

BREAK

#ELSEACT

MOV S79 <$STR(S76)>

MOV M13 16

MOV S76 <$STR(S96)>

MOV S80 <$STR(S96)>

MOV M40 1

#IF

EQUAL S78 <$STR(S80)>

#ACT

DelayCall 1200 @判别一致

GOTO @游戏找配对

#ELSEACT

DelayCall 1200 @判别有异

GOTO @游戏找配对

[@判别一致]

#IF

EQUAL S78 <$STR(S80)>

#ACT

INC M50 1

#ELSEACT

SENDMSG 6 出错了！请将此屏截图到我们论坛举报，论坛地址：http://www.7seyu.cn/7bbs/

BREAK

#IF

EQUAL M50 8

#ACT

INC M10 1

GOTO @清除所有变量

#SAY

恭喜你全部找出来了，你现在已经过了<$STR(M10)>关。

当前最高记录保持者分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

当你游戏结束时候你的记录才会纳入排名榜，你可选择继续挑战。

<继续挑战/@开始> < 不玩了 /@不玩了>

#ELSEACT

goto @判断一致消除

[@判断一致消除]

#IF

EQUAL M70 0

#ACT

SENDMSG 6 ·出错了！请将此屏截图到我们论坛举报，论坛地址：http://www.7seyu.cn/7bbs/

BREAK

#IF

EQUAL M13 0

#ACT

SENDMSG 6 ··出错了！请将此屏截图到我们论坛举报，论坛地址：http://www.7seyu.cn/7bbs/

BREAK

#IF

EQUAL M70 1

#ACT

MOV S61 　

#IF

EQUAL M70 2

#ACT

MOV S62 　

#IF

EQUAL M70 3

#ACT

MOV S63 　

#IF

EQUAL M70 4

#ACT

MOV S64 　

#IF

EQUAL M70 5

#ACT

MOV S65 　

#IF

EQUAL M70 6

#ACT

MOV S66 　

#IF

EQUAL M70 7

#ACT

MOV S67 　

#IF

EQUAL M70 8

#ACT

MOV S68 　

#IF

EQUAL M70 9

#ACT

MOV S69 　

#IF

EQUAL M70 10

#ACT

MOV S70 　

#IF

EQUAL M70 11

#ACT

MOV S71 　

#IF

EQUAL M70 12

#ACT

MOV S72 　

#IF

EQUAL M70 13

#ACT

MOV S73 　

#IF

EQUAL M70 14

#ACT

MOV S74 　

#IF

EQUAL M70 15

#ACT

MOV S75 　

#IF

EQUAL M70 16

#ACT

MOV S76 　

#IF

#ACT

GOTO @判断一致继续消除

[@判断一致继续消除]

#IF

EQUAL M13 1

#ACT

MOV S61 　

#IF

EQUAL M13 2

#ACT

MOV S62 　

#IF

EQUAL M13 3

#ACT

MOV S63 　

#IF

EQUAL M13 4

#ACT

MOV S64 　

#IF

EQUAL M13 5

#ACT

MOV S65 　

#IF

EQUAL M13 6

#ACT

MOV S66 　

#IF

EQUAL M13 7

#ACT

MOV S67 　

#IF

EQUAL M13 8

#ACT

MOV S68 　

#IF

EQUAL M13 9

#ACT

MOV S69 　

#IF

EQUAL M13 10

#ACT

MOV S70 　

#IF

EQUAL M13 11

#ACT

MOV S71 　

#IF

EQUAL M13 12

#ACT

MOV S72 　

#IF

EQUAL M13 13

#ACT

MOV S73 　

#IF

EQUAL M13 14

#ACT

MOV S74 　

#IF

EQUAL M13 15

#ACT

MOV S75 　

#IF

EQUAL M13 16

#ACT

MOV S76 　

#IF

#ACT

MOV M40 0

MOV M70 0

MOV M13 0

MOV M20 0

MOV S77

MOV S79

GOTO @游戏找配对

[@判别有异]

#IF

EQUAL M70 0

#ACT

SENDMSG 6 。出错了！请将此屏截图到我们论坛举报，论坛地址：http://www.7seyu.cn/7bbs/

BREAK

#IF

EQUAL M13 0

#ACT

SENDMSG 6 。。出错了！请将此屏截图到我们论坛举报，论坛地址：http://www.7seyu.cn/7bbs/

BREAK

#IF

EQUAL M70 1

#ACT

MOV S61 <$STR(S77)>

#IF

EQUAL M70 2

#ACT

MOV S62 <$STR(S77)>

#IF

EQUAL M70 3

#ACT

MOV S63 <$STR(S77)>

#IF

EQUAL M70 4

#ACT

MOV S64 <$STR(S77)>

#IF

EQUAL M70 5

#ACT

MOV S65 <$STR(S77)>

#IF

EQUAL M70 6

#ACT

MOV S66 <$STR(S77)>

#IF

EQUAL M70 7

#ACT

MOV S67 <$STR(S77)>

#IF

EQUAL M70 8

#ACT

MOV S68 <$STR(S77)>

#IF

EQUAL M70 9

#ACT

MOV S69 <$STR(S77)>

#IF

EQUAL M70 10

#ACT

MOV S70 <$STR(S77)>

#IF

EQUAL M70 11

#ACT

MOV S71 <$STR(S77)>

#IF

EQUAL M70 12

#ACT

MOV S72 <$STR(S77)>

#IF

EQUAL M70 13

#ACT

MOV S73 <$STR(S77)>

#IF

EQUAL M70 14

#ACT

MOV S74 <$STR(S77)>

#IF

EQUAL M70 15

#ACT

MOV S75 <$STR(S77)>

#IF

EQUAL M70 16

#ACT

MOV S76 <$STR(S77)>

#IF

#ACT

goto @判别继续有异

[@判别继续有异]

#IF

EQUAL M13 1

#ACT

MOV S61 <$STR(S79)>

#IF

EQUAL M13 2

#ACT

MOV S62 <$STR(S79)>

#IF

EQUAL M13 3

#ACT

MOV S63 <$STR(S79)>

#IF

EQUAL M13 4

#ACT

MOV S64 <$STR(S79)>

#IF

EQUAL M13 5

#ACT

MOV S65 <$STR(S79)>

#IF

EQUAL M13 6

#ACT

MOV S66 <$STR(S79)>

#IF

EQUAL M13 7

#ACT

MOV S67 <$STR(S79)>

#IF

EQUAL M13 8

#ACT

MOV S68 <$STR(S79)>

#IF

EQUAL M13 9

#ACT

MOV S69 <$STR(S79)>

#IF

EQUAL M13 10

#ACT

MOV S70 <$STR(S79)>

#IF

EQUAL M13 11

#ACT

MOV S71 <$STR(S79)>

#IF

EQUAL M13 12

#ACT

MOV S72 <$STR(S79)>

#IF

EQUAL M13 13

#ACT

MOV S73 <$STR(S79)>

#IF

EQUAL M13 14

#ACT

MOV S74 <$STR(S79)>

#IF

EQUAL M13 15

#ACT

MOV S75 <$STR(S79)>

#IF

EQUAL M13 16

#ACT

MOV S76 <$STR(S79)>

#IF

EQUAL M60 1

#ACT

DEC M60 1

GOTO @游戏排名

#ELSEACT

DEC M60 1

MOV M40 0

MOV M70 0

MOV M13 0

MOV M20 0

MOV S77

MOV S79

GOTO @游戏找配对

[@游戏排名]

#IF

SMALL M10 <$STR(G23)>

#SAY

很遗憾你失败了，请下次再接再厉。

当前最高记录保持者分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<继续挑战/@开始> <离 开/@EXIT>

#ACT

MOV M10 0

GOTO @清除所有变量

BREAK

#IF

EQUAL M10 <$STR(G23)>

#SAY

很遗憾你失败了，请下次再接再厉。

当前最高记录保持者分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<继续挑战/@开始> <离 开/@EXIT>

#ACT

MOV M10 0

GOTO @清除所有变量

BREAK

#IF

LARGE M10 <$STR(G21)>

#ACT

MOV A23 <$STR(A22)>

MOV G23 <$STR(G22)>

MOV A22 <$STR(A21)>

MOV G22 <$STR(G21)>

MOV A21 <$USERNAME>

MOV G21 <$STR(M10)>

SENDMSG 0 恭喜玩家<$USERNAME>以过了<$STR(M10)>关的成绩成为游戏《找配对》冠军。

MOV M10 0

#SAY

这局游戏你已失败，但恭喜你打破世界记录取得冠军位置。

当前最高记录保持者排名分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<继续挑战/@开始> <离 开/@EXIT>

#IF

LARGE M10 <$STR(G22)>

#ACT

MOV A23 <$STR(A22)>

MOV G23 <$STR(G22)>

MOV A22 <$USERNAME>

MOV G22 <$STR(M10)>

SENDMSG 0 恭喜玩家<$USERNAME>以过了<$STR(M10)>关的成绩晋级游戏《找配对》亚军。

MOV M10 0

#SAY

这局游戏你已失败，但恭喜你进入世界记录排行榜取得亚军位置。

当前最高记录保持者排名分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<继续挑战/@开始> <离 开/@EXIT>

#IF

LARGE M10 <$STR(G23)>

#ACT

MOV A22 <$USERNAME>

MOV G22 <$STR(M10)>

SENDMSG 0 恭喜玩家<$USERNAME>以过了<$STR(M10)>关的成绩晋级游戏《找配对》季军。

MOV M10 0

#SAY

这局游戏你已失败，但恭喜你进入世界记录排行榜取得季军位置。

当前最高记录保持者排名分别是：

排第一名的是玩家：<$STR(A21)> 过了<$STR(G21)>关

排第二名的是玩家：<$STR(A22)> 过了<$STR(G22)>关

排第三名的是玩家：<$STR(A23)> 过了<$STR(G23)>关

<继续挑战/@开始> <离 开/@EXIT>

[@清除所有变量]

#IF

#ACT

CLEARNAMELIST ..QuestDiary数据文件找配对<$USERNAME>.txt

MOV M20 0

MOV M70 0

MOV M13 0

MOV M40 0

MOV M50 0

MOV M60 0

MOV S61

MOV S62

MOV S63

MOV S64

MOV S65

MOV S66

MOV S67

MOV S68

MOV S69

MOV S70

MOV S71

MOV S72

MOV S73

MOV S74

MOV S75

MOV S76

MOV S77

MOV S78

MOV S79

MOV S80

MOV S81

MOV S82

MOV S83

MOV S84

MOV S85

MOV S86

MOV S87

MOV S88

MOV S89

MOV S90

MOV S91

MOV S92

MOV S93

MOV S94

MOV S95

MOV S96

[@不玩了]

#if

#act

CLEARNAMELIST ..QuestDiary数据文件找配对<$USERNAME>.txt

MOV M20 0

MOV M70 0

MOV M13 0

MOV M40 0

MOV M50 0

MOV M60 0

MOV S61

MOV S62

MOV S63

MOV S64

MOV S65

MOV S66

MOV S67

MOV S68

MOV S69

MOV S70

MOV S71

MOV S72

MOV S73

MOV S74

MOV S75

MOV S76

MOV S77

MOV S78

MOV S79

MOV S80

MOV S81

MOV S82

MOV S83

MOV S84

MOV S85

MOV S86

MOV S87

MOV S88

MOV S89

MOV S90

MOV S91

MOV S92

MOV S93

MOV S94

MOV S95

MOV S96

close