GOM引擎特殊鉴定脚本怎么写？单职业传奇版本清除当前装备星星星教程。

admin

                               
登录/注册后可看大图

(@ReclaimItem)
[@main]
#if
#act
OPENMERCHANTBIGDLG 0 596 1 4 1 -70 0 0 0 1
MOV N$时装页面 0
goto @main22
#say
　　\
\

　\
　　　　\
　\　\　\　\　\　\　\　\　\　\　\　\　\　\　\
　　　　　　　　　　{如果对当前属性不满意可以/scolor=250}{『归零星级』/scolor=253}{再鉴定/scolor=250}


[@星级归零]
#if
#act
SetUpgradeItem 3

#if
equal  
#act
messagebox 请先放入首饰再执行当前操作！！
break

#if
equal  0
#act
messagebox 你当前装备都没有星星，清除什么！！
break

#if
CHECKGAMEDIAMOND < 5
#act
messagebox 你当前RMB不足，无法执行当前操作！！
break
#elseact
messagebox 你确定要清除当前装备所有星星吗？？ @别废话
break

[@别废话]
#if
#act
SetUpgradeItem 3

#if
NOT equal  
large  0
CHECKGAMEDIAMOND > 4
#act
GAMEDIAMOND - 5
CHANGEITEMUPGRADECOUNT -1 = 0
UpDateBoxItem 3
messagebox 你已经成功的清除了当前装备的星星！！\　\可以再次去鉴定特殊属性了！！
break

[@品级鉴定aaa]
#if
#act
SetUpgradeItem 3

#if
equal  
#act
messagebox 请先放入首饰再鉴定属性！！
break

#if
checkitem 特殊鉴定石 1
#elseact
ReturnBoxItem 3
messagebox 你没有特殊鉴定石！！
break

#if
checkGameGird < 150
#act
messagebox 荣誉不足，无法鉴定！！
break


#if
large  5
#act
;ReturnBoxItem 3
messagebox 当前装备星级已经超过6级，不可再鉴定！！\　\你可以选择重置后再鉴定哦！！
break

#if
#act
;关联到OK框物品 所有操作或检测自定义OK框的脚本命令才能正常使用
SetUpgradeItem 3
SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
CHANGECUSTOMITEMVALUE -1 0 = 0
CHANGECUSTOMITEMVALUE -1 1 = 0
CHANGECUSTOMITEMVALUE -1 2 = 0
CHANGECUSTOMITEMVALUE -1 3 = 0
CHANGECUSTOMITEMVALUE -1 4 = 0
CHANGECUSTOMITEMVALUE -1 5 = 0
CHANGECUSTOMITEMVALUE -1 6 = 0
CHANGECUSTOMITEMVALUE -1 7 = 0

;===========================================================加攻击

;===========================================================加血量
#if
Random 7
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 5 1 6
CHANGECUSTOMITEMVALUE -1 5 =
CHANGECUSTOMITEMABIL -1 5 0 254
CHANGECUSTOMITEMABIL -1 5 2 6
CHANGECUSTOMITEMABIL -1 5 3 1

;===========================================================加防御
#if
Random 7
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 0 1 1
CHANGECUSTOMITEMVALUE -1 0 =
CHANGECUSTOMITEMABIL -1 0 0 254
CHANGECUSTOMITEMABIL -1 0 2 1
CHANGECUSTOMITEMABIL -1 0 3 1

;===========================================================加魔防
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 1 1 2
CHANGECUSTOMITEMVALUE -1 1 =
CHANGECUSTOMITEMABIL -1 1 0 254
CHANGECUSTOMITEMABIL -1 1 2 2
CHANGECUSTOMITEMABIL -1 1 3 1

;===========================================================加魔法
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 3 1 4
CHANGECUSTOMITEMVALUE -1 3 =
CHANGECUSTOMITEMABIL -1 3 0 254
CHANGECUSTOMITEMABIL -1 3 2 4
CHANGECUSTOMITEMABIL -1 3 3 1

;===========================================================加道术
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 2 1 3
CHANGECUSTOMITEMVALUE -1 4 =
CHANGECUSTOMITEMABIL -1 2 0 254
CHANGECUSTOMITEMABIL -1 2 2 3
CHANGECUSTOMITEMABIL -1 2 3 1

;===========================================================加MP
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 6 1 7
CHANGECUSTOMITEMVALUE -1 6 =
CHANGECUSTOMITEMABIL -1 6 0 254
CHANGECUSTOMITEMABIL -1 6 2 7
CHANGECUSTOMITEMABIL -1 6 3 1


#if
random 50
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
MOVR P8 1 4
SetNewItemValue -1 2 =
INC P55 1

#if
Random 7
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
MOVR P8 1 4
SetNewItemValue -1 0 =
INC P55 1

#if
Random 7
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
MOVR P8 1 4
SetNewItemValue -1 4 =
INC P55 1

#if
random 4
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
MOVR P8 1 4
SetNewItemValue -1 4 =
INC P55 1

#if
random 4
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
MOVR P8 1 4
SetNewItemValue -1 3 =
INC P55 1

#if
random 3
small P55 5
NOT equal
checkitem 特殊鉴定石 1
checkGameGird > 149
small  10
#act
SetNewItemValue -1 6 = 1
INC P55 1

#if
#act
CHANGEITEMUPGRADECOUNT -1 + 1
GameGird - 150
take 特殊鉴定石 1
UpDateBoxItem 3


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！