加密文件.txt

企业版传奇世界本

CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 46
#ACT
CALCVAR HUMAN SCL = 210000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 47
#ACT
CALCVAR HUMAN SCL = 290000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 48
#ACT
CALCVAR HUMAN SCL = 390000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 49
#ACT
CALCVAR HUMAN SCL = 550000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 50
#ACT
CALCVAR HUMAN SCL = 830000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 51
#ACT
CALCVAR HUMAN SCL = 1390000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 52
#ACT
CALCVAR HUMAN SCL = 2110000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 53
#ACT
CALCVAR HUMAN SCL = 3710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 54
#ACT
CALCVAR HUMAN SCL = 6910000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 55
#ACT
CALCVAR HUMAN SCL = 13310000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 56
#ACT
CALCVAR HUMAN SCL = 19710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 57
#ACT
CALCVAR HUMAN SCL = 43710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 58
#ACT
CALCVAR HUMAN SCL = 91710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 59
#ACT
CALCVAR HUMAN SCL = 187710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 60
#ACT
CALCVAR HUMAN SCL = 327710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 61
#ACT
CALCVAR HUMAN SCL = 587710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 62
#ACT
CALCVAR HUMAN SCL = 967710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break
#IF
CHECKLEVELEX = 63
#ACT
CALCVAR HUMAN SCL = 1557710000
CALCVAR HUMAN SCL + $EXP
MOV S3 $HUMAN(SCL)
CALCVAR HUMAN SCL - $HUMAN(QMC)
CALCVAR HUMAN QMJ = $HUMAN(SCL)
SAVEVAR HUMAN QMJ ..\QuestDiary\数据文件\QMJ.txt
delnamelist ..\QuestDiary\数据文件\QMCMD.txt
SENDMSG 7 [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！[60级前可重复申请参加]
SENDMSG 5 你比赛开始时登记经验是：[<$HUMAN(QMC)>]，当前经验是[<$STR(S3)>]，你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]！
messagebox [全民冲级比赛结束]：你参加的1小时全民冲级比赛时间到了！\　\你本次比赛1小时所练经验是[<$HUMAN(QMJ)>]点
GOTO @QMCJJCPML
break

[@QMCJJCPML]
#IF
CHECKVAR HUMAN QMJ > 10
#ACT
#CALL [\游戏功能\冲级奖励.txt] @冲级超过奖励
#IF
HOUR 23 23
#ACT
SENDMSG 7 每天晚上23点期间为冲级比赛排名前5名领取元宝奖励时间！
SENDMSG 7 本时间段1个小时内冲级比赛排名榜停止更新排名！
break
#ELSEACT
MOV S0 冲级
MOV S33 $USERNAME
CALCVAR HUMAN SCL = $HUMAN(QMJ)
CALCVAR HUMAN J01 = $GLOBAL(2J01)
CALCVAR HUMAN J02 = $GLOBAL(2J02)
CALCVAR HUMAN J03 = $GLOBAL(2J03)
CALCVAR HUMAN J04 = $GLOBAL(2J04)
CALCVAR HUMAN J05 = $GLOBAL(2J05)
CALCVAR HUMAN J06 = $GLOBAL(2J06)
CALCVAR HUMAN J07 = $GLOBAL(2J07)
CALCVAR HUMAN J08 = $GLOBAL(2J08)
CALCVAR HUMAN J09 = $GLOBAL(2J09)
CALCVAR HUMAN J10 = $GLOBAL(2J10)
CALCVAR HUMAN J11 = $GLOBAL(2J11)
CALCVAR HUMAN J12 = $GLOBAL(2J12)
CALCVAR HUMAN J13 = $GLOBAL(2J13)
CALCVAR HUMAN J14 = $GLOBAL(2J14)
CALCVAR HUMAN J15 = $GLOBAL(2J15)
CALCVAR HUMAN J16 = $GLOBAL(2J16)
CALCVAR HUMAN J17 = $GLOBAL(2J17)
CALCVAR HUMAN J18 = $GLOBAL(2J18)
CALCVAR HUMAN J19 = $GLOBAL(2J19)
CALCVAR HUMAN J20 = $GLOBAL(2J20)
CALCVAR HUMAN J21 = $GLOBAL(2J21)
CALCVAR HUMAN H01 = $GLOBAL(2X01)
CALCVAR HUMAN H02 = $GLOBAL(2X02)
CALCVAR HUMAN H03 = $GLOBAL(2X03)
CALCVAR HUMAN H04 = $GLOBAL(2X04)
CALCVAR HUMAN H05 = $GLOBAL(2X05)
CALCVAR HUMAN H06 = $GLOBAL(2X06)
CALCVAR HUMAN H07 = $GLOBAL(2X07)
CALCVAR HUMAN H08 = $GLOBAL(2X08)
CALCVAR HUMAN H09 = $GLOBAL(2X09)
CALCVAR HUMAN H10 = $GLOBAL(2X10)
CALCVAR HUMAN H11 = $GLOBAL(2X11)
CALCVAR HUMAN H12 = $GLOBAL(2X12)
CALCVAR HUMAN H13 = $GLOBAL(2X13)
CALCVAR HUMAN H14 = $GLOBAL(2X14)
CALCVAR HUMAN H15 = $GLOBAL(2X15)
CALCVAR HUMAN H16 = $GLOBAL(2X16)
CALCVAR HUMAN H17 = $GLOBAL(2X17)
CALCVAR HUMAN H18 = $GLOBAL(2X18)
CALCVAR HUMAN H19 = $GLOBAL(2X19)
CALCVAR HUMAN H20 = $GLOBAL(2X20)
CALCVAR HUMAN H21 = $GLOBAL(2X21)
GOTO @进入升序排序
break

