(@storage @getback)
%100
[@main]
<$USERNAME>,感谢来到卧龙酒馆!您是想要喝一点酒吧?\
目前这里只有烧酒,不过嘛...\
很快玛法大陆都会沉浸在一片酒香中的。烧酒每坛1元宝,嘿嘿。\ \
<管理仓库/@使用仓库> \
<购买物品/@购买物品> \
<返回盟重/@回土城>\
[@送去]
#CALL [\游戏功能\秘境回酒馆.txt] @返回
[@打听消息]
<打听消息/@先天属性秘密>\ \
<探听酒的秘密/@探听酒>\ \ \ \
<返回/@main>\
[@探听酒]
#ACT
#Call [\\游戏功能\听酒消息.txt] @消息
[@购买物品]
<买烧酒/@买酒>\ \
<买泉水罐/@泉水罐>\ \ \ \
<返回/@main>\
[@买酒]
#IF
CHECKGAMEGOLD > 0
#ACT
GAMEGOLD - 1
GIVE 烧酒 1
DELAYGOTO 3 @main
BREAK
#elsesay
你的元宝数目不足
[@进入]
#if
#act
mapmove 0170 9 20
BREAK
close
[@回土城]
#if
#act
close
mapmove n3 330 330
[@使用仓库]
您可以将物品寄存在我这里。为每一位勇士保管好武器和战斗装备\
是我的天职。\ \ \
<角色仓库/@角色仓库> <药品仓库/@药品仓库>\ \
<捆/@MBIND>各种卷书和药水\ \
<返回/@main>\
[@药品仓库]
药品仓库:目前能存取疗伤药包、万年雪霜包,强化生命药剂、\
超级疗伤药、强效万年雪霜包、强效疗伤药包。\
<存取疗伤药包、万年雪霜包/@仓库1>\ \
<存取强化生命药剂/@仓库2> <存取强效万年雪霜包/@仓库3>\
<存取超级疗伤药/@仓库4> <存取强效疗伤药包/@仓库5>\
<存取疗伤药包(任务)/@仓库6>\ \
<返回/@使用仓库>\
[@仓库6]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 疗伤药包(任务)
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
#SAY
你储存的疗伤药包(任务)数量为(该药品仓库可储存总量为44):\
疗伤药包(任务):<$STR(S1)>\ \
你想要储存或取回什么药品呢?\ \
<存储疗伤药包(任务)/@仓库61> <取回疗伤药包(任务)/@仓库62>\
<存储5包疗伤药包(任务)/@仓库63> <取回5包疗伤药包(任务)/@仓库64>\ \
<返回/@药品仓库>\
[@仓库64]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间!
break
#IF
CHECKVAR HUMAN 疗伤药包(任务) > 4
#ACT
GIVE 疗伤药包(任务) 5
CALCVAR HUMAN 疗伤药包(任务) - 5
SAVEVAR HUMAN 疗伤药包(任务) ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库6
break
#ELSEACT
MESSAGEBOX 疗伤药包(任务)可取回数量超过下限!
break
[@仓库63]
#IF
CHECKVAR HUMAN 疗伤药包(任务) < 40
#ACT
#ELSEACT
MESSAGEBOX 疗伤药包(任务)可储存数量超过上限!
break
#IF
checkitem 疗伤药包(任务) 5
#ACT
TAKE 疗伤药包(任务) 5
CALCVAR HUMAN 疗伤药包(任务) + 5
SAVEVAR HUMAN 疗伤药包(任务) ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库6
break
#ELSEACT
MESSAGEBOX 你没有5个疗伤药包(任务)!
break
[@仓库62]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间!
break
#IF
CHECKVAR HUMAN 疗伤药包(任务) > 0
#ACT
GIVE 疗伤药包(任务) 1
CALCVAR HUMAN 疗伤药包(任务) - 1
SAVEVAR HUMAN 疗伤药包(任务) ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库6
break
#ELSEACT
MESSAGEBOX 疗伤药包(任务)可取回数量超过下限!
break
[@仓库61]
#IF
CHECKVAR HUMAN 疗伤药包(任务) < 44
#ACT
#ELSEACT
MESSAGEBOX 疗伤药包(任务)可储存数量超过上限!
break
#IF
checkitem 疗伤药包(任务) 1
#ACT
TAKE 疗伤药包(任务) 1
CALCVAR HUMAN 疗伤药包(任务) + 1
SAVEVAR HUMAN 疗伤药包(任务) ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库6
break
#ELSEACT
MESSAGEBOX 你没有1个疗伤药包(任务)!
break
[@仓库5]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 强效疗伤药包
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
#SAY
你储存的强效疗伤药包数量为(该药品仓库可储存总量为44):\
强效疗伤药包:<$STR(S1)>\ \
你想要储存或取回什么药品呢?\ \
<存储强效疗伤药包/@仓库51> <取回强效疗伤药包/@仓库52>\
<存储5包强效疗伤药包/@仓库53> <取回5包强效疗伤药包/@仓库54>\ \
<返回/@药品仓库>\
[@仓库54]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间!
break
#IF
CHECKVAR HUMAN 强效疗伤药包 > 4
#ACT
GIVE 强效疗伤药包 5
CALCVAR HUMAN 强效疗伤药包 - 5
SAVEVAR HUMAN 强效疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库5
break
#ELSEACT
MESSAGEBOX 强效疗伤药包可取回数量超过下限!
break
[@仓库53]
#IF
CHECKVAR HUMAN 强效疗伤药包 < 40
#ACT
#ELSEACT
MESSAGEBOX 强效疗伤药包可储存数量超过上限!
break
#IF
checkitem 强效疗伤药包 5
#ACT
TAKE 强效疗伤药包 5
CALCVAR HUMAN 强效疗伤药包 + 5
SAVEVAR HUMAN 强效疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库5
break
#ELSEACT
MESSAGEBOX 你没有5个强效疗伤药包!
break
[@仓库52]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间!
break
#IF
CHECKVAR HUMAN 强效疗伤药包 > 0
#ACT
GIVE 强效疗伤药包 1
CALCVAR HUMAN 强效疗伤药包 - 1
SAVEVAR HUMAN 强效疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库5
break
#ELSEACT
MESSAGEBOX 强效疗伤药包可取回数量超过下限!
break
[@仓库51]
#IF
CHECKVAR HUMAN 强效疗伤药包 < 44
#ACT
#ELSEACT
MESSAGEBOX 强效疗伤药包可储存数量超过上限!
break
#IF
checkitem 强效疗伤药包 1
#ACT
TAKE 强效疗伤药包 1
CALCVAR HUMAN 强效疗伤药包 + 1
SAVEVAR HUMAN 强效疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库5
break
#ELSEACT
MESSAGEBOX 你没有1个强效疗伤药包!
break
[@仓库4]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 超级疗伤药
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
#SAY
你储存的超级疗伤药数量为(该药品仓库可储存总量为44):\
超级疗伤药:<$STR(S1)>\ \
你想要储存或取回什么药品呢?\ \
<存储超级疗伤药/@仓库41> <取回超级疗伤药/@仓库42>\
<存储5瓶超级疗伤药/@仓库43> <取回5瓶超级疗伤药/@仓库44>\ \
<返回/@药品仓库>\
[@仓库44]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间!
break
#IF
CHECKVAR HUMAN 超级疗伤药 > 4
#ACT
GIVE 超级疗伤药 5
CALCVAR HUMAN 超级疗伤药 - 5
SAVEVAR HUMAN 超级疗伤药 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库4
break
#ELSEACT
MESSAGEBOX 超级疗伤药可取回数量超过下限!
break
[@仓库43]
#IF
CHECKVAR HUMAN 超级疗伤药 < 40
#ACT
#ELSEACT
MESSAGEBOX 超级疗伤药可储存数量超过上限!
break
#IF
checkitem 超级疗伤药 5
#ACT
TAKE 超级疗伤药 5
CALCVAR HUMAN 超级疗伤药 + 5
SAVEVAR HUMAN 超级疗伤药 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库4
break
#ELSEACT
MESSAGEBOX 你没有5个超级疗伤药!
break
[@仓库42]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间!
break
#IF
CHECKVAR HUMAN 超级疗伤药 > 0
#ACT
GIVE 超级疗伤药 1
CALCVAR HUMAN 超级疗伤药 - 1
SAVEVAR HUMAN 超级疗伤药 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库4
break
#ELSEACT
MESSAGEBOX 超级疗伤药可取回数量超过下限!
break
[@仓库41]
#IF
CHECKVAR HUMAN 超级疗伤药 < 44
#ACT
(责任编辑:找搜服传奇发布网) |