装备开光系统以及首饰重鉴系统脚本

　　[@main] #IF #ACT OPENMERCHANTBIGDLG 4 16 1 4 0 -50 1 405 10 #SAY \ \ \ \ \ 1.装备开光系统/SCOLOR=254\ 武器衣服可以在我这里进行开光/SCOLOR=251\ 开光后随机获得打怪伤害跟元素属性/SCOLOR=241 ITEMBOX:0:28:1294:100:0:36:15:5,10:251#只允许放入武器.衣服\ 装备开光需要：/SCOLOR=250[开光魔石]/SCOLOR=249\ 需要开光的武器.衣服放入左边框内/SCOLOR=253\ 确定开光/@放入装备\ 2.首饰重鉴系统/SCOLOR=250\ 大部分首饰都可以在我这里进行重新鉴定/SCOLOR=70\ 重新鉴定需要鉴定等级相同或更高级的/SCOLOR=241“祭品”/SCOLOR=249首饰/SCOLOR=241\ 只有首饰才能鉴定/SCOLOR=253\ \ 前往进入重新鉴定/@鉴定说明\ [@鉴定说明] #IF #ACT OPENMERCHANTBIGDLG 4 16 1 4 0 -50 1 405 10 #SAY \ \ \ \ \ 首饰重鉴系统/SCOLOR=250\ 如果你不满意首饰的鉴定属性可以在我这里重新鉴定/scolor=250\ 鉴定收取一定费用,鉴定后重新重新获取鉴定属性/scolor=241\\ 只允许戒指,手镯,腰带,靴子.头盔.项链/scolor=253\ 1.框内放入需要重新鉴定的装备/scolor=253\ 2.每次重新鉴定需要花费100000元宝/scolor=70\ \ ITEMBOX:3:28:1294:60:0:40:40:15,19,24,26,64,62,22,23:251#放入需要重新鉴定的装备\ \ \ \ ITEMBOX:2:28:1294:190:0:40:40:15,19,24,26,64,62,22,23:251#放入相同或更高等级的祭品\ 开始重鉴属性/@开始重鉴属性\ [@开始重鉴属性] #act SetUpgradeItem 2 SetUpgradeItem 3 #IF NOT CheckBoxItemCount 3 1 #act MESSAGEBOX 左边没放装备 BREAK #IF NOT CheckBoxItemCount 2 1 #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 DELBOXITEM 2 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 #CALL [..\..\..\..\秩序觉醒通区\通区文本\拾取鉴定.txt] @dq拾取鉴定 MESSAGEBOX 重新鉴定成功 BREAK [@放入装备] #ACT MESSAGEBOX 你还没有放入装备？？？ [@ItemOutBox0] #ACT goto @main [@ItemIntoBox0] #ACT SetUpgradeItem 0 #IF EQUAL $BOXITEM[0].STDMODE 10 #ACT MOV N$元素属性位置1 2 MOV N$元素属性位置2 3 MOV N$元素属性位置3 5 MOV N$元素属性位置4 7 MOVR N$元素属性数值1 1 25 MOVR N$元素属性数值2 1 25 MOVR N$元素属性数值3 1 20 MOVR N$元素属性数值4 1 25 MOVR N$打怪伤害数值 1 20 DELAYGOTO 1 @开光说明 BREAK #IF EQUAL $BOXITEM[0].STDMODE 5 #ACT MOV N$元素属性位置1 0 MOV N$元素属性位置2 1 MOV N$元素属性位置3 4 MOV N$元素属性位置4 6 MOVR N$元素属性数值1 1 30 MOVR N$元素属性数值2 1 20 MOVR N$元素属性数值3 1 30 MOVR N$元素属性数值4 1 20 MOVR N$打怪伤害数值 1 20 DELAYGOTO 1 @开光说明 BREAK [@开光说明] #IF #ACT OPENMERCHANTBIGDLG 30 275 1 4 0 -65 1 500 0 #SAY \ \ \ \ \ \ \ 1.装备开光系统/SCOLOR=254\ 武器衣服可以在我这里进行开光/SCOLOR=251 ITEMBOX:0:28:1294:100:0:36:15:5,10: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 -1 1 1 8 CHANGECUSTOMITEMABIL -1 1 2 1 CHANGECUSTOMITEMABIL -1 1 0 250 CHANGECUSTOMITEMABIL -1 1 3 1 CHANGECUSTOMITEMVALUE -1 1 = $str(N$打怪伤害数值) UpDateBoxItem 0 GOTO @ItemIntoBox0 MESSAGEBOX 恭喜您成功的给装备开光！