#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}点积分
_怎么样,我的技术还不错吧~欢迎下次光临
(责任编辑:找搜服传奇发布网) |