[@main]
　　本人以打造各类水晶为生，近日听传百宝箱中出产一种\
碧幽水晶，质感冰洁晶透，碧青翡翠，色泽光滑。如用此晶\
体进行加工，打造出来的水晶肯定价值连城，不知哪位勇士\
获此水晶，可否转交于我，每收集满10个<COLOR=GREEN 碧幽水晶>，便可在\
我处换取一次奖励哦！\\
　　<换取奖励/@换取奖励1>　　　　<存放碧幽水晶/@碧幽水晶1>\
　　<离开/@exit>

[@碧幽水晶1]
#ACT
MOV P1 0
GOTO @碧幽水晶
break

[@碧幽水晶]
#IF
CHECKVAR HUMAN 碧幽 > 9
#SAY
　　你上交的碧幽水晶已经满10个了。\
　　请先兑换奖励再来存放。\\
　　<换取奖励/@换取奖励1>
#ACT
break
#IF
checkitem 碧幽水晶 1
#ACT
TAKE 碧幽水晶 1
CALCVAR HUMAN 碧幽 + 1
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
MOV P1 1
MOV S3 <COLOR=GREEN[]
INC S3 $HUMAN(碧幽)
INC S3 >
GOTO @碧幽水晶
break
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P1 1
#SAY
　　你包裹中没有发现碧幽水晶。\
　　碧幽水晶无处不在，只要用心寻找必有所获。\\
　　<离开/@exit>
#ELSESAY
　　你目前存放了<$STR(S3)>个碧幽水晶。\
　　<离开/@exit>

[@换取奖励1]
#IF
CHECKVAR HUMAN 碧幽 < 1
#SAY
　　目前没有您的信息！\\
　　<离开/@exit>
#ACT
break
#IF
CHECKVAR HUMAN 碧幽 < 10
#SAY
　　勇士，你还没收集满10个碧幽水晶，快去开启百宝箱吧.\\
　　<离开/@exit>
#ACT
break
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MessageBox 对不起，您身上背包的位置不够，请清理出空位！
break
#IF
RANDOM 12
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 天玄道袍>\\
　　<离开/@exit>
#ACT
GIVE 天玄道袍 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了天玄道袍。
break
#IF
RANDOM 11
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 天玄道衣>\\
　　<离开/@exit>
#ACT
GIVE 天玄道衣 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了天玄道衣。
break
#IF
RANDOM 10
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 幻魔羽衣>\\
　　<离开/@exit>
#ACT
GIVE 幻魔羽衣 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了幻魔羽衣。
break
#IF
RANDOM 9
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 幻魔披风>\\
　　<离开/@exit>
#ACT
GIVE 幻魔披风 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了幻魔披风。
break
#IF
RANDOM 8
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 神武战袍>\\
　　<离开/@exit>
#ACT
GIVE 神武战袍 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了神武战袍。
break
#IF
RANDOM 7
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 神武战甲>\\
　　<离开/@exit>
#ACT
GIVE 神武战甲 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了神武战甲。
break
#IF
RANDOM 6
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 怒斩天下>\\
　　<离开/@exit>
#ACT
GIVE 怒斩天下 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了怒斩天下。
break
#IF
RANDOM 5
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 火毒攻心剑>\\
　　<离开/@exit>
#ACT
GIVE 火毒攻心剑 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了火毒攻心剑。
break
#IF
RANDOM 4
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 神之召唤>\\
　　<离开/@exit>
#ACT
GIVE 神之召唤 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了神之召唤。
break
#IF
RANDOM 3
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 天女散花咒>\\
　　<离开/@exit>
#ACT
GIVE 天女散花咒 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了天女散花咒。
break
#IF
RANDOM 2
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 迷光烈焰>\\
　　<离开/@exit>
#ACT
GIVE 迷光烈焰 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了迷光烈焰。
break
#IF
RANDOM 1
#SAY
　　恭喜你使用10个碧幽水晶兑换到以下奖励：\
　　<COLOR=GREEN 天怒惊雷>\\
　　<离开/@exit>
#ACT
GIVE 天怒惊雷 1
CALCVAR HUMAN 碧幽 = 0
SAVEVAR HUMAN 碧幽 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 10 恭喜<$USERNAME>玩家用10个碧幽水晶换到了天怒惊雷。
break