无忧传世宝三石仓库脚本
[@宝石cangku]
{
<COLOR=green 来来来,只要是红、绿、蓝三种颜色的宝石,放在宝石>\
<COLOR=green 仓库里是可就了。不过每种宝石可是只能放><COLOR=red 99><COLOR=green 颗。>\
<COLOR=green 多了可就放不下咯。>\ \
<COLOR=yellow 提示:><COLOR=orange 现在还可以存放><COLOR=red "灵符"><COLOR=orange 和><COLOR=red "金刚石">\
<查看宝石数量/@查看宝石数量>\
<存放宝石/@存放宝石>\
<取出宝石/@取出宝石>\
<前一步
[@取出宝石]
<COLOR=green 请选择你要取出的宝石或物品!>\ \
<COLOR=orange 取出 ><红宝石/@红宝石取出>\
<COLOR=orange 取出 ><蓝宝石/@蓝宝石取出>\
<COLOR=orange 取出 ><绿宝石/@绿宝石取出>\
<COLOR=orange 取出 ><金刚石/@金刚石取出>\
<COLOR=orange 取出 ><"灵符"/@"灵符"取出>\ \
<前一步/@宝石仓库>\
[@取出宝石失败]
#if
#act
messagebox 提示:您要取出的数目不正确,请确认后再来!
[@红宝石取出]
<COLOR=yellow 你现在拥有:> [<$HUMAN(HBAOS)>] <COLOR=green 颗><COLOR=red 红宝石><COLOR=green ,请选择你要取出的数量>\ \
<1颗红宝石/@红宝石1取出> <2颗红宝石/@红宝石2取出>\
<3颗红宝石/@红宝石3取出> <4颗红宝石/@红宝石4取出>\
<5颗红宝石/@红宝石5取出> <10颗红宝石/@红宝石10取出>\
<20颗红宝石/@红宝石20取出> <30颗红宝石/@红宝石30取出>\ \ \
<前一步/@取出宝石>\
[@取出红宝石成功]
#if
#act
messagebox 取出宝石成功!你还有: <$HUMAN(HBAOS)> 颗红宝石!
[@红宝石1取出]
#IF
CHECKVAR HUMAN HBAOS = 0
#act
goto @取出宝石失败
#elseact
goto @红宝石01取出
[@红宝石01取出]
#IF
#act
CALCVAR HUMAN HBAOS - 1
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 1
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石2取出]
#IF
CHECKVAR HUMAN HBAOS > 1
#act
CALCVAR HUMAN HBAOS - 2
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 2
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石3取出]
#IF
CHECKVAR HUMAN HBAOS > 2
#act
CALCVAR HUMAN HBAOS - 3
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 3
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石4取出]
#IF
CHECKVAR HUMAN HBAOS > 3
#act
CALCVAR HUMAN HBAOS - 4
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 4
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石5取出]
#IF
CHECKVAR HUMAN HBAOS > 4
#act
CALCVAR HUMAN HBAOS - 5
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 5
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石10取出]
#IF
CHECKVAR HUMAN HBAOS > 9
#act
CALCVAR HUMAN HBAOS - 10
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 10
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石20取出]
#IF
CHECKVAR HUMAN HBAOS > 19
#act
CALCVAR HUMAN HBAOS - 20
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 20
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@红宝石30取出]
#IF
CHECKVAR HUMAN HBAOS > 29
#act
CALCVAR HUMAN HBAOS - 30
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
give 红宝石 30
goto @取出红宝石成功
goto @红宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石取出]
<COLOR=yellow 你现在拥有:> [<$HUMAN(NBAOS)>] <COLOR=green 颗><COLOR=red 蓝宝石><COLOR=green ,请选择你要取出的数量>\ \
<1颗蓝宝石/@蓝宝石1取出> <2颗蓝宝石/@蓝宝石2取出>\
<3颗蓝宝石/@蓝宝石3取出> <4颗蓝宝石/@蓝宝石4取出>\
<5颗蓝宝石/@蓝宝石5取出> <10颗蓝宝石/@蓝宝石10取出>\
<20颗蓝宝石/@蓝宝石20取出> <30颗蓝宝石/@蓝宝石30取出>\ \ \
<前一步/@取出宝石>\
[@取出蓝宝石成功]
#if
#act
messagebox 取出宝石成功!你还有: <$HUMAN(HBAOS)> 颗蓝宝石!
[@蓝宝石1取出]
#IF
CHECKVAR HUMAN NBAOS = 0
#act
goto @取出宝石失败
#elseact
goto @蓝宝石01取出
[@蓝宝石01取出]
#IF
#act
CALCVAR HUMAN NBAOS - 1
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 1
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石2取出]
#IF
CHECKVAR HUMAN NBAOS > 1
#act
CALCVAR HUMAN NBAOS - 2
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 2
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石3取出]
#IF
CHECKVAR HUMAN NBAOS > 2
#act
CALCVAR HUMAN NBAOS - 3
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 3
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石4取出]
#IF
CHECKVAR HUMAN NBAOS > 3
#act
CALCVAR HUMAN NBAOS - 4
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 4
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石5取出]
#IF
CHECKVAR HUMAN NBAOS > 4
#act
CALCVAR HUMAN NBAOS - 5
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 5
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石10取出]
#IF
CHECKVAR HUMAN NBAOS > 9
#act
CALCVAR HUMAN NBAOS - 10
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 10
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石20取出]
#IF
CHECKVAR HUMAN NBAOS > 19
#act
CALCVAR HUMAN NBAOS - 20
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 20
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@蓝宝石30取出]
#IF
CHECKVAR HUMAN NBAOS > 29
#act
CALCVAR HUMAN NBAOS - 30
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
give 蓝宝石 30
goto @取出蓝宝石成功
goto @蓝宝石取出
#elseact
goto @取出宝石失败
[@绿宝石取出]
<COLOR=yellow 你现在拥有:> [<$HUMAN(LBAOS)>] <COLOR=green 颗><COLOR=red 绿宝石><COLOR=green ,请选择你要取出的数量>\ \
<1颗绿宝石/@绿宝石1取出> <2颗绿宝石/@绿宝石2取出>\
<3颗绿宝石/@绿宝石3取出> <4颗绿宝石/@绿宝石4取出>\
<5颗绿宝石/@绿宝石5取出> <10颗绿宝石/@绿宝石10取出>\
<20颗绿宝石/@绿宝石20取出> <30颗绿宝石/@绿宝石30取出>\ \ \
<前一步/@取出宝石>\
[@取出蓝宝石成功]
#if
#act
messagebox 取出宝石成功!你还有: <$HUMAN(HBAOS)> 颗绿宝石!
[@绿宝石1取出]
#IF
CHECKVAR HUMAN LBAOS = 0
#act
goto @取出宝石失败
#elseact
goto @绿宝石01取出
[@绿宝石01取出]
#IF
#act
CALCVAR HUMAN LBAOS - 1
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 1
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石2取出]
#IF
CHECKVAR HUMAN LBAOS > 1
#act
CALCVAR HUMAN LBAOS - 2
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 2
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石3取出]
#IF
CHECKVAR HUMAN LBAOS > 2
#act
CALCVAR HUMAN LBAOS - 3
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 3
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石4取出]
#IF
CHECKVAR HUMAN LBAOS > 3
#act
CALCVAR HUMAN LBAOS - 4
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 4
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石5取出]
#IF
CHECKVAR HUMAN LBAOS > 4
#act
CALCVAR HUMAN LBAOS - 5
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 5
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石10取出]
#IF
CHECKVAR HUMAN LBAOS > 9
#act
CALCVAR HUMAN LBAOS - 10
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 10
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石20取出]
#IF
CHECKVAR HUMAN LBAOS > 19
#act
CALCVAR HUMAN LBAOS - 20
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 20
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@绿宝石30取出]
#IF
CHECKVAR HUMAN LBAOS > 29
#act
CALCVAR HUMAN LBAOS - 30
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
give 绿宝石 30
goto @取出绿宝石成功
goto @绿宝石取出
#elseact
goto @取出宝石失败
[@金刚石取出]
<COLOR=yellow 你现在拥有:> [<$HUMAN(JGS)>] <COLOR=green 颗><COLOR=red 金刚石><COLOR=green ,请选择你要取出的数量>\ \
<1颗金刚石/@金刚石1取出> <2颗金刚石/@金刚石2取出>\
<3颗金刚石/@金刚石3取出> <4颗金刚石/@金刚石4取出>\
<5颗金刚石/@金刚石5取出> <10颗金刚石/@金刚石10取出>\
<20颗金刚石/@金刚石20取出> <30颗金刚石/@金刚石30取出>\ \ \
<前一步/@取出宝石>\
[@取出金刚石成功]
#if
#act
messagebox 取出宝石成功!你还有: <$HUMAN(JGS)> 颗金刚石!
[@金刚石1取出]
#IF
CHECKVAR HUMAN JGS = 0
#act
goto @取出宝石失败
#elseact
goto @金刚石01取出
[@金刚石01取出]
#IF
#act
CALCVAR HUMAN JGS - 1
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 1
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石2取出]
#IF
CHECKVAR HUMAN JGS > 1
#act
CALCVAR HUMAN JGS - 2
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 2
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石3取出]
#IF
CHECKVAR HUMAN JGS > 2
#act
CALCVAR HUMAN JGS - 3
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 3
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石4取出]
#IF
CHECKVAR HUMAN JGS > 3
#act
CALCVAR HUMAN JGS - 4
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 4
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石5取出]
#IF
CHECKVAR HUMAN JGS > 4
#act
CALCVAR HUMAN JGS - 5
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 5
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石10取出]
#IF
CHECKVAR HUMAN JGS > 9
#act
CALCVAR HUMAN JGS - 10
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 10
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石20取出]
#IF
CHECKVAR HUMAN JGS > 19
#act
CALCVAR HUMAN JGS - 20
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 20
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@金刚石30取出]
#IF
CHECKVAR HUMAN JGS > 29
#act
CALCVAR HUMAN JGS - 30
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
give 金刚石 30
goto @取出金刚石成功
goto @金刚石取出
#elseact
goto @取出宝石失败
[@"灵符"取出]
<COLOR=yellow 你现在拥有:> [<$HUMAN(LFCK)>] <COLOR=green 张><COLOR=red "灵符"><COLOR=green ,请选择你要取出的数量>\ \
<1张"灵符"/@"灵符"1取出> <2张"灵符"/@"灵符"2取出>\
<3张"灵符"/@"灵符"3取出> <4张"灵符"/@"灵符"4取出>\
<5张"灵符"/@"灵符"5取出> <10张"灵符"/@"灵符"10取出>\
<20张"灵符"/@"灵符"20取出> <30张"灵符"/@"灵符"30取出>\ \ \
<前一步/@取出宝石>\
[@取出"灵符"成功]
#if
#act
messagebox 取出"灵符"成功!你还有: <$HUMAN(LFCK)> 张"灵符"!
[@"灵符"1取出]
#IF
CHECKVAR HUMAN LFCK = 0
#act
goto @取出宝石失败
#elseact
goto @"灵符"01取出
[@"灵符"01取出]
#IF
#act
CALCVAR HUMAN LFCK - 1
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 1
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"2取出]
#IF
CHECKVAR HUMAN LFCK > 1
#act
CALCVAR HUMAN LFCK - 2
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 2
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"3取出]
#IF
CHECKVAR HUMAN LFCK > 2
#act
CALCVAR HUMAN LFCK - 3
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 3
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"4取出]
#IF
CHECKVAR HUMAN LFCK > 3
#act
CALCVAR HUMAN LFCK - 4
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 4
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"5取出]
#IF
CHECKVAR HUMAN LFCK > 4
#act
CALCVAR HUMAN LFCK - 5
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 5
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"10取出]
#IF
CHECKVAR HUMAN LFCK > 9
#act
CALCVAR HUMAN LFCK - 10
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 10
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"20取出]
#IF
CHECKVAR HUMAN LFCK > 19
#act
CALCVAR HUMAN LFCK - 20
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 20
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@"灵符"30取出]
#IF
CHECKVAR HUMAN LFCK > 29
#act
CALCVAR HUMAN LFCK - 30
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
give 灵符 30
goto @取出"灵符"成功
goto @"灵符"取出
#elseact
goto @取出宝石失败
[@查看宝石数量]
<COLOR=yellow 你现在拥有:>\ \
<$HUMAN(HBAOS)> <COLOR=green 颗> <COLOR=red 红宝石>\
<$HUMAN(NBAOS)> <COLOR=green 颗> <COLOR=red 蓝宝石>\
<$HUMAN(LBAOS)> <COLOR=green 颗> <COLOR=red 绿宝石>\
<$HUMAN(JGS)> <COLOR=green 颗> <COLOR=red 金刚石>\
<$HUMAN(LFCK)> <COLOR=green 张> <COLOR=red "灵符">\ \
<前一步/@宝石仓库>
[@存放宝石失败]
#if
#act
messagebox 提示:您要存放的数目不正确,请确认后再来!
[@宝石仓库以满]
#if
#act
messagebox 提示:对不起你的宝石仓库已经满了!
[@存放宝石]
<COLOR=green 请选择你要保管的宝石!>\ \
<COLOR=orange 保管> <红宝石/@红宝石>\
<COLOR=orange 保管> <蓝宝石/@蓝宝石>\
<COLOR=orange 保管> <绿宝石/@绿宝石>\
<COLOR=orange 保管> <金刚石/@金刚石>\
<COLOR=orange 保管> <"灵符"/@"灵符">\ \
<前一步/@宝石仓库>\
[@红宝石]
#IF
CHECKVAR HUMAN HBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @红宝石11
[@红宝石11]
<COLOR=yellow 你现在拥有:> [<$HUMAN(HBAOS)>] <COLOR=green 颗><COLOR=red 红宝石><COLOR=green ,请选择你要保管的数量>\ \
<1颗红宝石/@红宝石1> <2颗红宝石/@红宝石2>\
<3颗红宝石/@红宝石3> <4颗红宝石/@红宝石4>\
<5颗红宝石/@红宝石5> <10颗红宝石/@红宝石10>\
<20颗红宝石/@红宝石20> <30颗红宝石/@红宝石30>\ \ \
<前一步/@宝石仓库>\
[@存放红宝石成功]
#if
#act
messagebox 存放宝石成功!你现在拥有: <$HUMAN(HBAOS)> 颗红宝石!
[@红宝石1]
#IF
CHECKVAR HUMAN HBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @红宝石01
[@红宝石01]
#IF
checkitem 红宝石 1
#act
CALCVAR HUMAN HBAOS + 1
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 1
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石2]
#IF
CHECKVAR HUMAN HBAOS > 97
#act
goto @存放宝石失败
#elseact
goto @红宝石02
[@红宝石02]
#IF
checkitem 红宝石 2
#act
CALCVAR HUMAN HBAOS + 2
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 2
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石3]
#IF
CHECKVAR HUMAN HBAOS > 96
#act
goto @存放宝石失败
#elseact
goto @红宝石03
[@红宝石03]
#IF
checkitem 红宝石 3
#act
CALCVAR HUMAN HBAOS + 3
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 3
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石4]
#IF
CHECKVAR HUMAN HBAOS > 95
#act
goto @存放宝石失败
#elseact
goto @红宝石04
[@红宝石04]
#IF
checkitem 红宝石 4
#act
CALCVAR HUMAN HBAOS + 4
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 4
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石5]
#IF
CHECKVAR HUMAN HBAOS > 94
#act
goto @存放宝石失败
#elseact
goto @红宝石05
[@红宝石05]
#IF
checkitem 红宝石 5
#act
CALCVAR HUMAN HBAOS + 5
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 5
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石10]
#IF
CHECKVAR HUMAN HBAOS > 89
#act
goto @存放宝石失败
#elseact
goto @红宝石010
[@红宝石010]
#IF
checkitem 红宝石 10
#act
CALCVAR HUMAN HBAOS + 10
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 10
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石20]
#IF
CHECKVAR HUMAN HBAOS > 79
#act
goto @存放宝石失败
#elseact
goto @红宝石020
[@红宝石020]
#IF
checkitem 红宝石 20
#act
CALCVAR HUMAN HBAOS + 20
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 20
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@红宝石30]
#IF
CHECKVAR HUMAN HBAOS > 69
#act
goto @存放宝石失败
#elseact
goto @红宝石030
[@红宝石030]
#IF
checkitem 红宝石 30
#act
CALCVAR HUMAN HBAOS + 30
SAVEVAR HUMAN HBAOS ..\QuestDiary\网络\HBAOSSave.txt
take 红宝石 30
goto @存放红宝石成功
goto @红宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石]
#IF
CHECKVAR HUMAN NBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @蓝宝石11
[@蓝宝石11]
<COLOR=yellow 你现在拥有:> [<$HUMAN(NBAOS)>] <COLOR=green 颗><COLOR=red 蓝宝石><COLOR=green ,请选择你要保管的数量>\ \
<1颗蓝宝石/@蓝宝石1> <2颗蓝宝石/@蓝宝石2>\
<3颗蓝宝石/@蓝宝石3> <4颗蓝宝石/@蓝宝石4>\
<5颗蓝宝石/@蓝宝石5> <10颗蓝宝石/@蓝宝石10>\
<20颗蓝宝石/@蓝宝石20> <30颗蓝宝石/@蓝宝石30>\ \ \
<前一步/@宝石仓库>\
[@存放蓝宝石成功]
#if
#act
messagebox 存放宝石成功!你现在拥有: <$HUMAN(NBAOS)> 颗蓝宝石!
[@蓝宝石1]
#IF
CHECKVAR HUMAN NBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @蓝宝石01
[@蓝宝石01]
#IF
checkitem 蓝宝石 1
#act
CALCVAR HUMAN NBAOS + 1
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 1
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石2]
#IF
CHECKVAR HUMAN NBAOS > 97
#act
goto @存放宝石失败
#elseact
goto @蓝宝石02
[@蓝宝石02]
#IF
checkitem 蓝宝石 2
#act
CALCVAR HUMAN NBAOS + 2
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 2
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石3]
#IF
CHECKVAR HUMAN NBAOS > 96
#act
goto @存放宝石失败
#elseact
goto @蓝宝石03
[@蓝宝石03]
#IF
checkitem 蓝宝石 3
#act
CALCVAR HUMAN NBAOS + 3
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 3
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石4]
#IF
CHECKVAR HUMAN NBAOS > 95
#act
goto @存放宝石失败
#elseact
goto @蓝宝石04
[@蓝宝石04]
#IF
checkitem 蓝宝石 4
#act
CALCVAR HUMAN NBAOS + 4
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 4
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石5]
#IF
CHECKVAR HUMAN NBAOS > 94
#act
goto @存放宝石失败
#elseact
goto @蓝宝石05
[@蓝宝石05]
#IF
checkitem 蓝宝石 5
#act
CALCVAR HUMAN NBAOS + 5
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 5
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石10]
#IF
CHECKVAR HUMAN NBAOS > 89
#act
goto @存放宝石失败
#elseact
goto @蓝宝石010
[@蓝宝石010]
#IF
checkitem 蓝宝石 10
#act
CALCVAR HUMAN NBAOS + 10
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 10
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石20]
#IF
CHECKVAR HUMAN NBAOS > 79
#act
goto @存放宝石失败
#elseact
goto @蓝宝石020
[@蓝宝石020]
#IF
checkitem 蓝宝石 20
#act
CALCVAR HUMAN NBAOS + 20
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 20
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@蓝宝石30]
#IF
CHECKVAR HUMAN NBAOS > 69
#act
goto @存放宝石失败
#elseact
goto @蓝宝石030
[@蓝宝石030]
#IF
checkitem 蓝宝石 30
#act
CALCVAR HUMAN NBAOS + 30
SAVEVAR HUMAN NBAOS ..\QuestDiary\网络\NBAOSSave.txt
take 蓝宝石 30
goto @存放蓝宝石成功
goto @蓝宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石]
#IF
CHECKVAR HUMAN LBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @绿宝石11
[@绿宝石11]
<COLOR=yellow 你现在拥有:> [<$HUMAN(LBAOS)>] <COLOR=green 颗><COLOR=red 绿宝石><COLOR=green ,请选择你要保管的数量>\ \
<1颗绿宝石/@绿宝石1> <2颗绿宝石/@绿宝石2>\
<3颗绿宝石/@绿宝石3> <4颗绿宝石/@绿宝石4>\
<5颗绿宝石/@绿宝石5> <10颗绿宝石/@绿宝石10>\
<20颗绿宝石/@绿宝石20> <30颗绿宝石/@绿宝石30>\ \ \
<前一步/@宝石仓库>\
[@存放绿宝石成功]
#if
#act
messagebox 存放宝石成功!你现在拥有: <$HUMAN(LBAOS)> 颗绿宝石!
[@绿宝石1]
#IF
CHECKVAR HUMAN LBAOS > 98
#act
goto @宝石仓库以满
#elseact
goto @绿宝石01
[@绿宝石01]
#IF
checkitem 绿宝石 1
#act
CALCVAR HUMAN LBAOS + 1
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 1
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石2]
#IF
CHECKVAR HUMAN LBAOS > 97
#act
goto @存放宝石失败
#elseact
goto @绿宝石02
[@绿宝石02]
#IF
checkitem 绿宝石 2
#act
CALCVAR HUMAN LBAOS + 2
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 2
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石3]
#IF
CHECKVAR HUMAN LBAOS > 96
#act
goto @存放宝石失败
#elseact
goto @绿宝石03
[@绿宝石03]
#IF
checkitem 绿宝石 3
#act
CALCVAR HUMAN LBAOS + 3
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 3
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石4]
#IF
CHECKVAR HUMAN LBAOS > 95
#act
goto @存放宝石失败
#elseact
goto @绿宝石04
[@绿宝石04]
#IF
checkitem 绿宝石 4
#act
CALCVAR HUMAN LBAOS + 4
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 4
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石5]
#IF
CHECKVAR HUMAN LBAOS > 94
#act
goto @存放宝石失败
#elseact
goto @绿宝石05
[@绿宝石05]
#IF
checkitem 绿宝石 5
#act
CALCVAR HUMAN LBAOS + 5
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 5
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石10]
#IF
CHECKVAR HUMAN LBAOS > 89
#act
goto @存放宝石失败
#elseact
goto @绿宝石010
[@绿宝石010]
#IF
checkitem 绿宝石 10
#act
CALCVAR HUMAN LBAOS + 10
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 10
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石20]
#IF
CHECKVAR HUMAN LBAOS > 79
#act
goto @存放宝石失败
#elseact
goto @绿宝石020
[@绿宝石020]
#IF
checkitem 绿宝石 20
#act
CALCVAR HUMAN LBAOS + 20
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 20
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@绿宝石30]
#IF
CHECKVAR HUMAN LBAOS > 69
#act
goto @存放宝石失败
#elseact
goto @绿宝石030
[@绿宝石030]
#IF
checkitem 绿宝石 30
#act
CALCVAR HUMAN LBAOS + 30
SAVEVAR HUMAN LBAOS ..\QuestDiary\网络\LBAOSSave.txt
take 绿宝石 30
goto @存放绿宝石成功
goto @绿宝石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石]
#IF
CHECKVAR HUMAN JGS > 98
#act
goto @宝石仓库以满
#elseact
goto @金刚石11
[@金刚石11]
<COLOR=yellow 你现在拥有:> [<$HUMAN(JGS)>] <COLOR=green 颗><COLOR=red 金刚石><COLOR=green ,请选择你要保管的数量>\ \
<1颗金刚石/@金刚石1> <2颗金刚石/@金刚石2>\
<3颗金刚石/@金刚石3> <4颗金刚石/@金刚石4>\
<5颗金刚石/@金刚石5> <10颗金刚石/@金刚石10>\
<20颗金刚石/@金刚石20> <30颗金刚石/@金刚石30>\ \ \
<前一步/@宝石仓库>\
[@存放金刚石成功]
#if
#act
messagebox 存放宝石成功!你现在拥有: <$HUMAN(JGS)> 颗金刚石!
[@金刚石1]
#IF
CHECKVAR HUMAN JGS > 98
#act
goto @宝石仓库以满
#elseact
goto @金刚石01
[@金刚石01]
#IF
checkitem 金刚石 1
#act
CALCVAR HUMAN JGS + 1
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 1
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石2]
#IF
CHECKVAR HUMAN JGS > 97
#act
goto @存放宝石失败
#elseact
goto @金刚石02
[@金刚石02]
#IF
checkitem 金刚石 2
#act
CALCVAR HUMAN JGS + 2
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 2
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石3]
#IF
CHECKVAR HUMAN JGS > 96
#act
goto @存放宝石失败
#elseact
goto @金刚石03
[@金刚石03]
#IF
checkitem 金刚石 3
#act
CALCVAR HUMAN JGS + 3
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 3
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石4]
#IF
CHECKVAR HUMAN JGS > 95
#act
goto @存放宝石失败
#elseact
goto @金刚石04
[@金刚石04]
#IF
checkitem 金刚石 4
#act
CALCVAR HUMAN JGS + 4
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 4
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石5]
#IF
CHECKVAR HUMAN JGS > 94
#act
goto @存放宝石失败
#elseact
goto @金刚石05
[@金刚石05]
#IF
checkitem 金刚石 5
#act
CALCVAR HUMAN JGS + 5
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 5
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石10]
#IF
CHECKVAR HUMAN JGS > 89
#act
goto @存放宝石失败
#elseact
goto @金刚石010
[@金刚石010]
#IF
checkitem 金刚石 10
#act
CALCVAR HUMAN JGS + 10
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 10
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石20]
#IF
CHECKVAR HUMAN JGS > 79
#act
goto @存放宝石失败
#elseact
goto @金刚石020
[@金刚石020]
#IF
checkitem 金刚石 20
#act
CALCVAR HUMAN JGS + 20
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 20
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@金刚石30]
#IF
CHECKVAR HUMAN JGS > 69
#act
goto @存放宝石失败
#elseact
goto @金刚石030
[@金刚石030]
#IF
checkitem 金刚石 30
#act
CALCVAR HUMAN JGS + 30
SAVEVAR HUMAN JGS ..\QuestDiary\网络\JGSSave.txt
take 金刚石 30
goto @存放金刚石成功
goto @金刚石11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"]
#IF
CHECKVAR HUMAN LFCK > 98
#act
goto @宝石仓库以满
#elseact
goto @"灵符"11
[@"灵符"11]
<COLOR=yellow 你现在拥有:> [<$HUMAN(LFCK)>] <COLOR=green 张><COLOR=red "灵符"><COLOR=green ,请选择你要保管的数量>\ \
<1张"灵符"/@"灵符"1> <2张"灵符"/@"灵符"2>\
<3张"灵符"/@"灵符"3> <4张"灵符"/@"灵符"4>\
<5张"灵符"/@"灵符"5> <10张"灵符"/@"灵符"10>\
<20张"灵符"/@"灵符"20> <30张"灵符"/@"灵符"30>\ \ \
<前一步/@宝石仓库>\
[@存放"灵符"成功]
#if
#act
messagebox 存放"灵符"成功!你现在拥有: <$HUMAN(LFCK)> 张"灵符"!
[@"灵符"1]
#IF
CHECKVAR HUMAN LFCK > 98
#act
goto @宝石仓库以满
#elseact
goto @"灵符"01
[@"灵符"01]
#IF
checkitem 灵符 1
#act
CALCVAR HUMAN LFCK + 1
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 1
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"2]
#IF
CHECKVAR HUMAN LFCK > 97
#act
goto @存放宝石失败
#elseact
goto @"灵符"02
[@"灵符"02]
#IF
checkitem 灵符 2
#act
CALCVAR HUMAN LFCK + 2
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 2
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"3]
#IF
CHECKVAR HUMAN LFCK > 96
#act
goto @存放宝石失败
#elseact
goto @"灵符"03
[@"灵符"03]
#IF
checkitem 灵符 3
#act
CALCVAR HUMAN LFCK + 3
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 3
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"4]
#IF
CHECKVAR HUMAN LFCK > 95
#act
goto @存放宝石失败
#elseact
goto @"灵符"04
[@"灵符"04]
#IF
checkitem 灵符 4
#act
CALCVAR HUMAN LFCK + 4
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 4
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"5]
#IF
CHECKVAR HUMAN LFCK > 94
#act
goto @存放宝石失败
#elseact
goto @"灵符"05
[@"灵符"05]
#IF
checkitem 灵符 5
#act
CALCVAR HUMAN LFCK + 5
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 5
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"10]
#IF
CHECKVAR HUMAN LFCK > 89
#act
goto @存放宝石失败
#elseact
goto @"灵符"010
[@"灵符"010]
#IF
checkitem 灵符 10
#act
CALCVAR HUMAN LFCK + 10
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 10
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"20]
#IF
CHECKVAR HUMAN LFCK > 79
#act
goto @存放宝石失败
#elseact
goto @"灵符"020
[@"灵符"020]
#IF
checkitem 灵符 20
#act
CALCVAR HUMAN LFCK + 20
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 20
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
[@"灵符"30]
#IF
CHECKVAR HUMAN LFCK > 69
#act
goto @存放宝石失败
#elseact
goto @"灵符"030
[@"灵符"030]
#IF
checkitem 灵符 30
#act
CALCVAR HUMAN LFCK + 30
SAVEVAR HUMAN LFCK ..\QuestDiary\网络\LFCKSave.txt
take 灵符 30
goto @存放"灵符"成功
goto @"灵符"11
#ELSEACT
GOTO @存放宝石失败
}