当前位置 : 745v传奇网 | 传奇教程 | 

传奇装备开光与首饰重鉴系统脚本

来源: 作者: 点击:
在传奇游戏中,装备开光和首饰重鉴是提升角色实力的重要途径。以下是一个详细的脚本,介绍如何设置装备开光系统和首饰重鉴系统。

装备开光系统脚本
[@main]
#IF
#ACT
OPENMERCHANTBIGDLG416140-50140510
#SAY
\\\\\\\\\\
<1.装备开光系统/SCOLOR=254>
<武器衣服可以在我这里进行开光/SCOLOR=251>
<开光后随机获得打怪伤害跟元素属性/SCOLOR=241>
<ITEMBOX:0:28:1294:100:0:36:15:510:251#只允许放入武器.衣服>
<装备开光需要:/SCOLOR=250><[开光魔石]/SCOLOR=249>
<需要开光的武器.衣服放入左边框内/SCOLOR=253>
<><确定开光/@放入装备>

[@放入装备]
#ACT
MESSAGEBOX你还没有放入装备???

[@ItemOutBox0]
#ACT
goto@main

[@ItemIntoBox0]
#ACT
SetUpgradeItem0

#IF
EQUAL<$BOXITEM[0].STDMODE>10
#ACT
MOVN$元素属性位置12
MOVN$元素属性位置23
MOVN$元素属性位置47

MOVRN$元素属性数值1125
MOVRN$元素属性数值2125
;MOVRN$元素属性数值3120
MOVRN$元素属性数值4125
MOVRN$打怪伤害数值120
DELAYGOTO1@开光说明
BREAK

#IF
EQUAL<$BOXITEM[0].STDMODE>5
#ACT
MOVN$元素属性位置10
MOVN$元素属性位置21
MOVN$元素属性位置34
MOVN$元素属性位置46

MOVRN$元素属性数值1130
MOVRN$元素属性数值2120
;MOVRN$元素属性数值3130
MOVRN$元素属性数值4120
MOVRN$打怪伤害数值120
DELAYGOTO1@开光说明
BREAK

[@开光说明]
#IF
#ACT
OPENMERCHANTBIGDLG30275140-6515000
#SAY
\\\\\\\\\\\\\\
<1.装备开光系统/SCOLOR=254>
<武器衣服可以在我这里进行开光/SCOLOR=251>
<开光后随机获得打怪伤害跟元素属性/SCOLOR=241>
<装备开光需要:/SCOLOR=250><[开光魔石]/SCOLOR=249>
<需要开光的武器.衣服放入左边框内/SCOLOR=253>
<确定开光/@确定开光>

<注:如果不满意开光获得的属性数值可以重复开光.只要你有足够的材料/SCOLOR=250>
<[开光魔石全服大部分怪物均有掉落.赞助浮力商城也可以兑换]/SCOLOR=249>

[@确定开光]
#IF
checkitem开光魔石1
#act
GOTO@执行开光
#elseact
messagebox请检查是否有足够的材料!
BREAK

[@执行开光]
#IF
checkitem开光魔石1
#ACT
TAKE开光魔石1
SetNewItemValue-1<$str(N$元素属性位置1)>=

完整脚本:

[@main]
#IF
#ACT
OPENMERCHANTBIGDLG416140-50140510
#SAY
\\\\\
<1.装备开光系统/SCOLOR=254>\
<武器衣服可以在我这里进行开光/SCOLOR=251>\
<开光后随机获得打怪伤害跟元素属性/SCOLOR=241><ITEMBOX:0:28:1294:100:0:36:15:510:251#只允许放入武器.衣服>\
<装备开光需要:/SCOLOR=250><[开光魔石]/SCOLOR=249>\
<需要开光的武器.衣服放入左边框内/SCOLOR=253>\
<><确定开光/@放入装备>\
<2.首饰重鉴系统/SCOLOR=250>\
<大部分首饰都可以在我这里进行重新鉴定/SCOLOR=70>\
<重新鉴定需要鉴定等级相同或更高级的/SCOLOR=241><“祭品”/SCOLOR=249><首饰/SCOLOR=241>\
<只有首饰才能鉴定/SCOLOR=253>\\
<前往进入重新鉴定/@鉴定说明>\

[@鉴定说明]
#IF
#ACT
OPENMERCHANTBIGDLG416140-50140510
#SAY
\\\\\
<首饰重鉴系统/SCOLOR=250>\
<如果你不满意首饰的鉴定属性可以在我这里重新鉴定/scolor=250>\
<鉴定收取一定费用鉴定后重新重新获取鉴定属性/scolor=241>\\
<只允许戒指手镯腰带靴子.头盔.项链/scolor=253>\
<1.框内放入需要重新鉴定的装备/scolor=253>\
<2.每次重新鉴定需要花费100000元宝/scolor=70>\\

