您现在的位置:首页 >> 热血传奇私服 >> 内容

        传奇新服网

        时间:2018-9-26 18:34:44

        完备复制以下剧本到服务端中即可 , 无其它联系关系剧本 , 可正常使用。

        (@@InPutString @@InPutInteger)
        [@main]
        <★━━━━★/SCOLOR=250>  ━━━ 行会【<$STR(A30)>】自助招人体系 ━━━\
        <┃/SCOLOR=250>行 <■/AUTOCOLOR=254,250,253,241> 竞<┃/SCOLOR=250>  <参加该行会的最低级别要求是:/AUTOCOLOR=249><$STR(G108)>级以上\
        <┃/SCOLOR=250> <■/AUTOCOLOR=250,251,241,254>板<■/AUTOCOLOR=241,250,253,254> <┃/SCOLOR=250>   [<参加行会/@jrxh>] [<加入竞价/@cyjj>] [<治理选项/@竞标台治理>]\
        <┃/SCOLOR=250>会 <■/AUTOCOLOR=250,253,254,241> 价<┃/SCOLOR=250>  \
        <★━━━━★/SCOLOR=250>  ━━━━━━━━━━━━━━━━━━━━━━━\
        \          <【行会名称】/SCOLOR=154>:【<$STR(A30)>】<行会掌门:/SCOLOR=154>【<$STR(A31)>】\
        \          <【竞标价钱】/SCOLOR=154>:【<$STR(G88)>】\
        \          <【掌门致辞】/SCOLOR=154>:【<$STR(A5)>】\
        \          <【行会奖励】/SCOLOR=154>:【<领取1.2倍神力属性/@领取1.2倍神力属性>】\
        <您付出比今朝竞价多500个元宝 , 即可让你建的行会成为[世界第一行会]/AUTOCOLOR=250,253,254,241>\
        <竞标第一行会的全部成员可以免费领取1.2倍神力属性!/SCOLOR=254>\
        <竞标第一行会的全部成员可以免费领取1.2倍神力属性!/SCOLOR=254>\
        <竞标第一行会的全部成员可以免费领取1.2倍神力属性!/SCOLOR=254>\
        <竞标第一行会的全部成员可以免费领取1.2倍神力属性!/SCOLOR=254>\
        <竞标第一行会的全部成员可以免费领取1.2倍神力属性!/SCOLOR=254>\

        [@领取1.2倍神力属性]
        #IF
        CheckGuildMember <$STR(A30)>
        #ACT
        #SAY
        {尊重的【<$STR(A30)>】成员您好!你可以免费享受1.2倍神力属性!/SCOLOR=254}\
        <每次领取可以连续享受1小时 , 时候到后必需来此从新领取!/SCOLOR=253>\
        <殒命或者下线后神力消散 , 也必需来此从新领取!/SCOLOR=250>\
         \
        <领取1.2倍神力属性/@领取1.2倍神力属性2>
        #elseSAY
        对不起 , 您还不是<$STR(A30)>成员 , 不克不及领取1.2倍神力属性!\

         

        [@领取1.2倍神力属性2]
        #IF
        #ACT
        POWERRATE 120 3600
        SendMsg 7 恭喜您得到1.2倍神力属性!

         


        [@cyjj]
        #IF
        HAVEGUILD
        ISGUILDMASTER
        CHECKGAMEGOLD > <$STR(G88)>
        #ACT
        INC G88 500
        GAMEGOLD - <$STR(G88)>
        mov A30 <$GUILDNAME>
        mov A31 <$USERNAME>
        set [198] 1
        Messagebox [胜利]:您在行会竞价板上花了【<$STR(G88)>】个元宝竞得。
        SENDMSG 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A30)>】竞得 , 年夜家从速来参加这个有实力的行会吧!
        SENDMSG 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A30)>】竞得 , 年夜家从速来参加这个有实力的行会吧!
        SENDMSG 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A30)>】竞得 , 年夜家从速来参加这个有实力的行会吧!
        SENDMSG 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A30)>】竞得 , 年夜家从速来参加这个有实力的行会吧!
        SENDMSG 0 【<$USERNAME>】在行会竞价板为行会【<$STR(A30)>】竞得 , 年夜家从速来参加这个有实力的行会吧!
        GOTO @main
        BREAK
        #ELSEACT
        Messagebox [失败]:您的元宝不敷或者您没有行会

        [@jrxh]
        #if
        equal G109 1
        #act
        messagebox 对不起 , 本行会临时不收人
        break

        #if
        CHECKLEVELEX < <$STR(G108)>
        #act
        messagebox 级别不够!
        break

        #IF
        ISGUILDMASTER
        #ACT
        Messagebox [失败]:您如今是行会掌门不克不及在参加其他行会!!
        break

        #IF
        equal A30 <$GUILDNAME>
        #ACT
        Messagebox [失败]:您如今已经是【<$STR(A30)>】的行会成员了!!
        break
        #ELSEACT
        goto @jrxh3

        [@jrxh3]
        #IF
        HAVEGUILD
        #ACT
        Gmexecute 退出行会
        DELAYGOTO 3 @jrxh4
        #ELSEACT
        goto @jrxh4

        [@jrxh4]
        #IF
        equal A30
        #ACT
        Messagebox [失败]:如今还没行会竟价钱
        #ELSEACT
        AddGuildMember <$STR(A30)>
        set [198] 1
        SENDMSG 0 恭喜【<$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$STR(A30)>】
        SENDMSG 0 恭喜【<$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$STR(A30)>】
        SENDMSG 0 恭喜【<$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$STR(A30)>】
        SENDMSG 0 恭喜【<$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$STR(A30)>】
        SENDMSG 0 恭喜【<$USERNAME>】经由过程【世界第一行会】NPC参加了行会【<$STR(A30)>】
        break

         


        [@竞标台治理]
        #if
        ISGUILDMASTER
        equal A30 <$GUILDNAME>
        #act
        goto @竞标台治理2
        #elseact
        SENDMSG 5 [只有本行会掌门才可以进行治理]
        goto @main

        [@竞标台治理2]
        #if
        equal g109 0
        #act
        mov s1 <开启/SCOLOR=250>
        #if
        equal g109 1
        #act
        mov s1 <封闭>
        #if
        equal g110 0
        #act
        mov s2 <容许/SCOLOR=250>
        #if
        equal g110 1
        #act
        mov s2 <制止>
        #if
        #say
        \
        →<改动通知布告内容/@@InPutString5> 当前通知布告内容:<$STR(S5)>\
        →<改动级别要求/@@InPutInteger71> 当前级别要求:<$STR(G108)>级\ \
        →<行会收人状况/SCOLOR=254> 当前状况为:<$STR(s1)> [<变动/@gg1>]\ \
        →<返回/@main>

        [@gg1]
        #if
        equal g109 0
        #act
        mov g109 1
        messagebox 行会收人状况→封闭
        goto @竞标台治理
        break
        #if
        equal g109 1
        #act
        mov g109 0
        messagebox 行会收人状况→开放
        goto @竞标台治理
        break

        [@CallInPutInteger71]
        #if
        large n71 100
        small n71 301
        #act
        mov g108 <$STR(n71)>
        messagebox 设定胜利 , 参加你的行会的最低级别要求是<$STR(n71)>级!
        goto @竞标台治理
        #elseact
        messagebox 【差错提醒】:\ \      ㈠ 请输入一个100-300间的整数!\ \      ㈡ 请输入数字 , 勿输入其它字符!
        goto @竞标台治理


        [@CallInPutString5]
        #if
        #act
        mov A5 <$STR(S5)>
        messagebox 改动胜利 , 通知布告内容为<$STR(S5)>!
        goto @竞标台治理
        #elseact
        messagebox 【差错提醒】:非法字符 , 请输入一段文本 , 勿输入其它字符!
        goto @竞标台治理


         


        相关文章