;===========================================================================================

[@更新武管积分排名]
#IF
dayofweek sun
HOUR 15 15
#ACT
SENDMSG 7 每周日下午3点期间为武馆积分排名前10名领取元宝奖励时间！
SENDMSG 7 本时间段1个小时内武馆积分排名榜停止更新排名！
break
#ELSEACT
MOV S0 武馆
MOV S33 $USERNAME
CALCVAR HUMAN SCL = $HUMAN(WGJ)
CALCVAR HUMAN J01 = $GLOBAL(WG01)
CALCVAR HUMAN J02 = $GLOBAL(WG02)
CALCVAR HUMAN J03 = $GLOBAL(WG03)
CALCVAR HUMAN J04 = $GLOBAL(WG04)
CALCVAR HUMAN J05 = $GLOBAL(WG05)
CALCVAR HUMAN J06 = $GLOBAL(WG06)
CALCVAR HUMAN J07 = $GLOBAL(WG07)
CALCVAR HUMAN J08 = $GLOBAL(WG08)
CALCVAR HUMAN J09 = $GLOBAL(WG09)
CALCVAR HUMAN J10 = $GLOBAL(WG10)
CALCVAR HUMAN J11 = $GLOBAL(WG11)
CALCVAR HUMAN J12 = $GLOBAL(WG12)
CALCVAR HUMAN J13 = $GLOBAL(WG13)
CALCVAR HUMAN J14 = $GLOBAL(WG14)
CALCVAR HUMAN J15 = $GLOBAL(WG15)
CALCVAR HUMAN J16 = $GLOBAL(WG16)
CALCVAR HUMAN J17 = $GLOBAL(WG17)
CALCVAR HUMAN J18 = $GLOBAL(WG18)
CALCVAR HUMAN J19 = $GLOBAL(WG19)
CALCVAR HUMAN J20 = $GLOBAL(WG20)
CALCVAR HUMAN J21 = $GLOBAL(WG21)
CALCVAR HUMAN H01 = $GLOBAL(WX01)
CALCVAR HUMAN H02 = $GLOBAL(WX02)
CALCVAR HUMAN H03 = $GLOBAL(WX03)
CALCVAR HUMAN H04 = $GLOBAL(WX04)
CALCVAR HUMAN H05 = $GLOBAL(WX05)
CALCVAR HUMAN H06 = $GLOBAL(WX06)
CALCVAR HUMAN H07 = $GLOBAL(WX07)
CALCVAR HUMAN H08 = $GLOBAL(WX08)
CALCVAR HUMAN H09 = $GLOBAL(WX09)
CALCVAR HUMAN H10 = $GLOBAL(WX10)
CALCVAR HUMAN H11 = $GLOBAL(WX11)
CALCVAR HUMAN H12 = $GLOBAL(WX12)
CALCVAR HUMAN H13 = $GLOBAL(WX13)
CALCVAR HUMAN H14 = $GLOBAL(WX14)
CALCVAR HUMAN H15 = $GLOBAL(WX15)
CALCVAR HUMAN H16 = $GLOBAL(WX16)
CALCVAR HUMAN H17 = $GLOBAL(WX17)
CALCVAR HUMAN H18 = $GLOBAL(WX18)
CALCVAR HUMAN H19 = $GLOBAL(WX19)
CALCVAR HUMAN H20 = $GLOBAL(WX20)
CALCVAR HUMAN H21 = $GLOBAL(WX21)
GOTO @进入升序排序
break

[@进入升序排序]
#ACT
#CALL [\行会排行\升序排序.txt] @自动排序升序

[@退出升序排序]
#IF
EQUAL S0 武馆
#ACT
CALCVAR GLOBAL WG01 = $HUMAN(J01)
CALCVAR GLOBAL WG02 = $HUMAN(J02)
CALCVAR GLOBAL WG03 = $HUMAN(J03)
CALCVAR GLOBAL WG04 = $HUMAN(J04)
CALCVAR GLOBAL WG05 = $HUMAN(J05)
CALCVAR GLOBAL WG06 = $HUMAN(J06)
CALCVAR GLOBAL WG07 = $HUMAN(J07)
CALCVAR GLOBAL WG08 = $HUMAN(J08)
CALCVAR GLOBAL WG09 = $HUMAN(J09)
CALCVAR GLOBAL WG10 = $HUMAN(J10)
CALCVAR GLOBAL WG11 = $HUMAN(J11)
CALCVAR GLOBAL WG12 = $HUMAN(J12)
CALCVAR GLOBAL WG13 = $HUMAN(J13)
CALCVAR GLOBAL WG14 = $HUMAN(J14)
CALCVAR GLOBAL WG15 = $HUMAN(J15)
CALCVAR GLOBAL WG16 = $HUMAN(J16)
CALCVAR GLOBAL WG17 = $HUMAN(J17)