一.知识点
扩展字符变量S和数字变量N
功能:扩展字符变量S和数字变量N
格式:无
说明:扩展字符变量S和数字变量N,除了支持0~499以外,可以在S$变量或N$变量后面增加任意字符,人物基础变量不需要加$。
例:
[@test]
#ACT
MOV S$我的人物名称 <$USERNAME>
SENDMSG 0 <$STR(S$我的人物名称)> 255 253
[@test1]
#ACT
MOV N$我的杀怪总数 100
INC <$STR(N$我的当前杀怪数)> 1
SENDMSG 6 【杀怪总数=<$STR(N$我的杀怪总数)>】【当前杀怪数=<$STR(N$我的当前杀怪数)>】 255 253
注意:
以下的人物基础变量。不需要在S变量或N变量的后加$,当然你也可以加,加上后就属于扩展变量,例如 S1和S$1 这样的2个变量完全是2个不同的变量。
P0-P99 (私人变量,数字型) 关闭对话框重置为0。
D0-D99 (私人变量,数字型) 下线不保存.摇筛子变量.
M0-M99 (私人变量,数字型) 下线不保存.切换地图清空.
N0-N99 (私人变量,数字型) 下线不保存.小退归0.
S0-S99 (私人变量,字符型) 下线不保存.小退归0.
I0-I99 (全局变量,数字型) 下线不保存.小退归0.
G0-G499 (全局变量,数字型) 可保存。(存放在Mir200/GlobalVal.ini文件里面)
A0-A499 (全局变量,字符型) 可保存。(存放在Mir200/GlobalVal.ini文件里面)
U0-U49 (私人变量,数字型) 可保存。(存放在人物数据库Mir.db里面)
T0-T49 (私人变量,字符型) 可保存。(存放在人物数据库Mir.db里面)
二.配套脚本
[@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