aft脚本测试

(@storage @getback)

 

;---------------------------------------------------------攻击模式
[@Member]
#IF
#ACT
GMEXECUTE CshopNNCTT
break

;---------------------------------------------------------退出行会
[@UserCmd1]
<color=red 你是否真的要强制退出你当前的行会？>\\
<我确定要退出行会/@确定退出门派>\\
<以后再说/@exit>

[@确定退出门派]
#IF
#ACT
GMEXECUTE 退出门派
break
close

;---------------------------------------------------------结拜传送
[@UserCmd2]
#IF
EQUAL $CLIENTVERSION 20050815
#act
sendmsg 5 传家宝登陆不允许使用该功能！
break
#IF
CHECKVAR HUMAN 结拜传送次数 > 2
#act
sendmsg 5 结拜传送每天只能使用3次！
break
#IF
CHECKONLINE $HUMAN(结拜)
#ACT
HCALL $HUMAN(结拜) @结拜地图检查
#ELSEACT
SENDMSG 5 你的结拜不在线!!!
break

;---------------------------------------------------------游戏月卡
[@StdModeFunc360]
#IF
#act
CALCVAR HUMAN 游戏时间 + 30
SAVEVAR HUMAN 游戏时间 ..\QuestDiary\数据文件\系统数据\游戏时间.txt
SENDMSG 5 恭喜你成功充值30天的游戏时间
sendmsg 5 共有游戏时间[{<$HUMAN(游戏时间)>}]天.
BREAK

[@StdModeFunc362]
#IF
#act
CALCVAR HUMAN 游戏时间 + 7
SAVEVAR HUMAN 游戏时间 ..\QuestDiary\数据文件\系统数据\游戏时间.txt
SENDMSG 5 恭喜你成功充值7天的游戏时间
sendmsg 5 共有游戏时间[{<$HUMAN(游戏时间)>}]天.
BREAK

;---------------------------------------------------------怪物证明
[@StdModeFunc1151]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 2000
SENDMSG 7 你的经验增加了2000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<尸王证明>，获得大量经验。
#ELSEACT
give 尸王证明 1
SENDMSG 7 尸王证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1152]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 4000
SENDMSG 7 你的经验增加了4000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<机关证明>，获得大量经验。
#ELSEACT
give 机关证明 1
SENDMSG 7 机关证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1153]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 10000
SENDMSG 7 你的经验增加了10000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<逆魔证明>，获得大量经验。
#ELSEACT
give 逆魔证明 1
SENDMSG 7 逆魔证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1154]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 15000
SENDMSG 7 你的经验增加了15000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<禁地证明>，获得大量经验。
#ELSEACT
give 禁地证明 1
SENDMSG 7 禁地证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1155]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 18000
SENDMSG 7 你的经验增加了18000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<通天证明>，获得大量经验。
#ELSEACT
give 通天证明 1
SENDMSG 7 通天证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1156]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 22000
SENDMSG 7 你的经验增加了22000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<铁血证明>，获得大量经验。
#ELSEACT
give 铁血证明 1
SENDMSG 7 铁血证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1157]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 1000000
SENDMSG 7 你的经验增加了1000000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<100W经验证明>，获得大量经验。
#ELSEACT
give 100W经验证明 1
SENDMSG 7 100W经验证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

[@StdModeFunc1158]
#IF
CHECKLEVELEX < $STR(G85)
#act
GetExp 6000
SENDMSG 7 你的经验增加了6000
SENDMSG 15 玩家{<$USERNAME>}偷偷地吃下了<蛇王证明>，获得大量经验。
#ELSEACT
give 蛇王证明 1
SENDMSG 7 蛇王证明目前只允许<$STR(G85)>级以下玩家使用。
BREAK

;---------------------------------------------------------66格大背包
[@StdModeFunc47]
#IF
#act
bigbag
MessageBox 你成功升级到66格大背包！

;---------------------------------------------------------传音号角
[@StdModeFunc3095]
#IF
#SAY
\
请在提示框内输入你要向全服广播的内容\\
<关闭/@exit>\
#ACT
queryvalue 请输入你要向全服广播的内容: 2 96 500

