本站主推发布:新开传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,找搜服,仙剑传奇
当前位置: zhaosf首页 > 开服资料 > 传奇脚本 >

沙巴克神秘使者脚本

时间:2017-05-17 00:08来源:传奇私服 作者:新开传奇网站
(@@InPutInteger @@InPutString) [@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 尊敬的密保用户,未验证密保前是不能使用本功能的。
(@@InPutInteger @@InPutString)
[@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
 
[@正文]
风云变换,硝烟又起。\
在地下宫殿和雷炎洞穴等地都有大量的<战备金矿/FColor=56>存在。\
获得这些战备资源后可以交给我,这样可以增加你的战备物资,\
战备物资可以在战时抢夺据点后获取大量药品和召唤强力雇佣兵,\
还可以用于发动佣兵攻城和策略进攻等。\
<给行会贡献战备资源/@资源1>        <购买战备金矿/@资源2>\
<查看我的个人战备资源/@资源3>       <传送相关/@资源4>\
<查看本行会的战备资源/@资源5>       <申请沙巴克攻城战/@requestcastlewar>\
<查询沙巴克攻城战及沙巴克占领情况/@aboutwar> <使用战备物资兑换物品/@资源8>\
 
[@资源8]
你可以使用个人战备物资在我这里兑换各种攻城中的急需物品。\
你目前的个人战备物资为点。\ \
<使用10点个人战备物资兑换1个疗伤药包(任务)/@资源81>\
<使用100点个人战备物资兑换10个疗伤药包(任务)/@资源82>\ \
<返回/@MAIN>
 
[@资源82]
#IF
CHECKBAGSIZE 10
#ACT
 
#ELSEACT
break
#ELSESAY
请预留10格以上包裹空间后再来购买!
 
#IF
LARGE HUMAN 战备物资 99
#ACT
CALCVAR HUMAN 战备物资 - 100
SAVEVAR HUMAN 战备物资 ..\QuestDiary\数据文件\沙巴克积分赛\战备物资.txt
GIVE 疗伤药包(任务) 10
SENDMSG 7 恭喜:你获得了:疗伤药包(任务)*10
BREAK
 
#ELSEACT
break
#ELSESAY
你没有足够的战备物资......
 
[@资源81]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
LARGE HUMAN 战备物资 9
#ACT
CALCVAR HUMAN 战备物资 - 10
SAVEVAR HUMAN 战备物资 ..\QuestDiary\数据文件\沙巴克积分赛\战备物资.txt
GIVE 疗伤药包(任务) 1
SENDMSG 7 恭喜:你获得了:疗伤药包(任务)*1
BREAK
 
#ELSEACT
break
#ELSESAY
你没有足够的战备物资......
 
[@aboutwar]
<$CASTLEWARDATE>。\
目前占领城堡的行会是:<$OWNERGUILD>\ \
<返回/@MAIN>
 
[@requestcastlewar]
#IF
EQUAL A90 开启
#ACT
BREAK
#SAY
沙巴克积分赛开启期间,每天00:00自动设置所有行会自动攻城。\ \
<返回/@MAIN>
 
#ELSEACT
BREAK
#ELSESAY
很抱歉,目前未开放攻城战申请。\
 
[@资源5]
#IF
HAVEGUILD
#ACT
MOV S1
MOV S2
INC S1 <
INC S2 /FColor=56>
MOV S5
GetRandomName ..\QuestDiary\数据文件\沙巴克积分赛\<$GUILDNAME>\战备物资.txt S5
BREAK
#SAY
你的行会目前的战备物资数量为:<$STR(S1)><$STR(S5)><$STR(S2)>。\ \
<返回/@MAIN>
 
#ELSEACT
break
#ELSESAY
你还没有加入行会。\ \ \ \ \ \
<返回/@MAIN>\
 
[@资源4]
沙巴克占领行会可以快速传送到城堡门口,攻城方可以在此传送到\
沙巴克城外。\ \
<进入沙巴克/@资源41>\ \
<进入沙巴克密道/@资源42>\ \
<返回/@MAIN>
 
[@资源42]
#IF
#ACT
MAPMOVE D701 108 155
BREAK
 
[@资源41]
#IF
CHECKCASTLEWAR 沙巴克 
#ACT
 
#ELSEACT
SENDMSG 7 非攻城期间,不能使用此传送...
BREAK
 
#IF
ISCASTLEGUILD
#ACT
mapmove n3 680 340
BREAK
 
#IF
ISDEFENSEALLYGUILD
#ACT
mapmove n3 680 340
BREAK
 
#IF
ISATTACKGUILD Self
#ACT
mapmove n3 720 400
BREAK
 
#IF
ISATTACKALLYGUILD Self
#ACT
mapmove n3 720 400
BREAK
 
#ELSEACT
SENDMSG 7 非相关人员,不能使用此传送...
BREAK
 
[@资源3]
#IF
#ACT
MOV S1
MOV S2
INC S1 <
INC S2 /FColor=56>
BREAK
#SAY
你目前的战备物资数量为:<$STR(S1)><$HUMAN(战备物资)><$STR(S2)>。\ \
<返回/@MAIN>
 
[@资源2]
要想做到有备无患,必须有充足的战备资源,所谓兵马未动,\
粮草先行。我这里屯有大量战备金矿,你可以拿去环城个人战备物资\
和行会战备物资,解决后顾之忧。注:行会战备物资上限为:<50000/FColor=56>。\
<使用10张灵符兑换10个战备金矿/@资源21>\
<使用100张灵符兑换100个战备金矿/@资源22>\
<使用1元宝兑换30个战备金矿/@资源23>\
<使用10元宝兑换300个战备金矿/@资源24>\
<使用100荣耀点兑换30个战备金矿/@资源25>\
<使用1000荣耀点兑换300个战备金矿/@资源26>          <返回/@MAIN>
 
[@资源26]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
LARGE HUMAN 荣耀点 999
#ACT
CALCVAR HUMAN 荣耀点 - 1000
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\数据文件\变量.txt
GIVEKIMNEEDLE 战备金矿 300
SENDMSG 7 恭喜:你获得了:战备金矿*300
BREAK
 
#ELSEACT
break
#ELSESAY
荣耀点不足......
 
[@资源25]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
LARGE HUMAN 荣耀点 99
#ACT
CALCVAR HUMAN 荣耀点 - 100
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\数据文件\变量.txt
GIVEKIMNEEDLE 战备金矿 30
SENDMSG 7 恭喜:你获得了:战备金矿*30
BREAK
 
#ELSEACT
break
#ELSESAY
荣耀点不足......
 
[@资源24]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
CHECKGAMEGOLD > 9
#ACT
CALCVAR HUMAN 消费元宝 + 10
SAVEVAR HUMAN 消费元宝 ..\QuestDiary\数据文件\变量.txt
CALCVAR HUMAN 挑战点 + 10
SAVEVAR HUMAN 挑战点 ..\QuestDiary\数据文件\怪物献礼\挑战点.txt
SENDMSG 6 挑战点数增加10点。
CALCVAR HUMAN 日祝福点 + 10
CALCVAR HUMAN 周祝福点 + 10
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\数据文件\祝福点\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\数据文件\祝福点\周祝福点.txt
SENDMSG 6 祝福点数增加10点。
CALCVAR HUMAN 时效灵符 + 10
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
SENDMSG 6 时效灵符增加10张。
GAMEGOLD - 10
GIVEKIMNEEDLE 战备金矿 300
SENDMSG 7 恭喜:你获得了:战备金矿*300
BREAK
 
#ELSEACT
break
#ELSESAY
元宝不足......
 
[@资源23]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
CHECKGAMEGOLD > 0
#ACT
CALCVAR HUMAN 消费元宝 + 1
SAVEVAR HUMAN 消费元宝 ..\QuestDiary\数据文件\变量.txt
CALCVAR HUMAN 挑战点 + 1
SAVEVAR HUMAN 挑战点 ..\QuestDiary\数据文件\怪物献礼\挑战点.txt
SENDMSG 6 挑战点数增加1点。
CALCVAR HUMAN 日祝福点 + 1
CALCVAR HUMAN 周祝福点 + 1
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\数据文件\祝福点\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\数据文件\祝福点\周祝福点.txt
SENDMSG 6 祝福点数增加1点。
CALCVAR HUMAN 时效灵符 + 1
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
SENDMSG 6 时效灵符增加1张。
GAMEGOLD - 1
GIVEKIMNEEDLE 战备金矿 30
SENDMSG 7 恭喜:你获得了:战备金矿*30
BREAK
 
#ELSEACT
break
#ELSESAY
元宝不足......
 
[@资源22]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
CHECKVAR HUMAN 时效灵符 > 99
#ACT
CALCVAR HUMAN 时效灵符 - 100
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
GIVEKIMNEEDLE 战备金矿 100
SENDMSG 7 恭喜:你获得了:战备金矿*100
BREAK
 
#IF
CHECKGAMEGIRD > 99
#ACT
GAMEGIRD - 100
GIVEKIMNEEDLE 战备金矿 100
SENDMSG 7 恭喜:你获得了:战备金矿*100
BREAK
 
#ELSEACT
break
#ELSESAY
对不起,你的灵符或时效灵符数量不足,不能进行购买!
 
[@资源21]
#IF
CHECKBAGSIZE 1
#ACT
 
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
 
#IF
CHECKVAR HUMAN 时效灵符 > 9
#ACT
CALCVAR HUMAN 时效灵符 - 10
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
GIVEKIMNEEDLE 战备金矿 10
SENDMSG 7 恭喜:你获得了:战备金矿*10
BREAK
 
#IF
CHECKGAMEGIRD > 9
#ACT
GAMEGIRD - 10
GIVEKIMNEEDLE 战备金矿 10
SENDMSG 7 恭喜:你获得了:战备金矿*10
BREAK
 
#ELSEACT
break
#ELSESAY
对不起,你的灵符或时效灵符数量不足,不能进行购买!
 
[@资源1]
众志成城,无往不利,团结一直才能克敌制胜。\
你可以在这里将你收集的战备资源交给我,包括战备金矿和泉水,\
还可以提高你的个人战备物资和你行会的行会战备物资数量,\
在攻城战时期,战备物资可以让你如鱼得水,如虎添翼。\ \ (责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容