论坛 › 传奇脚本 › 编写最完整的仿官方宫殿商人-T1061A脚本

逍遥MIR 发表于 2024-6-16 00:32:08

编写最完整的仿官方宫殿商人-T1061A脚本

(@buy @sell @storage @getback @repair @s_repair )

%100
+0
+1
+3
+5
+6
+10
+11
+15
+19
+20
+21
+22
+23
+24
+26
+27
+28
+29
+30
+42
+43
+53
+27
+28
+29
[@MAIN]
#IF
CHECKVAR HUMAN mbzt > 5
#ACT
DELAYGOTO 3 @正文
break
#IF
CHECKVAR HUMAN mbzt < 6
CHECKVAR HUMAN mbzt > 4
#ACT
DELAYGOTO 3 @正文
break
#IF
CHECKVAR HUMAN mbzt < 5
CHECKVAR HUMAN mbzt > 3
#ACT
MESSAGEBOX 尊敬的密保用户，未验证密保前是不能使用本功能的。
#IF
CHECKVAR HUMAN mbzt < 4
CHECKVAR HUMAN mbzt > 2
#ACT
DELAYGOTO 3 @正文
break
#IF
CHECKVAR HUMAN mbzt < 3
CHECKVAR HUMAN mbzt > 1
#ACT
MESSAGEBOX 尊敬的密保用户，未验证密保前是不能使用本功能的
break
#ELSEACT
DELAYGOTO 3 @正文
break

[@正文]
你竟然能跑到这里来？\
看在你这么卖命的份上，我就帮助你一下。\ \
<买/@buy>　　　　 <卖/@sell>\
<修理/@repair>　　　　<特殊修理/@s_repair>\
<管理仓库/@使用仓库>\ \
<退出/@exit>

[@使用仓库]
您可以将物品寄存在我这里。为每一位勇士保管好武器和战斗装备\
是我的天职。\ \ \
<角色仓库/@角色仓库>　　　　　　　　　　　　　　<药品仓库/@药品仓库>\ \
<捆/@MBIND>各种卷书和药水\ \
<返回/@main>\

[@药品仓库]
药品仓库：目前能存取疗伤药包、万年雪霜包，强化生命药剂、\
超级疗伤药、强效万年雪霜包、强效疗伤药包。\
<存取疗伤药包、万年雪霜包/@仓库1>\ \
<存取强化生命药剂/@仓库2>　　　　　　　　　　<存取强效万年雪霜包/@仓库3>\
<存取超级疗伤药/@仓库4>　　　　　　　　　　　<存取强效疗伤药包/@仓库5>\
<存取疗伤药包(任务)/@仓库6>\ \
<返回/@MAIN>\