[@getstring500]
#ACT
Getstring s4
goto @chuanyiskdfk

[@chuanyiskdfk]
#IF
SMALL s34 <
#ACT
SHOWHUMEFFECT 28
SENDMSG 8 [传音号角]:%S:<$STR(S4)>
SENDMSG 0 [传音号角]:%S:<$STR(S4)>
decusestime 1
SENDMSG 6 传音号角发挥了神奇的功能.
break
#ELSEACT
SENDMSG 7 抱歉，你所输入的内容里有服务器禁止输入的字符！请重新输入！
break

;---------------------------------------------------------随机神石
[@StdModeFunc7999]
#ACT
#CALL [\游戏功能\随机神石.txt] @腾空神石

;---------------------------------------------------------移动仓库
[@StdModeFunc84]
#if
#act
decusestime 1
#say
\
欢饮使用移动随身仓库.这里有最简单的功能.供您使用\
\
<存放物品/@storage> <取出物品/@getback> <捆扎物品/@绑扎物品>\
\
<超级仓库/@超级仓库><color=RED ←><color=green 可存放取出特殊材料>\

[@storage]
#ACT
#CALL [\商人\仓库.txt] @存放物品

[@getback]
#ACT
#CALL [\商人\仓库.txt] @取出物品

[@绑扎物品]
#ACT
#CALL [\商人\仓库.txt] @捆扎物品

[@超级仓库]
#ACT
#CALL [\商人\仓库.txt] @无限存放

;---------------------------------------------------------超级冰泉圣水
[@StdModeFunc93]
#IF
#act
repairall
decusestime 1
showhumeffect 3
sendmsg 6 超级冰泉圣水的威力使你的装备焕然一新……
break

;---------------------------------------------------------升级触发
[@PlayLevelUp]
#IF
LARGE $CLIENTVERSION 20050815
CHECKLEVELEX = 22
#ACT
#CALL [\游戏功能\升级触发\新手奖励.txt] @22级新手奖励

#IF
CHECKLEVELEX = 35
CHECKNAMELIST ..\QuestDiary\数据文件\个人数据\拜师名单.txt
#ACT
CREDITPOINT + 5

#IF
CHECKLEVELEX = 26
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @26开放地图

#IF
CHECKLEVELEX = 28
EQUAL G66 1
#ACT
ADDACCOUNTLIST ..\QuestDiary\测试奖励\28级名单.txt

#IF
CHECKLEVELEX = 30
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @30开放地图

#IF
CHECKLEVELEX = 31
EQUAL G66 1
#ACT
ADDACCOUNTLIST ..\QuestDiary\测试奖励\31级名单.txt
DelAccountList ..\QuestDiary\测试奖励\28级名单.txt

#IF
CHECKLEVELEX = 33
EQUAL G66 1
#ACT
ADDACCOUNTLIST ..\QuestDiary\测试奖励\33级名单.txt
DelAccountList ..\QuestDiary\测试奖励\31级名单.txt

#IF
CHECKLEVELEX = 35
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @35开放地图

#IF
CHECKLEVELEX = 38
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @38开放地图

#IF
CHECKLEVELEX = 42
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @42开放地图

#IF
CHECKLEVELEX = 46
#ACT
#CALL [\游戏功能\升级触发\开放地图.txt] @46开放地图

#IF
CHECKLEVELEX > 1
#ACT
#CALL [\登陆设置\经验设置.txt] @经验设置
;---------------------------------------------------------等级封印
#IF
CHECKLEVELEX = $STR(G85)
#ACT
#CALL [\登陆设置\经验设置.txt] @经验设置
;---------------------------------------------------------盛宴蛋糕
[@StdModeFunc8647]
#CALL [\游戏功能\盛宴蛋糕.txt] @蛋糕

