本站主推发布:新开传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,找搜服,仙剑传奇
当前位置: zhaosf首页 > 开服资料 > 传奇脚本 >

超级变态版本的装备改造脚本(3)

时间:2016-12-10 00:26来源:新开传奇私服 作者:传奇私服发布网
#ACT break ;;=============================================负重_DC1 [@FUZHONG_DC1()] #act mov D0 %ARG(1) #SAY {FCOLOR1}负重最高可以增加 3 点,你确认吗{FCOLOR12}不确定@exit _◇增加1点
 
#ACT
break
 
;;=============================================负重_DC1
[@FUZHONG_DC1()]
#act
mov D0 %ARG(1)
#SAY
{FCOLOR1}负重最高可以增加 3 点,你确认吗{FCOLOR12}不确定@exit
_◇增加1点(10点积分)@装备属性改造(D0,FLD_DESC1,1,10)◇
_◇增加2点(20点积分)@装备属性改造(D0,FLD_DESC1,2,20)◇
_◇增加3点(60点积分)@装备属性改造(D0,FLD_DESC1,3,60)◇
 
#ACT
break
 
;;=============================================手负重_DC2
[@SFUZHONG_DC2()]
#act
mov D0 %ARG(1)
#SAY
{FCOLOR1}手负重最高可以增加 3 点,你确认吗{FCOLOR12}不确定@exit
_◇增加1点(10点积分)@装备属性改造(D0,FLD_DESC2,1,10)◇
_◇增加2点(20点积分)@装备属性改造(D0,FLD_DESC2,2,20)◇
_◇增加3点(60点积分)@装备属性改造(D0,FLD_DESC2,3,60)◇
 
#ACT
break
 
;;=============================================准确_DC0
[@ZHUNQUE_DC0()]
#act
mov D0 %ARG(1)
#SAY
{FCOLOR1}准确最高可以增加 3 点,你确认吗{FCOLOR12}不确定@exit
_◇增加1点(100点积分)@装备属性改造(D0,FLD_DESC0,1,100)◇
_◇增加2点(250点积分)@装备属性改造(D0,FLD_DESC0,2,250)◇
_◇增加3点(600点积分)@装备属性改造(D0,FLD_DESC0,3,600)◇
 
#ACT
break
 
;;=============================================敏捷_DC1
[@MINJIE_DC1()]
#act
mov D0 %ARG(1)
#SAY
{FCOLOR1}敏捷最高可以增加 3 点,你确认吗{FCOLOR12}不确定@exit
_◇增加1点(100点积分)@装备属性改造(D0,FLD_DESC1,1,100)◇
_◇增加2点(250点积分)@装备属性改造(D0,FLD_DESC1,2,250)◇
_◇增加3点(600点积分)@装备属性改造(D0,FLD_DESC1,3,600)◇
 
#ACT
break
 
 
;;--------------------------------------------------改造装备主程序
[@装备属性改造()]
#ACT
;;MOV D0 %ARG(1)   ;;装备类型0-10
MOV A8 %ARG(2)   ;;修改字段
MOV D1 %ARG(3)   ;;装备改变点数
MOV D2 %ARG(4)   ;;所需积分
 
FormatStr FLD_CHARACTER='%s' %A0
ReadValueSql TBL_QUEST %A9 FLD_CHARACTER,FLD_JIFEN @测试积分数
 
[@测试积分数()]
#ACT
mov  A6  %ARG(1)
mov  D7  %ARG(2)
dec D2 1
#if
small D2 %D7
#act
goto @开始吧吧
#ELSESAY
_{FCOLOR1}该角色的积分点不够,角色现有积分:{FCOLOR10}$OUTPUT(D7){FCOLOR1}点。{FCOLOR12}  
关 闭@exit
 
[@开始吧吧]
#ACT
INC  D2  1
dec  D7  %D2
 
FormatStr FLD_CHARACTER='%s' %A0
mov  A7  %A9
FormatStr FLD_JIFEN='%s' %D7
UPDATEVALUESQL TBL_QUEST %A7 %A9
 
FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
mov  A7  %A9
FormatStr %s=%s %A8 %D1
UPDATEVALUESQL TBL_ITEM %A7 %A9
 
#SAY
_人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} 装备改造完毕!请{FCOLOR10}换号查看{FCOLOR12}吧!
_花费人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} {FCOLOR10}$OUTPUT(D2){FCOLOR12}点积分,剩余{FCOLOR10}$OUTPUT(D7){FCOLOR12}点积分
_怎么样,我的技术还不错吧~欢迎下次光临
继续@改造物品选单_main
关 闭@exit
 
 
;;------------------------------------------加攻击元素主程序
[@装备攻击元素()]
#ACT
;;MOV D0 %ARG(1)   ;;装备类型0-10
MOV A8 %ARG(2)   ;;修改字段
MOV D4 %ARG(3)   ;;元素类型
MOV D1 %ARG(4)   ;;装备改变点数
MOV D2 %ARG(5)   ;;所需积分
 
