x
可试看 20 秒开通年版会员 观看所有课程 x

code:

vid:

uuid:

requestId:

Time:

提示信息

Subtitle/CC
    Speed
      Quality
        Audio Track
          Speed
          Subtitle/CC
          Audio Track
          Quality

          一.知识点:

          93.1.文件位置获取

               格式: GetStringPos 路径 字符串 说明: 返回值放在人物的N0变量中,如果值=9999999说明没有找到.

           93.2.获取指定行的值 功能:

               从文件中随机获取一行字符串

              格式: GetRandomText 文件路径 变量(S0--S99) 指定行(0-10000) 说明: 没有指定行时随机取某一行的字符串.

          二.配套脚本

          [@main]
          #IF
          #act
          SetUpgradeItem 0


          #IF
          equal <$BOXITEM[0].GNAME1>
          #ACT
          mov S$宝石外观1

          #IF
          equal <$BOXITEM[0].GNAME2>
          #ACT
          mov S$宝石外观2

          #IF
          equal s$宝石锁定1 
          #act
          mov s$宝石锁定1  未锁
          mov S$锁定按钮1 <锁定第一条BUFF/@锁定第一条BUFF>

          #IF
          equal s$宝石锁定2 
          #act
          mov s$宝石锁定2  未锁
          mov S$锁定按钮2 <锁定第二条BUFF/@锁定第二条BUFF>

          #IF
          equal s$宝石锁定3 
          #act
          mov s$宝石锁定3  未锁
          mov S$锁定按钮3 <锁定第三条BUFF/@锁定第三条BUFF>


          #IF
          #ACT
          OPENMERCHANTBIGDLG 1 752 1 4 0 -50 0

          #SAY
          <><ImgEx:1:621:622:623:580:-9/@exit> \ 
          <>     <BUFF洗练/SCOLOR=154> <New~~!/SCOLOR=249>\
          <>        <欢迎您来到/SCOLOR=251> {◆<$SERVERNAME>◆/AUTOCOLOR=209,253,254,252,215,95,252,247}   <晋升(血龙佩)获得超强属性加持.BUFF增加!/SCOLOR=253>\
          <Img:746:1:80:4>\\

          <⒈血龙佩:/SCOLOR=251>  <通过材料升级/SCOLOR=70>  「<5000金币→增加10点/SCOLOR=251>」「<幸运石*1→增加500点/SCOLOR=251>」「<幸运石*10→增加5000点/SCOLOR=251>」\ 
          <⒉血龙佩:/SCOLOR=251>  <通过打怪升级/SCOLOR=70>  「<每打一个怪增加1点成长(只要你打怪,就可提升血龙佩等级)/SCOLOR=243> 」\  
          <⒊血龙佩:/SCOLOR=251>  <等级获得BUFF/SCOLOR=70>  「<提升(血龙佩)*10级即增加(1条BUFF),30级为满级,获得(3条BUFF)/SCOLOR=254>」\ 
          <Img:746:1:80:4>\\
                                   \ \
          <>             <IMG:559:1:0:0><请放入血龙佩  →/SCOLOR=253>     <ITEMBOX:0:1:751:0:-13:40:40:25:放入血龙佩>          <个别BUFF属性不生效,请小退上线!/SCOLOR=253><IMG:559:1:0:0>   \  \  \
          <Img:746:1:80:4>\\
           <IMG:560:1:0:0>    <$STR(S$锁定按钮1)>   <状态:/SCOLOR=31><$STR(S$宝石锁定1)>    <$STR(S$宝石外观1)> \  \
           <IMG:560:1:0:0>    <$STR(S$锁定按钮2)>   <状态:/SCOLOR=31><$STR(S$宝石锁定2)>    <$STR(S$宝石外观2)> \   \
           <IMG:560:1:0:0>    <$STR(S$锁定按钮3)>   <状态:/SCOLOR=31><$STR(S$宝石锁定3)>    <$STR(S$宝石外观3)>  \ \
           <IMG:560:1:0:0>    <$STR(S$锁定按钮4)>   <状态:/SCOLOR=31><$STR(S$宝石锁定4)>    <$STR(S$宝石外观4)> \ \
           <IMG:560:1:0:0>    <$STR(S$锁定按钮5)>   <状态:/SCOLOR=31><$STR(S$宝石锁定5)>    <$STR(S$宝石外观5)> \  \
          <Img:746:1:80:4>\\
                            <IMG:559:1:0:0>  开启沙城捐献即可免费获得本服(两条BUFF)  \
                            <IMG:559:1:0:0>  开启沙城捐献即可免费获得本服(两条BUFF)       \
          \\
          <IMG:559:1:0:0><提示:/SCOLOR=253><重洗(血龙佩BUFF)消耗(幸运石*1)(50000元宝)(50000金币),锁定(BUFF一条)重洗条件加一倍 /SCOLOR=254>        \  \
          <><IMG:550:1:0:-2>「<重洗BUFF/@重洗所有BUFF>」
          <IMG:550:1:0:-2>「<金币提升/@金币提升>」
          <IMG:550:1:0:-2>「<幸运石*1提升/@魔龙之眼喂养>」
          <IMG:550:1:0:-2>「<幸运石*10提升/@元素石头喂养>」
          <IMG:550:1:0:-2><查看BUFF属性|251#特技·玛法蓄力:攻魔道20点            
          ^251#特技·宙斯护体:防御增加10点
          ^251#特技·无懈可击:无视防御2%
          ^251#特技·强壮之躯:体力提升5%
          ^251#特技·死亡诅咒:增加敌人死亡爆率5%
          ^251#特技·苍穹之力:物理伤害增加2%
          ^251#特技·苍穹之怒:人物暴击增加2%
          ^251#特技·苍穹护体:人物物理减免2%
          ^251#特技·三相之力:攻击增加20点
          ^251#特技·雷霆护甲:防御力增加20点
          ^251#特技·弱点击破:无视对方防御2%
          ^251#特技·高级强壮:体力提升10%
          ^251#特技·邪恶诅咒:增加敌人死亡爆率10%
          ^251#特技·苍穹神力:物理伤害增加2%
          ^251#特技·苍穹神怒:人物暴击增加2%
          ^251#特技·苍穹附体:人物物理减免10%
          ^251#特技·探宝狂暴:打怪掉落装备增加20% 
          ^251#特技·英雄连杀:连续杀2人后攻击时提升人物5%攻击,持续5秒,最高叠5层
          ^251#特技·嗜血杀戮:连续杀4人后攻击暴增1.2倍持续5秒(不叠加5秒内只触发一次)
          ^251#特技·金身护甲:被攻击时有几率触发防御魔域提升100%(不叠加5秒内只触发一次)
          ^251#特技·破命一击:有几率减少对方防御20% 持续3秒
          ^251#特技·再世华佗:拥有技能使用可恢复自身20%生命CD60秒
          ^251#特技·血魔护体:使用技能或按钮后HP上限暴增20%,持续30秒
          ^250#特技·独孤一掷:5%几率一刀打掉对方5%血量
          ^250#特技·乾坤一掷:10%几率一刀打掉对方10%血量
          ^250#特技·探囊取物:几率收取敌人所有传送石
          ^250#特技·战场狡诈:被攻击几率让对方禁止攻击1秒
          ^250#特技·生生不息:被攻击5%几率血量恢复10%
          ^250#特技·见龙卸甲:几率将对方剑甲打回背包
          ^250#特技·虚弱卸力:几率降低对手攻击20%,持续3秒
          ^250#特技·魔龙护身:10%几率被攻击时,触发护身属性5秒CD60秒
          ^250#特技·画地为牢:5%几率禁锢对方3秒,不可逃脱
          ^250#特技·蛛网缠身:攻击时有几率将敌人打入蛛网状态无法跑动
          ^250#特技·亢龙有悔:无视见龙卸甲效果
          ^250#特技·化险为夷:破解画地为牢效果
          ^250#特技·不灭战神:血量低于40%,无敌1秒,CD180秒
          ^250#特技·不死不灭:血量低于20%,无敌2秒,CD180秒
          ^250#特技·皇凤涅槃:人物复活后,获得3秒无敌效果!
          ^250#特技·放下屠刀:讲对手打成和平模式5秒
          ^250#特技·越战越勇:杀人后恢复自身10%生命
          ^250#特技·浴血奋战:有几率将人打成红名
          ^250#特技·毁灭之力:2%几率将对方攻击力降为0,2秒
          ^250#特技·背水一战:自身红名状态时,全身提高1.3倍伤害
          ^250#特技·寒冰之箭:可以降怪物利用寒冰之气冰冻而止任意宰割 冰冻5秒/FCOLOR=251>」<IMG:550:1:0:-2><IMG:550:1:0:-2>\ \

          [@锁定第一条BUFF]
          #IF
          #act
          SetUpgradeItem 0

          #IF
          not CHECKDRILLHOLE -1 0
          #act
          messagebox 你没有对应BUFF!
          break


          #IF
          equal s$宝石锁定1 未锁
          #act
          mov s$宝石锁定1 锁定
          mov S$锁定按钮1 <解锁第一条BUFF/@锁定第一条BUFF>
          goto @main
          break
          #elseact
          mov s$宝石锁定1 未锁
          mov S$锁定按钮1 <锁定第一条BUFF/@锁定第一条BUFF>
          goto @main
          break

          [@锁定第二条BUFF]
          #IF
          #act
          SetUpgradeItem 0

          #IF
          not CHECKDRILLHOLE -1 1
          #act
          messagebox 你没有对应BUFF!
          break


          #IF
          equal s$宝石锁定2 未锁
          #act
          mov s$宝石锁定2 锁定
          mov S$锁定按钮2 <解锁第二条BUFF/@锁定第二条BUFF>
          goto @main
          break
          #elseact
          mov s$宝石锁定2 未锁
          mov S$锁定按钮2 <锁定第二条BUFF/@锁定第二条BUFF>
          goto @main
          break

          [@锁定第三条BUFF]
          #IF
          #act
          SetUpgradeItem 0

          #IF
          not CHECKDRILLHOLE -1 2
          #act
          messagebox 你没有对应BUFF!
          break


          #IF
          equal s$宝石锁定3 未锁
          #act
          mov s$宝石锁定3 锁定
          mov S$锁定按钮3 <解锁第三条BUFF/@锁定第三条BUFF>
          goto @main
          break
          #elseact
          mov s$宝石锁定3 未锁
          mov S$锁定按钮3 <锁定第三条BUFF/@锁定第三条BUFF>
          goto @main
          break

          [@itemoutbox0]
          #IF
          #ACT
          mov S$宝石外观1
          mov S$宝石外观2
          goto @main


          [@ItemIntoBox0]
          #IF
          not equal <$BOXitem[0].name> 血龙佩
          #ACT
          messagebox 只允许对血龙佩进行升级
          ReturnBoxItem 0
          break

          #if
          #ACT
          SetUpgradeItem 0

          #IF
          CHECKSOCKETABLEITEM -1 0 N$宝石1外观编号 S$宝石1名称
          #ACT
          ;sendmsg 6 ----当前所在行号为:<$str(S$宝石1名称)>
          getstringpos ..\questdiary\天心制作\宝石名称.txt <$str(S$宝石1名称)>
          ;sendmsg 6 ----当前所在行号为:<$str(N0)>
          GetRandomText ..\questdiary\天心制作\宝石内观.txt S$宝石1外观行号 <$str(N0)>
          ;sendmsg 6 ----当前取得外观编号为:<$str(S$宝石1外观行号)>
          mov S$宝石外观1 <img:<$str(S$宝石1外观行号)>:3:0:-3>
          goto @main


          #IF
          CHECKSOCKETABLEITEM -1 1 N$宝石2外观编号 S$宝石2名称
          #ACT
          ;sendmsg 6 ----当前所在行号为:<$str(S$宝石1名称)>
          getstringpos ..\questdiary\天心制作\宝石名称.txt <$str(S$宝石2名称)>
          ;sendmsg 6 ----当前所在行号为:<$str(N0)>
          GetRandomText ..\questdiary\天心制作\宝石内观.txt S$宝石2外观行号 <$str(N0)>
          ;sendmsg 6 ----当前取得外观编号为:<$str(S$宝石1外观行号)>
          mov S$宝石外观2 <img:<$str(S$宝石2外观行号)>:3:0:-3>
          goto @main

          [@金币提升]
          #IF
          not CheckBoxItemCount 0
          #ACT
          messagebox 需要放入血龙佩进行升级
          break


          #IF
          NOT checkgold 5000
          #ACT
          messagebox 你没有5000金币,无法进行升级
          break

          #IF
          CHECKCUSTOMITEMPROGRESSBARVALUE  -1 0 0 > 29
          #ACT
          messagebox 你的血龙佩已经是满级了,不需要在升级
          break


          #IF
          #ACT
          SetUpgradeItem 0

          #IF
          not CHECKCUSTOMITEMPROGRESSBAR -1 0
          #ACT
          CHANGECUSTOMITEMPROGRESSBAR -1 0 0 1
          CHANGECUSTOMITEMPROGRESSBAR -1 0 1 当前等级
          CHANGECUSTOMITEMPROGRESSBAR -1 0 2 70
          CHANGECUSTOMITEMPROGRESSBAR -1 0 3 3
          CHANGECUSTOMITEMPROGRESSBAR -1 0 4 2
          CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 1 = 30
          sendmsg 6 你成功开启了第一条进度条
          UpDateBoxItem 0

          #IF
          not CHECKCUSTOMITEMPROGRESSBAR -1 1
          #ACT
          CHANGECUSTOMITEMPROGRESSBAR -1 1 0 1
          CHANGECUSTOMITEMPROGRESSBAR -1 1 1 当前进度
          CHANGECUSTOMITEMPROGRESSBAR -1 1 2 70
          CHANGECUSTOMITEMPROGRESSBAR -1 1 3 1
          CHANGECUSTOMITEMPROGRESSBAR -1 1 4 2
          CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 1 = 100
          sendmsg 6 你成功开启了第二条进度条
          UpDateBoxItem 0


          #IF
          checkgold 5000
          #ACT
          take 金币 5000
          mov n$升级每次增加点数 5000
          #call [\天心制作\血龙佩升级\血龙佩进度条升级.txt] @血龙佩进度条升级脚本

          #IF
          #ACT
          UpDateBoxItem 0

          [@重洗所有BUFF]
          #IF
          #act
          SetUpgradeItem 0

          #IF
          CHECKDRILLHOLE -1 0
          CHECKDRILLHOLE -1 1
          CHECKDRILLHOLE -1 2
          ;CHECKDRILLHOLE -1 3
          ;CHECKDRILLHOLE -1 4
          #act
          goto @清除BUFF第二步
          break
          #elseact
          messagebox 你BUFF宝石没有镶嵌满,无法进行清洗
          break


          [@清除BUFF第二步]
          #IF
          #act
          mov n$需要元宝 0
          Mov n$需要金币 0
          mov n$需要幸运石 0


          #IF
          equal s$宝石锁定1  锁定
          #act
          inc n$需要元宝  50000
          inc n$需要金币  50000
          inc n$需要幸运石  1

          #IF
          equal s$宝石锁定2  锁定
          #act
          inc n$需要元宝  50000
          inc n$需要金币  50000
          inc n$需要幸运石  1


          #IF
          checkgamegold ? <$str(n$需要元宝)>
          checkgold <$str(n$需要金币)>
          checkitem 幸运石 <$str(n$需要幸运石)>
          #act
          take 金币 <$str(n$需要金币)>
          gamegold - <$str(n$需要元宝)>
          take 幸运石 <$str(n$需要幸运石)>
          #call [\天心制作\重洗BUFF.txt] @重洗BUFF脚本

          #elseact
          messagebox 你没有对应的材料,无法进重洗
          break

          评论提问