传世私服中州绝世天下脚本(3)

[@购买5]
#IF
CHECKVAR GLOBAL JSMY = 暂无
#ACT
#ELSEACT
messagebox 「绝世·魔衣」：(全服仅此一件)\　\目前已经被[<$GLOBAL(JSMY)>]购买，现在已经不能购买了！
break
#IF
CHECKVAR GLOBAL JSZJ = $USERNAME
#ACT
messagebox 「绝世魔衣」一人只能购买一件！把机会给别人吧！
break
#IF
CHECKVAR GLOBAL JSDP = $USERNAME
#ACT
messagebox 「绝世魔衣」一人只能购买一件！把机会给别人吧！
break
#IF
CHECKVAR GLOBAL JSMY = 暂无
CHECKVAR HUMAN TGJ > 2599
gender MAN
#ACT
give 绝世·魔衣(男) 1
SENDMSG 0 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 8 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 10 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
CALCVAR HUMAN TGJ - 2600
CALCVAR GLOBAL JSMY = $USERNAME
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\TGJSave.txt
SAVEVAR GLOBAL JSMY ..\QuestDiary\数据文件\JSMYSave.txt
messagebox 「绝世·魔衣」购买成功！
break
#IF
CHECKVAR GLOBAL JSMY = 暂无
CHECKVAR HUMAN TGJ > 2599
gender WOMAN
#ACT
give 绝世·魔衣(女) 1
SENDMSG 0 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 8 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 10 恭喜[<$USERNAME>]成为本服[绝世·魔衣]的所有者，他将使用此神器开创前所未有的崭新世界...
CALCVAR HUMAN TGJ - 2600
CALCVAR GLOBAL JSMY = $USERNAME
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\TGJSave.txt
SAVEVAR GLOBAL JSMY ..\QuestDiary\数据文件\JSMYSave.txt
messagebox 「绝世·魔衣」购买成功！
break
#ELSEACT
messagebox 「绝世·魔衣」：(全服仅此一件)\　\购买「绝世·魔衣」，需要至少2600点天关积分！
break

[@购买6]
#IF
CHECKVAR GLOBAL JSDP = 暂无
#ACT
#ELSEACT
messagebox 「绝世·道袍」：(全服仅此一件)\　\目前已经被[<$GLOBAL(JSDP)>]购买，现在已经不能购买了！
break
#IF
CHECKVAR GLOBAL JSZJ = $USERNAME
#ACT
messagebox 「绝世道袍」一人只能购买一件！把机会给别人吧！
break
#IF
CHECKVAR GLOBAL JSMY = $USERNAME
#ACT
messagebox 「绝世道袍」一人只能购买一件！把机会给别人吧！
break
#IF
CHECKVAR GLOBAL JSDP = 暂无
CHECKVAR HUMAN TGJ > 2599
gender MAN
#ACT
give 绝世·道袍(男) 1
SENDMSG 0 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 8 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 10 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
CALCVAR HUMAN TGJ - 2600
CALCVAR GLOBAL JSDP = $USERNAME
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\TGJSave.txt
SAVEVAR GLOBAL JSDP ..\QuestDiary\数据文件\JSDPSave.txt
messagebox 「绝世·道袍」购买成功！
break
#IF
CHECKVAR GLOBAL JSDP = 暂无
CHECKVAR HUMAN TGJ > 2599
gender WOMAN
#ACT
give 绝世·道袍(女) 1
SENDMSG 0 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 8 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
SENDMSG 10 恭喜[<$USERNAME>]成为本服[绝世·道袍]的所有者，他将使用此神器开创前所未有的崭新世界...
CALCVAR HUMAN TGJ - 2600
CALCVAR GLOBAL JSDP = $USERNAME
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\TGJSave.txt
SAVEVAR GLOBAL JSDP ..\QuestDiary\数据文件\JSDPSave.txt
messagebox 「绝世·道袍」购买成功！
break
#ELSEACT
messagebox 「绝世·道袍」：(全服仅此一件)\　\购买「绝世·道袍」，需要至少2600点天关积分！
break