#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 (责任编辑：admin)