[@仓库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
#ELSEACT
MESSAGEBOX 超级疗伤药可储存数量超过上限！
break

#IF
checkitem 超级疗伤药 1
#ACT
TAKE 超级疗伤药 1
CALCVAR HUMAN 超级疗伤药 + 1
SAVEVAR HUMAN 超级疗伤药 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库4
break
#ELSEACT
MESSAGEBOX 你没有1个超级疗伤药！
break

[@仓库3]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 强效万年雪霜包
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
#SAY
你储存的强效万年雪霜包数量为(该药品仓库可储存总量为44)：\
强效万年雪霜包:<$STR(S1)>\ \
你想要储存或取回什么药品呢？\ \
<存储强效万年雪霜包/@仓库31>　　　　　　　　　　<取回强效万年雪霜包/@仓库32>\
<存储5包强效万年雪霜包/@仓库33>　　　　　　　　 <取回5包强效万年雪霜包/@仓库34>\ \
<返回/@药品仓库>\

[@仓库34]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间！
break

#IF
CHECKVAR HUMAN 强效万年雪霜包 > 4
#ACT
GIVE 强效万年雪霜包 5
CALCVAR HUMAN 强效万年雪霜包 - 5
SAVEVAR HUMAN 强效万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库3
break

#ELSEACT
MESSAGEBOX 强效万年雪霜包可取回数量超过下限！
break

[@仓库33]
#IF
CHECKVAR HUMAN 强效万年雪霜包 < 40
#ACT
#ELSEACT
MESSAGEBOX 强效万年雪霜包可储存数量超过上限！
break

#IF
checkitem 强效万年雪霜包 5
#ACT
TAKE 强效万年雪霜包 5
CALCVAR HUMAN 强效万年雪霜包 + 5
SAVEVAR HUMAN 强效万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库3
break
#ELSEACT
MESSAGEBOX 你没有5个强效万年雪霜包！
break

[@仓库32]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间！
break

#IF
CHECKVAR HUMAN 强效万年雪霜包 > 0
#ACT
GIVE 强效万年雪霜包 1
CALCVAR HUMAN 强效万年雪霜包 - 1
SAVEVAR HUMAN 强效万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库3
break

#ELSEACT
MESSAGEBOX 强效万年雪霜包可取回数量超过下限！
break

[@仓库31]
#IF
CHECKVAR HUMAN 强效万年雪霜包 < 44
#ACT
#ELSEACT
MESSAGEBOX 强效万年雪霜包可储存数量超过上限！
break

#IF
checkitem 强效万年雪霜包 1
#ACT
TAKE 强效万年雪霜包 1
CALCVAR HUMAN 强效万年雪霜包 + 1
SAVEVAR HUMAN 强效万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库3
break
#ELSEACT
MESSAGEBOX 你没有1个强效万年雪霜包！
break

[@仓库2]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 强化生命药剂
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
#SAY
你储存的强化生命药剂数量为(该药品仓库可储存总量为10)：\
强化生命药剂:<$STR(S1)>\ \
你想要储存或取回什么药品呢？\ \
<存储强化生命药剂/@仓库21>　　　　　　　　　　<取回强化生命药剂/@仓库22>\
<存储5瓶强化生命药剂/@仓库23>　　　　　　　　 <取回5瓶强化生命药剂/@仓库24>\ \
<返回/@药品仓库>\

[@仓库24]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间！
break

#IF
CHECKVAR HUMAN 强化生命药剂 > 4
#ACT
GIVE 强化生命药剂 5
CALCVAR HUMAN 强化生命药剂 - 5
SAVEVAR HUMAN 强化生命药剂 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库2
break

#ELSEACT
MESSAGEBOX 强化生命药剂可取回数量超过下限！
break

[@仓库23]
#IF
CHECKVAR HUMAN 强化生命药剂 < 6
#ACT
#ELSEACT
MESSAGEBOX 强化生命药剂可储存数量超过上限！
break

#IF
checkitem 强化生命药剂 5
#ACT
TAKE 强化生命药剂 5
CALCVAR HUMAN 强化生命药剂 + 5
SAVEVAR HUMAN 强化生命药剂 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库2
break
#ELSEACT
MESSAGEBOX 你没有5个强化生命药剂！
break

[@仓库22]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间！
break

#IF
CHECKVAR HUMAN 强化生命药剂 > 0
#ACT
GIVE 强化生命药剂 1
CALCVAR HUMAN 强化生命药剂 - 1
SAVEVAR HUMAN 强化生命药剂 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库2
break

#ELSEACT
MESSAGEBOX 强化生命药剂可取回数量超过下限！
break

[@仓库21]
#IF
CHECKVAR HUMAN 强化生命药剂 < 10
#ACT
#ELSEACT
MESSAGEBOX 强化生命药剂可储存数量超过上限！
break

#IF
checkitem 强化生命药剂 1
#ACT
TAKE 强化生命药剂 1
CALCVAR HUMAN 强化生命药剂 + 1
SAVEVAR HUMAN 强化生命药剂 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库2
break
#ELSEACT
MESSAGEBOX 你没有1个强化生命药剂！
break

[@仓库1]
药品仓库：\ \ \
<存储/@仓库11>疗伤药包、万年雪霜药包\ \
<取回/@仓库12>疗伤药包、万年雪霜药包\ \ \
<返回/@药品仓库>\

[@仓库12]
#ACT
MOV S1
MOV S2
MOV S3
MOV S4
MOV S2 HUMAN 疗伤药包
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
MOV S4 HUMAN 万年雪霜包
MOV S3 <
INC S3 S4
INC S3 /FColor=56>
#SAY
你在药品仓库存储的药品数量为(该药品仓库可存储总量为44)：\
疗伤药包：　　　<$STR(S1)>\
万年雪霜包：　　<$STR(S3)>\ \
你想要取回什么药品呢？\ \
<取回疗伤药包/@仓库121>　　　　　　　　　　<取回万年雪霜包/@仓库122>\
<取回5包疗伤药包/@仓库123>　　　　　　　　 <取回5包万年雪霜包/@仓库124>\
<返回/@仓库1>\

[@仓库124]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间！
break

#IF
CHECKVAR HUMAN 万年雪霜包 > 4
#ACT
GIVE 万年雪霜包 5
CALCVAR HUMAN 万年雪霜包 - 5
SAVEVAR HUMAN 万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库12
break

#ELSEACT
MESSAGEBOX 万年雪霜包可取回数量超过下限！
break

[@仓库123]
#IF
CHECKBAGSIZE 5
#ACT
#ELSEACT
MESSAGEBOX 请预留5格以上包裹空间！
break

#IF
CHECKVAR HUMAN 疗伤药包 > 4
#ACT
GIVE 疗伤药包 5
CALCVAR HUMAN 疗伤药包 - 5
SAVEVAR HUMAN 疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库12
break

#ELSEACT
MESSAGEBOX 疗伤药包可取回数量超过下限！
break

[@仓库122]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间！
break

#IF
CHECKVAR HUMAN 万年雪霜包 > 0
#ACT
GIVE 万年雪霜包 1
CALCVAR HUMAN 万年雪霜包 - 1
SAVEVAR HUMAN 万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库12
break

#ELSEACT
MESSAGEBOX 万年雪霜包可取回数量超过下限！
break

[@仓库121]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MESSAGEBOX 请预留1格以上包裹空间！
break

#IF
CHECKVAR HUMAN 疗伤药包 > 0
#ACT
GIVE 疗伤药包 1
CALCVAR HUMAN 疗伤药包 - 1
SAVEVAR HUMAN 疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库12
break

#ELSEACT
MESSAGEBOX 疗伤药包可取回数量超过下限！
break

[@仓库11]
#ACT
MOV S1
MOV S2
MOV S3
MOV S4
MOV S2 HUMAN 疗伤药包
MOV S1 <
INC S1 S2
INC S1 /FColor=56>
MOV S4 HUMAN 万年雪霜包
MOV S3 <
INC S3 S4
INC S3 /FColor=56>
#SAY
你在药品仓库存储的药品数量为(该药品仓库可存储总量为44)：\
疗伤药包：　　　<$STR(S1)>\
万年雪霜包：　　<$STR(S3)>\ \
你想要存储什么药品呢？\ \
<存储疗伤药包/@仓库111>　　　　　　　　　　<存储万年雪霜包/@仓库112>\
<存储5包疗伤药包/@仓库113>　　　　　　　　 <存储5包万年雪霜包/@仓库114>\
<返回/@仓库1>\

[@仓库114]
#IF
CHECKVAR HUMAN 万年雪霜包 < 40
#ACT
#ELSEACT
MESSAGEBOX 万年雪霜包可储存数量超过上限！
break

#IF
checkitem 万年雪霜包 5
#ACT
TAKE 万年雪霜包 5
CALCVAR HUMAN 万年雪霜包 + 5
SAVEVAR HUMAN 万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库11
break
#ELSEACT
MESSAGEBOX 你没有5个万年雪霜包！
break

[@仓库113]
#IF
CHECKVAR HUMAN 疗伤药包 < 40
#ACT
#ELSEACT
MESSAGEBOX 疗伤药包可储存数量超过上限！
break

#IF
checkitem 疗伤药包 5
#ACT
TAKE 疗伤药包 5
CALCVAR HUMAN 疗伤药包 + 5
SAVEVAR HUMAN 疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库11
break
#ELSEACT
MESSAGEBOX 你没有5个疗伤药包！
break

[@仓库112]
#IF
CHECKVAR HUMAN 万年雪霜包 < 44
#ACT
#ELSEACT
MESSAGEBOX 万年雪霜包可储存数量超过上限！
break

#IF
checkitem 万年雪霜包 1
#ACT
TAKE 万年雪霜包 1
CALCVAR HUMAN 万年雪霜包 + 1
SAVEVAR HUMAN 万年雪霜包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库11
break
#ELSEACT
MESSAGEBOX 你没有1个万年雪霜包！
break

[@仓库111]
#IF
CHECKVAR HUMAN 疗伤药包 < 44
#ACT
#ELSEACT
MESSAGEBOX 疗伤药包可储存数量超过上限！
break

#IF
checkitem 疗伤药包 1
#ACT
TAKE 疗伤药包 1
CALCVAR HUMAN 疗伤药包 + 1
SAVEVAR HUMAN 疗伤药包 ..\QuestDiary\数据文件\变量.txt
DELAYGOTO 3 @仓库11
break
#ELSEACT
MESSAGEBOX 你没有1个疗伤药包！
break

[@角色仓库]
您可以将宝藏先寄存在我这里，\
为每一位勇士保管好武器和战斗装备是我的天职。\ \ \
<保管/@storage>东西　　　　　　　　　　　　<找回/@getback>东西\ \ \ \
<返回/@MAIN>\

[@storage]
需要保管什么东西？\ \ \
<返回/@角色仓库>\

[@getback]
请看目录决定找什么东西。\ \ \
<返回/@角色仓库>\

[@Mbind]
你知道我是什么人吗？你对我这么信任？\
这可都是巨额交易啊!\
你要试一下吗？那就尽管放心好了!\
<金币换金条./@changeGold>\
<金条换金币./@changeMoney>\
<捆药瓶和卷轴/@bind>\ \ \
<返回/@使用仓库>\

[@changeGold]
#IF
      checkgold 1000000
#SAY
你说你要用金币换成金条? \
好的，我帮你换 \
但是要支付手续费 \
费用是2000金币，你还换吗？ \ \

<交换/@changeGold_1> \
<取消/@exit>
#ELSESAY
你连这点钱都没有，还换什么？ \
等你有足够的钱，再来找我吧 \ \
<返回/@main>

[@changeGold_1]
#IF
      CHECKBAGSIZE 1
      checkgold 1002000
#ACT
      take 金币 1002000
      give 金条 1
#SAY
金币已经换好金条了. \
还换吗？ \ \

<交换/@changeGold> \
<取消/@exit>

#ELSESAY
你的包里东西已经满了，或者你没有足够的钱支付手续费\
你再确认一下吧 \ \
<取消/@exit>

[@changeMoney]
#IF
      checkitem 金条 1
#SAY
你要把金条换成金币? \
好的，我给你换 \
不过需要支付手续费\
费用是2000金币，你还换吗？ \ \

<交换/@changeMoney_1> \
<取消/@exit>

#ELSESAY
你都没有金条还换什么? \
想骗我?快滚! \ \
<取消/@exit>

[@changeMoney_1]
#IF
      checkitem 金条 1
      checkgold 4002001
#SAY
我也很想给你换， \
但是你钱太多了，我没办法给你换. \ \
<取消/@exit>
#ELSEACT
      DELAYGOTO 3 @changeMoney_2

[@changeMoney_2]
#IF
      checkitem 金条 1
#ACT
      take 金条 1
      give 金币 998000
#SAY
金条已经换好金币了. \
还换吗？ \ \

<交换/@changeMoney> \
<取消/@exit>

[@bind]
目前我能捆的只有卷书和药水\
你要捆吗？\
要捆东西需要100金币. \ \
<捆/@P_bind>药水 \
<捆/@Z_bind>卷书 \
[@P_bind]
<捆/@ch_bind1> 强效金创药\
<捆/@ma_bind1> 强效魔法药\
<捆/@ch_bind2> 金创药(中量)\
<捆/@ma_bind2> 魔法药(中量)\
<捆/@ch_binD3> 金创药(小量)\
<捆/@ma_binD3> 魔法药(小量)\
<返回/@bind>\
[@Z_bind]
<捆/@zum_bind1> 地牢逃脱卷\
<捆/@zum_bind2> 随机传送卷\
<捆/@zum_binD3> 回城卷\
<捆/@zum_bind4> 行会回城卷\
<返回/@bind>\
[@ch_bind1]
#IF
checkitem 强效金创药 6
#ACT
DELAYGOTO 3 @ch_bind1_1
#ELSESAY
你都没有要捆的药水，还捆什么？ \
等准备好药水之后再来找我吧.. \ \
<取消/@exit>
[@ch_bind1_1]
#IF
checkgold 100
checkitem 强效金创药 6
#ACT
take 金币 100
take 强效金创药 6
give 超级金创药 1
#SAY
已经捆好了... 我的技术不错吧.. \
还有要捆的就拿给我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@ma_bind1]
#IF
checkitem 强效魔法药 6
#ACT
DELAYGOTO 3 @ma_bind1_1
#ELSESAY
你都没有药水捆，还捆什么？ \
等准备好药水之后，再来找我吧. \ \
<取消/@exit>
[@ma_bind1_1]
#IF
checkgold 100
checkitem 强效魔法药 6
#ACT
take 金币 100
take 强效魔法药 6
give 超级魔法药 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@ch_bind2]
#IF
checkitem 金创药(中量) 6
#ACT
DELAYGOTO 3 @ch_bind2_1
#ELSESAY
你都没有药水捆，还捆什么？ \
等准备好药水之后，再来找我吧. \ \
<取消/@exit>
[@ch_bind2_1]
#IF
checkgold 100
checkitem 金创药(中量) 6
#ACT
take 金币 100
take 金创药(中量) 6
give 金创药(中)包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@ma_bind2]
#IF
checkitem 魔法药(中量) 6
#ACT
DELAYGOTO 3 @ma_bind2_1
#ELSESAY
你都没有药水捆，还捆什么？ \
等准备好药水之后，再来找我吧. \ \
<取消/@exit>
[@ma_bind2_1]
#IF
checkgold 100
checkitem 魔法药(中量) 6
#ACT
take 金币 100
take 魔法药(中量) 6
give 魔法药(中)包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@ch_binD3]
#IF
checkitem 金创药 6
#ACT
DELAYGOTO 3 @ch_binD3_1
#ELSESAY
你都没有药水捆，还捆什么？ \
等准备好药水之后，再来找我吧. \ \
<取消/@exit>
[@ch_binD3_1]
#IF
checkgold 100
checkitem 金创药 6
#ACT
take 金币 100
take 金创药 6
give 金创药(小)包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@ma_binD3]
#IF
checkitem 魔法药 6
#ACT
DELAYGOTO 3 @ma_binD3_1
#ELSESAY
你都没有药水捆，还捆什么？ \
等准备好药水之后，再来找我吧. \ \
<取消/@exit>
[@ma_binD3_1]
#IF
checkgold 100
checkitem 魔法药 6
#ACT
take 金币 100
take 魔法药 6
give 魔法药(小)包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@P_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@zum_bind1]
#IF
checkitem 地牢逃脱卷 6
#ACT
DELAYGOTO 3 @zum_bind1_1
#ELSESAY
你都没有可以捆的卷书，还捆什么？ \
等准备好之后，再来找我吧.. \ \
<取消/@exit>
[@zum_bind1_1]
#IF
checkgold 100
checkitem 地牢逃脱卷 6
#ACT
take 金币 100
take 地牢逃脱卷 6
give 地牢逃脱卷包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@z_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@zum_bind2]
#IF
checkitem 随机传送卷 6
#ACT
DELAYGOTO 3 @zum_bind2_1
#ELSESAY
你都没有可以捆的卷书，还捆什么？ \
等准备好之后，再来找我吧.. \ \
<取消/@exit>
[@zum_bind2_1]
#IF
checkgold 100
checkitem 随机传送卷 6
#ACT
take 金币100
take 随机传送卷 6
give 随机传送卷包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@z_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@zum_binD3]
#IF
checkitem 回城卷 6
#ACT
DELAYGOTO 3 @zum_binD3_1
#ELSESAY
你都没有可以捆的卷书，还捆什么？ \
等准备好之后，再来找我吧.. \ \
<取消/@exit>
[@zum_binD3_1]
#IF
checkgold 100
checkitem 回城卷 6
#ACT
take 金币 100
take 回城卷 6
give 回城卷包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@z_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>
[@zum_bind4]
#IF
checkitem 行会回城卷 6
#ACT
DELAYGOTO 3 @zum_bind4_1
#ELSESAY
你都没有可以捆的卷书，还捆什么？ \
等准备好之后，再来找我吧.. \ \
<取消/@exit>
[@zum_bind4_1]
#IF
checkgold 100
checkitem 行会回城卷 6
#ACT
take 金币 100
take 行会回城卷 6
give 行会回城卷包 1
#SAY
已经捆好了... 我的技术不错吧.. \
以后还有要捆的，就来找我吧.. \ \
<继续捆/@z_bind> \
<取消/@exit>
#ELSESAY
你都没有钱捆东西，\
还捆什么？ \
快走吧.... \ \
<取消/@exit>

