传奇游戏升级随机奖励装备的脚本

突然想到的不知道有啥错误没，还没验证。

[@main]

#if

#act

MOV G80 5

#SAY

<56级领取/@LJ56> 凤天魔甲or凤天魔衣 剩余名额<$STR(G80)>个

[@LJ56]

#if

#ACT

MOV S0 56

#IF

EQUAL G80 0

#ACT

DelayCall 1 @没有

#ELSEACT

DelayCall 1 @领奖

[@LJ56B]

#if

#ACT

DEC G80 1

GetRandomText .\QuestDiary\升级奖励\56级奖励.txt S0

give <$STR(S0)> 1

SENDMSG 0 恭喜：“%s”升到56级成功领取〖<$STR(S0)>]〗1件,56级奖励还剩<$STR(G80)>

[@领奖]

#IF

CHECKLEVELEX < <$STR(S0)>

#ACT

MessageBox [领取失败]：你等级不够<$STR(S0)>级,还不可以领取！

BREAK

#if

CheckNameList ..\QuestDiary\升级奖励名单\<$STR(S0)>级.txt

#ACT

MessageBox [领取失败]：你已经领取过<$STR(S0)>级奖励！

BREAK

#ELSEACT

ADDNameList ..\QuestDiary\升级奖励名单\<$STR(S0)>级.txt

DelayCall 1 @LJ<$STR(S0)>B

[@没有]

#if

CHECKLEVELEX > 0

#ACT

BREAK

MessageBox [领取失败]：<$STR(S0)>级奖励已领完！