;---------------------------------------------------------超级祝福油
[@StdModeFunc1166]
#IF
#ACT
MOV S24 $WEAPON
#IF
CHECKLEVELEX < 100
#ACT
#ELSEACT
break
#IF
EQUAL S24 命运3
#ACT
goto @命运属性检测
break
#IF
EQUAL S24 命运9
#ACT
goto @命运属性检测
break
#IF
EQUAL S24 命运6
#ACT
goto @命运属性检测
break
#IF
EQUAL S24 命运2
#ACT
goto @命运属性检测30
break
#IF
EQUAL S24 命运8
#ACT
goto @命运属性检测30
break
#IF
EQUAL S24 命运5
#ACT
goto @命运属性检测30
break
#IF
CHECKUSEITEM 1
CHECKUPGRADECOUNT 1 3 < 7
#ACT
UPGRADEITEMEX 1 3 0 1 0
#ELSEACT
give 超级祝福油 1
SENDMSG 6 [失败:]必须把武器拿在手里才能使用,或者武器幸运已经超过7点了
break

[@命运属性检测]
#IF
CHECKUSEITEM 1
CHECKUPGRADECOUNT 1 3 < 4
#ACT
UPGRADEITEMEX 1 3 0 1 0
#ELSEACT
give 超级祝福油 1
SENDMSG 6 [失败:]必须把武器拿在手里才能使用,或者武器幸运已经超过7点了
break

[@命运属性检测30]
#IF
CHECKUSEITEM 1
CHECKUPGRADECOUNT 1 3 < 5
#ACT
UPGRADEITEMEX 1 3 0 1 0
#ELSEACT
give 超级祝福油 1
SENDMSG 6 [失败:]必须把武器拿在手里才能使用,或者武器幸运已经超过7点了
break

;---------------------------------------------------------夺宝奇兵
[@dropitem120]
#ACT
CLEARARROW 宝盒
SENDMSG 0 宝盒掉落在%m(%x,%y)地图，只要捡起来并守护宝盒30分钟不掉落，就能获得夺宝大奖哦！
break

[@pickupitem120]
#IF
CHECKMAPNAME NLDB1
#ACT
MOV D2 30
SENDMSG 0 (*)宝盒已经在%m(%x，%y)被%s检起
SENDMSG 9 『夺宝骑兵』:『%S』携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒的人才有机会获得！
SENDMSG 7 (*)从现在开始:保持宝盒在你身上30分钟，宝盒就会自动打开！到时你将获得各种宝物！
SENDMSG 7 (*)携带宝盒的时候，不能使用各种移动卷轴，不能离开本地图！离开本地图活动结束！努力吧！力争30分钟！
SetArrow 30 @DKBHOK 宝盒 1 @BHJGHH
break
#ELSEACT
mapmove NLDB1
MOV D2 30
SENDMSG 0 (*)宝盒已经在%m(%x，%y)被%s检起
SENDMSG 9 『夺宝骑兵』:『%S』携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒的人才有机会获得！
SENDMSG 7 (*)从现在开始:保持宝盒在你身上30分钟，宝盒就会自动打开！到时你将获得各种宝物！
SENDMSG 7 (*)携带宝盒的时候，不能使用各种移动卷轴，不能离开本地图！离开本地图活动结束！努力吧！力争30分钟！
SetArrow 30 @DKBHOK 宝盒 1 @BHJGHH
break

[@BHJGHH]
#IF
CHECKITEM 宝盒 1
CHECKMAPNAME NLDB1
#ACT
DEC D2 1
SENDMSG 0 (*)%s携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒并保持30分钟不掉的人才有机会获得。
SENDMSG 15 <%s>携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒并保持30分钟不掉的人才有机会获得。
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
break
#IF
CHECKITEM 宝盒 1
#ACT
mapmove NLDB1
mov D2 2
SENDMSG 0 (*)%s携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒并保持30分钟不掉的人才有机会获得。
SENDMSG 15 <%s>携带宝盒出现在%m(%x，%y)，宝盒藏有高级玩家梦寐以求的道具和技能，只有抢到宝盒并保持30分钟不掉的人才有机会获得。
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
SENDMSG 7 加油啊！再坚持[<$STR(D2)>]分钟，宝盒中的宝物便可属于你了...
break
#ELSEACT
CLEARARROW 宝盒
break

