找回密码
 立即注册
查看: 21638|回复: 81

完整的传奇地利据点脚本案例分析

    [复制链接]
  • TA的每日心情

    2023-10-27 00:45
  • 签到天数: 490 天

    连续签到: 1 天

    [LV.9]妙领天机

    402

    主题

    3130

    回帖

    4594

    积分

    如雷贯耳

    积分
    4594
    发表于 2019-7-27 11:25:38 | 显示全部楼层 |阅读模式

    马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

    您需要 登录 才可以下载或查看,没有账号?立即注册

    ×

    [@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
    ADDTEXTLIST <$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
    贵行会没有足够的战备物资......
    楼主热帖
  • TA的每日心情
    难过
    2019-8-29 00:28
  • 签到天数: 481 天

    连续签到: 6 天

    [LV.9]妙领天机

    5

    主题

    3082

    回帖

    3089

    积分

    声名显赫

    积分
    3089
    发表于 2019-7-27 12:57:23 | 显示全部楼层
    顶顶更健康
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-8-30 12:19
  • 签到天数: 460 天

    连续签到: 1 天

    [LV.9]妙领天机

    1

    主题

    3022

    回帖

    3023

    积分

    声名显赫

    积分
    3023
    发表于 2019-7-28 22:20:19 | 显示全部楼层
    我也来顶一下..
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 13:28
  • 签到天数: 468 天

    连续签到: 6 天

    [LV.9]妙领天机

    0

    主题

    3097

    回帖

    3096

    积分

    声名显赫

    积分
    3096
    发表于 2019-8-4 04:10:02 | 显示全部楼层
    打酱油的人拉,回复下赚取积分
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 07:45
  • 签到天数: 471 天

    连续签到: 2 天

    [LV.9]妙领天机

    1

    主题

    3044

    回帖

    3044

    积分

    声名显赫

    积分
    3044
    发表于 2019-8-4 15:29:52 | 显示全部楼层
    鼎力支持!!
    回复

    使用道具 举报

  • TA的每日心情
    无聊
    2019-8-30 10:21
  • 签到天数: 473 天

    连续签到: 1 天

    [LV.9]妙领天机

    4

    主题

    3050

    回帖

    3052

    积分

    声名显赫

    积分
    3052
    发表于 2019-8-8 06:51:32 | 显示全部楼层
    发发呆,回回帖,工作结束~
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-8-30 19:22
  • 签到天数: 480 天

    连续签到: 1 天

    [LV.9]妙领天机

    8

    主题

    3070

    回帖

    3087

    积分

    声名显赫

    积分
    3087
    发表于 2019-8-9 19:49:46 | 显示全部楼层
    顶起顶起顶起
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-29 12:12
  • 签到天数: 466 天

    连续签到: 7 天

    [LV.9]妙领天机

    1

    主题

    2988

    回帖

    2990

    积分

    声名显赫

    积分
    2990
    发表于 2019-8-20 10:02:37 | 显示全部楼层
    支持支持再支持
    回复

    使用道具 举报

  • TA的每日心情
    慵懒
    2019-8-30 11:35
  • 签到天数: 482 天

    连续签到: 6 天

    [LV.9]妙领天机

    10

    主题

    2981

    回帖

    3000

    积分

    声名显赫

    积分
    3000
    发表于 2019-8-21 16:17:54 | 显示全部楼层
    无论是不是沙发都得回复下
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 10:43
  • 签到天数: 473 天

    连续签到: 2 天

    [LV.9]妙领天机

    1

    主题

    3023

    回帖

    3022

    积分

    声名显赫

    积分
    3022
    发表于 2019-8-22 02:57:16 | 显示全部楼层
    打酱油的人拉,回复下赚取积分
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|Archiver|手机版|小黑屋|任逍遥

    GMT+8, 2024-12-25 01:14 , Processed in 0.115187 second(s), 45 queries .

    Powered by 任逍遥 X3.5

    Copyright © 2001-2024, Rxiaoyao Cloud.

    快速回复 返回顶部 返回列表