FormatStr FLD_CHARACTER='%s' %A0
ReadValueSql TBL_QUEST %A9 FLD_CHARACTER,FLD_JIFEN @测试积分数2
 
[@测试积分数2()]
#ACT
mov  A6  %ARG(1)
mov  D7  %ARG(2)
dec  D2  1
#IF
small D2  %D7
#act
goto @开始吧吧2
#ELSESAY
_{FCOLOR1}该角色的积分点不够,角色现有积分:{FCOLOR10}$OUTPUT(D7){FCOLOR1}点。 {FCOLOR12}  
关 闭@exit
 
[@开始吧吧2]
#ACT
INC  D2  1
DEC  D7  %D2
 
FormatStr FLD_CHARACTER='%s' %A0
mov  A7  %A9
FormatStr FLD_JIFEN='%s' %D7
UPDATEVALUESQL TBL_QUEST %A7 %A9 
 
#IF
 EQUAL A8 FLD_DESC5 
#ACT
 MOV A3 FLD_DESC6
 FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
 mov  A7  %A9
 FormatStr %s=%s %A8 %D4
 UPDATEVALUESQL TBL_ITEM %A7 %A9
 
 FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
 mov  A7  %A9
 FormatStr %s=%s %A3 %D1
 UPDATEVALUESQL TBL_ITEM %A7 %A9
#SAY
 _人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} 装备改造完毕!请{FCOLOR10}换号看看{FCOLOR12}吧!
 _花费人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} {FCOLOR10}$OUTPUT(D2){FCOLOR12}点积分,剩余{FCOLOR10}$OUTPUT(D7){FCOLOR12}点积分
 _怎么样,我的技术还不错吧~欢迎下次光临
 继续@改造物品选单_main
 关 闭@exit
 
#ELSEACT
 MOV A3 FLD_DESC12
 FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
 mov  A7  %A9
 FormatStr %s=%s %A8 %D4
 UPDATEVALUESQL TBL_ITEM %A7 %A9
 
 FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
 mov  A7  %A9
 FormatStr %s=%s %A3 %D1
 UPDATEVALUESQL TBL_ITEM %A7 %A9
#ELSESAY
 _人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} 装备改造完毕!请{FCOLOR10}换号看看{FCOLOR12}吧!
 _花费人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} {FCOLOR10}$OUTPUT(D2){FCOLOR12}点积分,剩余{FCOLOR10}$OUTPUT(D7){FCOLOR12}点积分
 _怎么样,我的技术还不错吧~欢迎下次光临
 继续@改造物品选单_main
 关 闭@exit
 
;;-----------------------------------------------增加强元素主程序
[@强元素改造()]
#ACT
;;MOV D0 %ARG(1)   ;;装备类型0-10
MOV A8 %ARG(2)   ;;修改字段
MOV D1 %ARG(3)   ;;装备改变点数
MOV D2 %ARG(4)   ;;所需积分
 
FormatStr FLD_CHARACTER='%s' %A0
ReadValueSql TBL_QUEST %A9 FLD_CHARACTER,FLD_JIFEN @测试积分数3
 
[@测试积分数3()]
#ACT
mov  A6  %ARG(1)
mov  D7  %ARG(2)
dec  D2  1
#IF
small D2  %D7
#act
goto @开始吧吧3
#ELSESAY
_{FCOLOR1}该角色的积分点不够,角色现有积分:{FCOLOR10}$OUTPUT(D7){FCOLOR1}点。 {FCOLOR12}  
关 闭@exit
 
[@开始吧吧3]
#ACT
INC  D2  1
DEC  D7  %D2
 
FormatStr FLD_CHARACTER='%s' %A0
mov  A7  %A9
FormatStr FLD_JIFEN='%s' %D7
UPDATEVALUESQL TBL_QUEST %A7 %A9 
 
FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
ReadValueSql TBL_ITEM %A9 FLD_DESC5 @读取目前数
 
[@读取目前数()]
#ACT
mov  D5  %ARG(1)
INC  D5 %D1
 
FormatStr FLD_TYPE=%s and FLD_CHARACTER='%s' %D0 %A0
mov  A7  %A9
FormatStr %s=%s %A8 %D5
UPDATEVALUESQL TBL_ITEM %A7 %A9
 
#SAY
_人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} 装备改造完毕!请{FCOLOR10}换号查看{FCOLOR12}吧!
_花费人物 {FCOLOR10}$OUTPUT(A0){FCOLOR12} {FCOLOR10}$OUTPUT(D2){FCOLOR12}点积分,剩余{FCOLOR10}$OUTPUT(D7){FCOLOR12}点积分
_怎么样,我的技术还不错吧~欢迎下次光临
(责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容