[@DKBHOK]
#IF
CHECKITEM 宝盒 1
#ELSEACT
CLEARARROW 宝盒
break
#IF
#ACT
CLEARARROW 宝盒
goto @宝盒奖励装备
break
#IF
dayofweek sat
#ACT
CLEARARROW 宝盒
goto @宝盒奖励装备
break
#ELSEACT
CLEARARROW 宝盒
goto @宝盒奖励装备
break

[@宝盒奖励装备]
#CALL [\游戏功能\夺宝道具.txt] @获得宝盒道具

 

;---------------------------------------------------------声望令牌
[@StdModeFunc200]
#IF
#ACT
CREDITPOINT + 1
SENDMSG 7 成功使用声望令牌.声望值+1
break

[@StdModeFunc201]
#IF
#ACT
CREDITPOINT + 2
SENDMSG 7 成功使用声望令牌.声望值+2
break

[@StdModeFunc202]
#IF
#ACT
CREDITPOINT + 3
SENDMSG 7 成功使用声望令牌.声望值+3
break

[@StdModeFunc203]
#IF
#ACT
CREDITPOINT + 5
SENDMSG 7 成功使用声望令牌.声望值+5
break

[@StdModeFunc204]
#IF
#ACT
CREDITPOINT + 10
SENDMSG 7 成功使用声望令牌.声望值+10
break

[@StdModeFunc205]
#IF
#ACT
CREDITPOINT + 20
SENDMSG 7 成功使用声望令牌.声望值+20
break

[@StdModeFunc206]
#IF
#ACT
CREDITPOINT + 40
SENDMSG 7 成功使用声望令牌.声望值+40
break

;---------------------------------------捐献值
[@StdModeFunc1167]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 1
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(一点).捐献值+1...
break

[@StdModeFunc1168]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 2
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(二点).捐献值+2...
break

[@StdModeFunc1169]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 5
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(五点).捐献值+5...
break

 

[@StdModeFunc1170]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 10
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(十点).捐献值+10...
break

 

[@StdModeFunc1171]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 50
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(五十点).捐献值+50...
break

 

[@StdModeFunc1172]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 100
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(一百点).捐献值+100...
break

 

[@StdModeFunc1173]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 200
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(二百点).捐献值+200...
break

 

[@StdModeFunc1174]
#IF
#ACT
CALCVAR HUMAN 捐献值 + 500
SAVEVAR HUMAN 捐献值 ..\QuestDiary\数据文件\个人数据\捐献值.txt
SENDMSG 6 成功使用捐献值(五百点).捐献值+500...
break

;---------------------------------------凭证
[@StdModeFunc1159]
#IF
CHECKMAPNAME MD001
#ACT
take 机关巨兽凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 机关巨兽 1 3 机关巨兽
SENDMSG 8 玩家{<$USERNAME>}使用机关巨兽凭证在屠魔地图召唤出机关巨兽祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<机关巨兽凭证>在屠魔地图召唤出<机关巨兽>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用机关巨兽凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1160]
#IF
CHECKMAPNAME MD001
#ACT
take 逆魔凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 逆魔 1 3 逆魔
SENDMSG 8 玩家{<$USERNAME>}使用逆魔凭证在屠魔地图召唤出逆魔祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<逆魔凭证>在屠魔地图召唤出<逆魔>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用逆魔凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1161]
#IF
CHECKMAPNAME MD001
#ACT
take 通天教主凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 通天教主 1 3 通天教主
SENDMSG 8 玩家{<$USERNAME>}使用通天教主凭证在屠魔地图召唤出通天教主祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<通天教主凭证>在屠魔地图召唤出<通天教主>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用通天教主凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1162]
#IF
CHECKMAPNAME MD001
#ACT
take 禁地魔王凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 禁地魔王 1 3 禁地魔王
SENDMSG 8 玩家{<$USERNAME>}使用禁地魔王凭证在屠魔地图召唤出禁地魔王祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<禁地魔王凭证>在屠魔地图召唤出<禁地魔王>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用禁地魔王凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1163]
#IF
CHECKMAPNAME MD001
#ACT
take 阿修罗神凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 阿修罗神 1 3 阿修罗神
SENDMSG 8 玩家{<$USERNAME>}使用阿修罗神凭证在屠魔地图召唤出阿修罗神祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<阿修罗神凭证>在屠魔地图召唤出<阿修罗神>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用阿修罗神凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1164]
#IF
CHECKMAPNAME MD001
#ACT
take 铁血魔王凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 铁血魔王 1 3 铁血魔王
SENDMSG 8 玩家{<$USERNAME>}使用铁血魔王凭证在屠魔地图召唤出铁血魔王祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<铁血魔王凭证>在屠魔地图召唤出<铁血魔王>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用铁血魔王凭证，此物品只能在屠魔地图使用。