[@s_repair]
#IF
#SAY
你小子运气好，我正在有特殊修理所需的原材料，不过价格可是\
普通的三倍哟，我就靠这个赚钱了。\ \
<返回/@main>
[@buy]
想买些什么东西？\ \ \
<返回/@main>
[@sell]
给我您要卖的东西！\ \ \
<返回/@main>
[@repair]
需要修理什么东西？\
我可是集工匠、木匠和铁匠的手艺于一身哦！\\
<返回/@main>
[~@repair]
怎么样？修好了吧。看起来比新的还值钱！\ \
<返回/@main>

超级护身符      10      100
金创药(中量)      10      100
魔法药(中量)      10      100
强效金创药      10      100
强效魔法药      10      100
金创药(中)包      10      100
魔法药(中)包      10      100
超级金创药      10      100
超级魔法药      10      100
地牢逃脱卷      10      100
随机传送卷      10      100
护身符                10      100
护身符(大)      10      100
灰色药粉(中量)      10      100
黄色药粉(中量)      10      100
古铜戒指      10      10
六角戒指      10      10
玻璃戒指      10      10
牛角戒指      10      10
蓝色水晶戒指      10      10
黑色水晶戒指      10      10
生铁戒指      10      10
金戒指                10      10
魅力戒指      20      10
道德戒指      20      10
蛇眼戒指      20      10
珍珠戒指      20      10
骷髅戒指      20      10
珊瑚戒指      20      10
降妖除魔戒指      20      10
小手镯               10      10
银手镯                10      10
铁手镯                10      10
钢手镯                10      10
皮制手套      10      10
大手镯                10      10
坚固手套      10      10
魔力手镯      10      10
金手镯                10      10
道士手镯      20      10
黑檀手镯      20      10
死神手套      20      10
传统项链      20      10
金项链                20      10
黑檀项链      20      10
黄色水晶项链      20      10
黑色水晶项链      20      10
灯笼项链      20      10
白色虎齿项链      20      10
魔鬼项链      20      10
琥珀项链      20      10
白金项链      20      10
凤凰明珠      20      10
蓝翡翠项链      20      10
放大镜                20      10
竹笛                20      10
轻型盔甲(男)      20      10
轻型盔甲(女)      20      10
中型盔甲(男)      20      10
中型盔甲(女)      20      10
重盔甲(男)      20      10
重盔甲(女)      20      10
灵魂战衣(男)      20      10
灵魂战衣(女)      20      10
魔法长袍(男)      20      10
魔法长袍(女)      20      10
幽灵战衣(男)      20      10
幽灵战衣(女)      20      10
战神盔甲(男)      20      10
战神盔甲(女)      20      10
恶魔长袍(男)      20      10
恶魔长袍(女)      20      10
乌木剑                20      10
八荒                20      10
海魂                20      10
半月                20      10
凌风                20      10
斩马刀                20      10
偃月                20      10
降魔                20      10
破魂                20      10
修罗                20      10
凝霜                20      10
鹤嘴锄                20      10
炼狱                20      10
银蛇                20      10
魔杖                20      10

查看完整版本: 编写最完整的仿官方宫殿商人-T1061A脚本