设为首页收藏本站每日签到
开启辅助访问

22pk论坛

传奇版本 › 开区技术区 › 传奇脚本专区 › 洗属性脚本-3@确定分配属性
123456789下一页
返回列表 发新帖
查看: 107784|回复: 89

[传奇脚本] 洗属性脚本-3@确定分配属性

  [复制链接]
22pk版本
  • TA的每日心情
    无聊
    2015-7-20 22:59

    • 签到天数: 2 天

    [LV.1]初来乍到

    8045

    主题

    8120

    帖子

    121万

    积分

    Rank: 9Rank: 9Rank: 9

    元宝
    1093511

    最佳新人活跃会员热心会员推广达人宣传达人灌水之王突出贡献优秀版主荣誉管理论坛元老

    QQ
    发表于 2015-7-16 13:45:05 | 显示全部楼层 |阅读模式
    [@main]

    #IF
    #ACT
    MOV N1 0
    MOV N2 0
    MOV N8 0
    MOV N30 0
    MOV N31 0
    MOV N32 0
    MOV N33 0
    MOV N34 0
    MOV N35 0
    MOV N12 0
    MOV N40 1
    MOV N41 1
    MOV N42 1
    MOV N43 1
    MOV N44 1
    OpenBigDialogBox 2
    #SAY
    　\
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \

    <>                        5点极品属性有%1几率洗成6点极品属性.<6/SCOLOR=250>点属性为 <2 2 2/SCOLOR=21>\
    <>                        6点极品属性有%1几率洗成7点极品属性.<7/SCOLOR=250>点属性为 <2 2 3/SCOLOR=21>\
    <>                        7点极品属性有%1几率洗成8点极品属性.<8/SCOLOR=250>点属性为 <3 3 2/SCOLOR=21>\
    <>                        洗装备后如果不满意请点<重新分配/SCOLOR=70>每次<10000元宝/SCOLOR=146>.或者取消\
    <>                        精洗装备时请不要更换装备.当前页面更换装备将自动关闭\
    <>                        目前武器支持10点属性精洗.首饰支持8点极品装备属性精洗\ \

    <只支持装备极品超/SCOLOR=70>        <精洗武器/@武器>      <精洗衣服/@衣服>      <精洗头盔/@头盔>       <精洗项链/@项链>\
    <过５点的装备进行/SCOLOR=70>\
    <精洗,请玩家加星/SCOLOR=70>         <精洗勋章/@勋章>      <精洗左手/@左手镯>      <精洗右手/@右手镯>       <精洗左戒/@左戒指>\
    <之后前来精洗/SCOLOR=70>\
    <>    <装备加星/@sj>            <精洗右戒/@右戒指>      <精洗靴子/@靴子>      <精洗腰带/@腰带>       <精洗戰鼓/@宝石>\
    <材料商铺限量购买/SCOLOR=250>\


    [@sj]
    #ACT
    OpenUpgradeDialog

    [@武器]
    #IF
    CHECKUSEITEM 1
    #ACT
    MOV S1 <$WEAPON>
    MOV S2 1
    goto @检测武器攻击
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好武器在来进行精洗。

    [@检测武器攻击]
    #IF
    CheckItemAddValue <$STR(S2)> 0 = 0
    CheckItemAddValue <$STR(S2)> 1 = 0
    CheckItemAddValue <$STR(S2)> 2 = 0
    #say
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        此装备没有极品属性！
    #ELSEACT
    goto @检测武器攻击A


    [@检测武器攻击A]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 0 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N38 <$STR(N2)>
    MOV N1 0
    goto @检测武器魔法
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配武器>        <NO,我没元宝不需要/@exit>
    #ELSEACT
    INC N1 1
    goto @检测武器攻击A


    [@检测武器魔法]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 1 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N38 <$STR(N2)>
    MOV N1 0
    goto @检测武器道术
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配武器>        <NO,我没元宝不需要/@exit>
    #ELSEACT
    INC N1 1
    goto @检测武器魔法



    [@检测武器道术]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 2 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N38 <$STR(N2)>
    MOV N1 0
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配武器>        <NO,我没元宝不需要/@exit>
    #ELSEACT
    INC N1 1
    goto @检测武器道术



    [@YES分配武器]

    #IF
    CheckItemAddValue <$STR(S2)> 0 = 0
    #ACT
    DEC N2 1
    #IF
    CheckItemAddValue <$STR(S2)> 1 = 0
    #ACT
    DEC N2 1
    #IF
    CheckItemAddValue <$STR(S2)> 2 = 0
    #ACT
    DEC N2 1


    #IF
    large N2 4
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        您的【<$STR(S1)>】共有极品属性{【<$STR(N2)>】/SCOLOR=215}点,系统将进行随机分配\
    \ \
    <>                        <是的,我需要/@YES分配武器A>        <NO,我没元宝不需要/@exit>
    #ELSEsay
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        属性低于5点不予分配！



    [@YES分配武器A]

    #IF
    large N2 10
    #ACT
    messagebox 属性超额,不予分配！
    break

    #IF
    CHECKGAMEGOLD < 10000
    #ACT
    messagebox 你的元宝不够10000了哦，分配一次需要花费元宝10000个！
    break

    #IF
    equal N2 5
    #ACT
    MOVR N3 100
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A

    #IF
    equal N2 6
    #ACT
    MOVR N3 113
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A

    #IF
    equal N2 7
    #ACT
    MOVR N3 154
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A

    #IF
    equal N2 8
    #ACT
    MOVR N3 183
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A

    #IF
    equal N2 9
    #ACT
    MOVR N3 159
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\9点方案\9点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\9点方案\9点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\9点方案\9点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A

    #IF
    equal N2 10
    #ACT
    MOVR N3 207
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\10点方案\10点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\10点方案\10点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\10点方案\10点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加A



    [@确认增加A]
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        重新分配的属性如下:\
    <>                        攻击→ {<$STR(N30)>/SCOLOR=250}  (清洗后额外增加的攻击属性)\
    <>                        魔法→ {<$STR(N31)>/SCOLOR=250}  (清洗后额外增加的魔法属性)\
    <>                        道术→ {<$STR(N32)>/SCOLOR=250}  (清洗后额外增加的道术属性)\
    <>                        <>\
    <>                        <确定分配/@确定分配属性A>    <重新分配/@YES分配武器A> ←分配一次需要收费元宝<10000/SCOLOR=70>个\ \
    <>\
    <>                                                     <取消分配/@exit>


           
    [@确定分配属性A]
    #ACT
    GMEXECUTE 改属性 <$STR(S2)> 0 <$STR(N30)>
    GMEXECUTE 改属性 <$STR(S2)> 1 <$STR(N31)>
    GMEXECUTE 改属性 <$STR(S2)> 2 <$STR(N32)>


    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        属性分配成功！




    ;=============================================

    [@衣服]
    #IF
    CHECKUSEITEM 0
    #ACT
    MOV S1 <$DRESS>
    MOV S2 0
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好衣服在来进行精洗。

    [@勋章]
    #IF
    CHECKUSEITEM 2
    #ACT
    MOV S1 <$RIGHTHAND>
    MOV S2 2
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好勋章在来进行精洗。

    [@项链]
    #IF
    CHECKUSEITEM 3
    #ACT
    MOV S1 <$NECKLACE>
    MOV S2 3
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好项链在来进行精洗。

    [@头盔]
    #IF
    CHECKUSEITEM 4
    #ACT
    MOV S1 <$HELMET>
    MOV S2 4
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好头盔在来进行精洗。

    [@右手镯]
    #IF
    CHECKUSEITEM 5
    #ACT
    MOV S1 <$ARMRING_R>
    MOV S2 5
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好右手镯在来进行精洗。

    [@左手镯]
    #IF
    CHECKUSEITEM 6
    #ACT
    MOV S1 <$ARMRING_L>
    MOV S2 6
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好左手镯在来进行精洗。

    [@右戒指]
    #IF
    CHECKUSEITEM 7
    #ACT
    MOV S1 <$RING_R>
    MOV S2 7
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好右戒指在来进行精洗。

    [@左戒指]
    #IF
    CHECKUSEITEM 8
    #ACT
    MOV S1 <$RING_L>
    MOV S2 8
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好左戒指在来进行精洗。

    [@腰带]
    #IF
    CHECKUSEITEM 10
    #ACT
    MOV S1 <$BELT>
    MOV S2 10
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好腰带在来进行精洗。

    [@靴子]
    #IF
    CHECKUSEITEM 11
    #ACT
    MOV S1 <$BOOTS>
    MOV S2 11
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好靴子在来进行精洗。

    [@宝石]
    #IF
    CHECKUSEITEM 12
    #ACT
    MOV S1 <$CHARM>
    MOV S2 12
    goto @检测防御
    #ELSEACT
    MESSAGEBOX [提示]：请穿戴好宝石在来进行精洗。

    [@检测防御]
    #IF
    CheckItemAddValue <$STR(S2)> 2 = 0
    CheckItemAddValue <$STR(S2)> 3 = 0
    CheckItemAddValue <$STR(S2)> 4 = 0
    #say
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        此装备没有极品属性！
    #ELSEACT
    goto @检测攻击


    [@检测攻击]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 2 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N38 <$STR(N2)>
    MOV N1 0
    goto @检测魔法
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配>        <NO,我没元宝不需要/@exit>\
    #ELSEACT
    INC N1 1
    goto @检测攻击

    [@检测魔法]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 3 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N38 <$STR(N2)>
    MOV N1 0
    goto @检测道术
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配>        <NO,我没元宝不需要/@exit>\
    #ELSEACT
    INC N1 1
    goto @检测魔法

    [@检测道术]
    #IF
    small N1 256
    CheckItemAddValue <$STR(S2)> 4 = <$STR(N1)>
    #act
    INC N2 <$STR(N1)>
    MOV N1 0
    MOV N38 <$STR(N2)>
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        是否随机分配极品属性？\
    <>                        <是的,我需要/@YES分配>        <NO,我没元宝不需要/@exit>\
    #ELSEACT
    INC N1 1
    goto @检测道术

    [@YES分配]
    #IF
    CheckItemAddValue <$STR(S2)> 2 = 0
    #ACT
    DEC N2 1
    #IF
    CheckItemAddValue <$STR(S2)> 3 = 0
    #ACT
    DEC N2 1
    #IF
    CheckItemAddValue <$STR(S2)> 4 = 0
    #ACT
    DEC N2 1

    #IF
    large N2 4
    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        您的【<$STR(S1)>】共有极品属性{【<$STR(N2)>】/SCOLOR=215}点,系统将进行随机分配\
    \ \
    <>                        <是的,我需要/@YES分配A>        <NO,我没元宝不需要/@exit>
    #ELSEsay
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        属性低于5点不予分配！



    [@YES分配A]

    #IF
    large N2 8
    #ACT
    messagebox 属性超额,不予分配！
    break

    #IF
    CHECKGAMEGOLD < 10000
    #ACT
    messagebox 你的元宝不够10000了哦，分配一次需要花费元宝10000个！
    break

    #IF
    equal N2 5
    #ACT
    MOVR N3 100
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\5点方案\5点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加

    #IF
    equal N2 6
    #ACT
    MOVR N3 113
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\6点方案\6点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加

    #IF
    equal N2 7
    #ACT
    MOVR N3 154
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\7点方案\7点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加

    #IF
    equal N2 8
    #ACT
    MOVR N3 183
    INC N3 1
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点道士.txt S10 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点攻击.txt S11 <$STR(N3)>
    GetRandomText .\QuestDiary\小雨方案\8点方案\8点魔法.txt S12 <$STR(N3)>
    MOV N30 <$STR(S10)>
    MOV N31 <$STR(S11)>
    MOV N32 <$STR(S12)>
    GAMEGOLD - 10000
    goto @确认增加



    [@确认增加]
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        重新分配的属性如下:\
    <>                        攻击→ {<$STR(N30)>/SCOLOR=250}  (清洗后额外增加的攻击属性)\
    <>                        魔法→ {<$STR(N31)>/SCOLOR=250}  (清洗后额外增加的魔法属性)\
    <>                        道术→ {<$STR(N32)>/SCOLOR=250}  (清洗后额外增加的道术属性)\
    <>                        <>\
    <>                        <确定分配/@确定分配属性>    <重新分配/@YES分配A> ←分配一次需要收费元宝<10000/SCOLOR=70>个\ \
    <>\
    <>                                                     <取消分配/@exit>

           
    [@确定分配属性]
    #ACT
    GMEXECUTE 改属性 <$STR(S2)> 2 <$STR(N30)>
    GMEXECUTE 改属性 <$STR(S2)> 3 <$STR(N31)>
    GMEXECUTE 改属性 <$STR(S2)> 4 <$STR(N32)>

    #SAY
    <>                                          <【独家装备精洗】/AUTOCOLOR=245,250,100,180> \ \
    <>                        <至/AUTOCOLOR=245,250,100,180>     <尊/AUTOCOLOR=245,250,100,180>     <玛/AUTOCOLOR=245,250,100,180>    <法/AUTOCOLOR=245,250,100,180>      <精/AUTOCOLOR=245,250,100,180>     <益/AUTOCOLOR=245,250,100,180>     <求/AUTOCOLOR=245,250,100,180>    <精/AUTOCOLOR=245,250,100,180>\ \
    <>                        属性分配成功！

    本站所有版本 24小时在线购买 金币不够请 点击 金币充值 版本GM亲测无误可直接开区
    回复

    使用道具 举报

    qq水浒

    该用户从未签到

    0

    主题

    415

    帖子

    2884

    积分

    省长

    Rank: 6Rank: 6

    元宝
    813
    发表于 2015-7-16 13:46:13 | 显示全部楼层
    我很喜欢,太精彩了
    回复 支持 反对

    使用道具 举报

    北京冰雹

    该用户从未签到

    0

    主题

    392

    帖子

    2754

    积分

    省长

    Rank: 6Rank: 6

    元宝
    780
    发表于 2015-7-20 12:24:44 | 显示全部楼层
    你骨子里真土。（细胞里真土、DNA真土）
    回复 支持 反对

    使用道具 举报

    大鱼吃小鱼

    该用户从未签到

    0

    主题

    359

    帖子

    2495

    积分

    省长

    Rank: 6Rank: 6

    元宝
    700
    发表于 2015-7-20 21:14:42 | 显示全部楼层
    顶上去
    回复 支持 反对

    使用道具 举报

    少年神探狄仁杰

    该用户从未签到

    0

    主题

    372

    帖子

    2589

    积分

    省长

    Rank: 6Rank: 6

    元宝
    729
    发表于 2015-7-21 13:42:40 来自手机 | 显示全部楼层
    好，很好，非常好！
    回复 支持 反对

    使用道具 举报

    王子变青蛙

    该用户从未签到

    0

    主题

    374

    帖子

    2595

    积分

    省长

    Rank: 6Rank: 6

    元宝
    725
    发表于 2015-7-24 18:02:11 | 显示全部楼层
    努力~~各位。。。
    回复 支持 反对

    使用道具 举报

    符文大师

    该用户从未签到

    0

    主题

    376

    帖子

    2622

    积分

    省长

    Rank: 6Rank: 6

    元宝
    738
    发表于 2015-7-27 07:22:20 | 显示全部楼层
    伟人之所以伟大，是因为他与别人共处逆境时，别人失去了信心，他却下决心实现自己的目标。  
    回复 支持 反对

    使用道具 举报

    英雄联盟

    该用户从未签到

    0

    主题

    379

    帖子

    2639

    积分

    省长

    Rank: 6Rank: 6

    元宝
    740
    发表于 2015-7-29 22:38:44 | 显示全部楼层
    楼上的话等于没说~~~
    回复 支持 反对

    使用道具 举报

    宰执天下

    该用户从未签到

    0

    主题

    393

    帖子

    2734

    积分

    省长

    Rank: 6Rank: 6

    元宝
    764
    发表于 2015-7-30 15:14:09 | 显示全部楼层
    我帮你 喝喝
    回复 支持 反对

    使用道具 举报

    tnt弹道轨迹

    该用户从未签到

    0

    主题

    366

    帖子

    2548

    积分

    省长

    Rank: 6Rank: 6

    元宝
    714
    发表于 2015-7-31 14:03:10 | 显示全部楼层
    顶也～
    回复 支持 反对

    使用道具 举报

    下一页 »
    123456789下一页
    返回列表 发新帖
    高级模式
    B Color Image Link Quote Code Smilies
    您需要登录后才可以回帖 登录 | QQ注册登录

    本版积分规则

    GM基地开传奇一条龙服务及商业服务端下载

    All rights reserved.www.22pk.com 版权所有 网站分类 网站地图

    22pk论坛打造行业第一传奇版本论坛,所有商业版本均免费开放下载,力争做行业最大的教程及版本发布基地

    © 2001-2015 爱上gm论坛

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