[@StdModeFunc1165]
#IF
CHECKMAPNAME MD001
#ACT
take 三头蛇王凭证 1
PARAM1 $M
PARAM2 $X
PARAM3 $Y
MonGen 三头蛇王 1 3 三头蛇王
SENDMSG 8 玩家{<$USERNAME>}使用三头蛇王凭证在屠魔地图召唤出三头蛇王祝好运~！
SENDMSG 0 玩家{<$USERNAME>}使用<三头蛇王凭证>在屠魔地图召唤出<三头蛇王>祝好运~！
#ELSEACT
SENDMSG 7 当前地图不可以使用三头蛇王凭证，此物品只能在屠魔地图使用。

;---------------------------------------双倍经验卡
[@StdModeFunc35]
#IF
#act
KILLMONEXPRATE 200 600
decusestime 1
#CALL [\登陆设置\经验设置.txt] @经验设置
sendmsg 5 双倍经验开启成功有效时间[<10>]分钟,下线或小退效果消失.
#ELSEACT
SENDMSG 5 你当前等级:{<$LEVEL>},43级以下无需开启双倍。
break

;---------------------------------------元宝
[@StdModeFunc1]
#IF
checkitem 1元宝 1
#act
take 1元宝 1
GAMEGOLD + 1
SENDMSG 6 提示：增加1个元宝！

[@StdModeFunc37]
#IF
checkitem 2元宝 1
#act
take 2元宝 1
GAMEGOLD + 2
SENDMSG 6 提示：增加2个元宝！

;---------------------------------------书页
[@pickupitem8648]
#IF
checkitem 书页 1
#ACT
take 书页 1
CALCVAR HUMAN 书页 + 1
SAVEVAR HUMAN 书页 ..\QUESTDIARY\自定仓库\书页.txt
SENDMSG 7 当前“书页”存放数量:[{<$HUMAN(书页)>}]个.
break

[@pickupitem8649]
#IF
checkitem 书页(一百) 1
#ACT
take 书页(一百) 1
CALCVAR HUMAN 书页 + 100
SAVEVAR HUMAN 书页 ..\QUESTDIARY\自定仓库\书页.txt
SENDMSG 7 当前“书页”存放数量:[{<$HUMAN(书页)>}]个.
break

;---------------------------------------节日信物
[@pickupitem8650]
#if
checkitem 节日信物 1
#act
take 节日信物 1
CALCVAR HUMAN 节日信物 + 1
SAVEVAR HUMAN 节日信物 ..\QUESTDIARY\自定仓库\节日信物.txt
SENDMSG 7 您当前“节日信物”存量:[{<$HUMAN(节日信物)>}]个,存放物品<节日信物Ｘ１>成功.
break

;---------------------------------------套装检测
[@TakeOnAll]
#CALL [\游戏功能\套装检测.txt] @装备检测

[@TakeoffAll]
#CALL [\游戏功能\套装检测.txt] @套装还原

;---------------------------------------超级商城
[@StdModeFunc666]
#if
#act
decusestime 1
#say
\
欢迎使用移动超级商城服务.这里有VIP的待遇供您使用！\
\
<超级商城/@超级商城> <资源抽奖/@材料商城>\
;<极品抽奖/@极品商城> <属性抽奖/@属性商城>\
\
\

[@超级商城]
#act
#call [\游戏商城\超级商城.txt] @超级购物

[@材料商城]
#act
#call [\游戏商城\材料商城.txt] @材料购物

[@极品商城]
#act
#call [\游戏商城\极品商城.txt] @极品购物

[@属性商城]
#act
#call [\游戏商城\属性商城.txt] @属性购物