当前位置: > 好私服> 正文
完超级变态合击整的传奇地利据点脚本案例分析
发布时间:2020-5-19 23:33:24 来源:http://www.hu87.com 作者:
[@main]
#IF
CHECKCASTLEWAR 幻境沙巴克
#ACT
#ELSEACT
BREAK
#ELSESAY
硝烟不断,战火再起。\
勇士们何时才能刀枪入库,马放南山,玛法大陆何时才能恢复往日的\
宁静。\
只有沙巴克行会和申请了攻城的行会才能占领据点旗帜。\ \
每次攻城站开始的时候,所有据点会恢复中立状态;如果当天/FColor=56\
没有攻城站,则据点将延续前一天的占领状态。/FColor=56\
#IF
CHECKGUILDLIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
#ACT
MOV S10
GetRandomName ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt S10
BREAK
#SAY变态热血江湖
贵行会已经占领【地利据点】,可使用战备物资兑换药品召唤强力雇佣兵。\
现在就要兑换吗?\
行会战备物资:$STR(S10)。\ \
使用10点行会战备物资兑换1个疗伤药包(任务)/@资源1\
使用100点行会战备物资兑换10个疗伤药包(任务)/@资源2\
使用1000点行会战备物资兑换1个强力雇佣兵/@资源3\ \
返回/@MAIN
;#ELSEACT
;BREAK
;#ELSESAY
;贵行会未能占领【地利据点】,还不能使用战备物资兑换药品召唤强力雇佣兵。\
;现在就占领此据点吗?\ \
;占领此据点/@占领 \
[@占领]
#IF
ISATTACKGUILD
#ACT
MOV A31
MOV A31 地利据点\
INC A31 $GUILDNAME
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
ADDGUILDLIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
SENDMSG 0 [地利据点 已被 $GUILDNAME 占领]
BREAK
CLOSE
#IF
ISATTACKALLYGUILD
#ACT
MOV A31
MOV A31 地利据点\
INC A31 $GUILDNAME
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
ADDGUILDLIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
SENDMSG 0 [地利据点 已被 $GUILDNAME 占领]
BREAK
CLOSE
#IF
ISDEFENSEGUILD
#ACT
MOV A31
MOV A31 地利据点\
INC A31 $GUILDNAME
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
ADDGUILDLIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
SENDMSG 0 [地利据点 已被 $GUILDNAME 占领]
BREAK
CLOSE
#IF
ISDEFENSEALLYGUILD
#ACT
MOV A31
MOV A31 地利据点\
INC A31 $GUILDNAME
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
ADDGUILDLIST ..\QuestDiary\重要数据\沙巴克积分赛\地利占领.txt
SENDMSG 0 [地利据点 已被 $GUILDNAME 占领]
BREAK
CLOSE
#ELSEACT
SENDMSG 7 贵行会目前还不能占领此据点!
BREAK
[@资源3]
#IF
CheckSlaveCount 2
#ACT
MOV S10
GetRandomName ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt S10
MOV N10
MOV N10 S10
GOTO @资源31
BREAK
#ELSEACT
SENDMSG 7 操作失败,您的署下数量已经达到上限!
BREAK
[@资源31]
#IF
LARGE N10 999
#ACT
DEC N10 1000
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt
ADDTEXTLIST $STR(N10) ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt
RECALLMOB 强力雇佣兵 0 120 0 0
SENDMSG 8 恭喜:%S成功地召唤了:1名强力雇佣兵
BREAK
CLOSE
#ELSEACT
break
#ELSESAY
贵行会没有足够的战备物资......
[@资源2]
#IF
CHECKBAGSIZE 10
#ACT
MOV S10
GetRandomName ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt S10
MOV N10
MOV N10 S10
#ELSEACT
break
#ELSESAY
请预留10格以上包裹空间后再来购买!
#IF
LARGE N10 99
#ACT
DEC N10 100
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt
ADDTEXTL传奇私服超变发布网IST $STR(N10) ..\QuestDiary\重要数据\沙巴克新开传奇发布积分赛\$GUILDNAME\战备物资.txt
GIVE 疗伤药包(任务) 10
SENDMSG 7 恭喜:你获得了:疗伤药包(任务)*10
GOTO @MAIN
BREAK
#ELSEACT
break
#ELSESAY
贵行会没有足够的战备物资......
[@资源1]
#IF
CHECKBAGSIZE 1
#ACT
MOV S10
GetRandomName ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt S10
MOV N10
MOV N10 S10
#ELSEACT
break
#ELSESAY
请预留1格以上包裹空间后再来购买!
#IF
LARGE N10 9
#ACT
DEC N10 10
CLEARNAMELIST ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt
ADDTEXTLIST $STR(N10) ..\QuestDiary\重要数据\沙巴克积分赛\$GUILDNAME\战备物资.txt
GIVE 疗伤药包(任务) 1
SENDMSG 7 恭喜:你获得了:疗伤药包(任务)*1
GOTO @MAIN
BREAK
#ELSEACT
break
#ELSESAY
贵行会没有足够的战备物资......
上一篇: 最新传奇地图弑神传齐私服堂活动地…
下一篇: 传1 76神级大极品奇兽王天堂功能轻…
猜你喜欢
[08-10]
·冷月冰雪:法师职业最忌惮的技能[10-08]
·嘟嘟传奇玩家们9pk互相攀比又何必呢[10-08]
·关于我本沉默传奇里当无英雄传奇sf初打祖玛的事情[10-08]
·1.76一个人玩嘟嘟传奇也很自在[10-08]
·看完你就明白沙巴克怎中变传奇私发布网服么打[10-08]
·抠门的孩子玩我本沉默极品传奇私服传奇技巧[10-08]
·简述传奇里治愈术的用大唐传奇私服法及技巧[10-08]
·我本沉默传奇沙传奇国际版官网巴克瑰宝阁详解[10-08]
·挂机是1.内功传奇76复古传奇前期升级的好途径[10-08]
·我本七彩龙魂沉默传奇道士玩法全面解析