<><ITEMBOX:3:28:1294:60:0:40:40:1519242664622223:251#放入需要重新鉴定的装备>\\\\
;<ITEMBOX:2:28:1294:190:0:40:40:1519242664622223:251#放入相同或更高等级的祭品>\

<>  <开始重鉴属性/@开始重鉴属性>\

[@开始重鉴属性]
#act
;SetUpgradeItem2
SetUpgradeItem3
#IF
NOTCheckBoxItemCount31
#act
MESSAGEBOX左边没放装备
BREAK
;#IF
;NOTCheckBoxItemCount21
;#act
;MESSAGEBOX右边没放装备
;BREAK

#if
CHECKGAMEGOLD>99999
#ACT
GAMEGOLD-100000
GOTO@确定重鉴属性
BREAK
#elseact
messagebox元宝不足100000!

;#OR
;LARGE<$BOXITEM[2].MP><$BOXITEM[3].MP>
;EQUAL<$BOXITEM[2].MP><$BOXITEM[3].MP>
;#act
;GOTO@确定重鉴属性
;BREAK
;#elseact
;messagebox祭品首饰须与重新鉴定的首饰鉴定等级相同.或者更高!

[@确定重鉴属性]
#if
CHECKTEXTLIST..\..\..\..\秩序觉醒通区\通区文本\鉴定列表.txt<$BOXITEM[3].NAME>
#act
;DELBOXITEM2
CHANGECUSTOMITEMVALUE-10=0
CHANGECUSTOMITEMVALUE-11=0
CHANGECUSTOMITEMVALUE-12=0
CHANGECUSTOMITEMVALUE-13=0
CHANGECUSTOMITEMVALUE-14=0
CHANGECUSTOMITEMVALUE-15=0
CHANGECUSTOMITEMVALUE-16=0
#CALL[..\..\..\..\秩序觉醒通区\通区文本\拾取鉴定.txt]@dq拾取鉴定
MESSAGEBOX重新鉴定成功
BREAK

[@放入装备]
#ACT
MESSAGEBOX你还没有放入装备???

[@ItemOutBox0]
#ACT
goto@main

[@ItemIntoBox0]
#ACT
SetUpgradeItem0

#IF
EQUAL<$BOXITEM[0].STDMODE>10
#ACT
MOVN$元素属性位置12
MOVN$元素属性位置23
MOVN$元素属性位置35
MOVN$元素属性位置47

MOVRN$元素属性数值1125
MOVRN$元素属性数值2125
;MOVRN$元素属性数值3120
MOVRN$元素属性数值4125
MOVRN$打怪伤害数值120
DELAYGOTO1@开光说明
BREAK


#IF
EQUAL<$BOXITEM[0].STDMODE>5
#ACT
MOVN$元素属性位置10
MOVN$元素属性位置21
MOVN$元素属性位置34
MOVN$元素属性位置46

MOVRN$元素属性数值1130
MOVRN$元素属性数值2120
;MOVRN$元素属性数值3130
MOVRN$元素属性数值4120
MOVRN$打怪伤害数值120
DELAYGOTO1@开光说明
BREAK

[@开光说明]
#IF
#ACT
OPENMERCHANTBIGDLG30275140-6515000
#SAY
\\\\\\\
<1.装备开光系统/SCOLOR=254>\
<武器衣服可以在我这里进行开光/SCOLOR=251><ITEMBOX:0:28:1294:100:0:36:15:510:251#只允许放入武器.衣服>\
<开光后随机获得打怪伤害跟元素属性/SCOLOR=241>\
<装备开光需要:/SCOLOR=250><[开光魔石]/SCOLOR=249>\
<需要开光的武器.衣服放入左边框内/SCOLOR=253><确定开光/@确定开光>\\\\

<注:如果不满意开光获得的属性数值可以重复开光.只要你有足够的材料/SCOLOR=250>\
<[开光魔石全服大部分怪物均有掉落.赞助浮力商城也可以兑换]/SCOLOR=249>\

[@确定开光]
#IF
checkitem开光魔石1
#act
GOTO@执行开光
#elseact
messagebox请检查是否有足够的材料!
BREAK

[@执行开光]
#IF
checkitem开光魔石1
#ACT
TAKE开光魔石1
SetNewItemValue-1<$str(N$元素属性位置1)>=<$str(N$元素属性数值1)>
SetNewItemValue-1<$str(N$元素属性位置2)>=<$str(N$元素属性数值2)>
;SetNewItemValue-1<$str(N$元素属性位置3)>=<$str(N$元素属性数值3)>
SetNewItemValue-1<$str(N$元素属性位置4)>=<$str(N$元素属性数值4)>
CHANGECUSTOMITEMABIL-1118
CHANGECUSTOMITEMABIL-1121
CHANGECUSTOMITEMABIL-110250
CHANGECUSTOMITEMABIL-1131
CHANGECUSTOMITEMVALUE-11=<$str(N$打怪伤害数值)>
UpDateBoxItem0
GOTO@ItemIntoBox0
MESSAGEBOX恭喜您成功的给装备开光!
[顶部]