GOM传奇服务端星石开光脚本 GOM开区一条龙开光随机元素脚本4tuu

admin

[@MAIN]　　#IF
　　#ACT
　　OPENMERCHANTBIGDLG 90 96 1 4 0 -80 0
　　#IF
　　CHECKUSEITEM 2
　　#ELSEACT
　　MESSAGEBOX \提示：请先佩戴好将星石！
　　BREAK
　　#IF
　　CHECKITEMW 焚星石 1
　　#ACT
　　MOV N0 0
　　#IF
　　CHECKITEMW 暴星石 1
　　#ACT
　　MOV N0 1
　　#IF
　　CHECKITEMW 狂星石 1
　　#ACT
　　MOV N0 2
　　#IF
　　CHECKITEMW 血星石 1
　　#ACT
　　MOV N0 3
　　#IF
　　CHECKITEMW 陨星石 1
　　#ACT
　　MOV N0 4
　　#IF
　　#ACT
　　GETLISTSTRING ..\QuestDiary\QQ394099033\将星石系统\将星石属性.txt N0 S$将星石主属性 N$将星石主属性代码
　　#IF
　　#SAY
　　‹IMGEX:90:6:7:8:260:17/@EXIT>\ \
　　‹>                   ‹星石开光/AUTOCOLOR=251,21,250,70,254,103,242,243>\ \ \
　　‹>    ‹当前佩戴将星石/SCOLOR=250>: {‹$RIGHTHAND>/SCOLOR=70}\ \
　　‹>    ‹当前星石主属性/SCOLOR=250>: {‹$STR(S$将星石主属性)>/SCOLOR=242}\ \
　　‹>               ‹星石开光功能介绍/SCOLOR=254>\ \ \
　　‹>    ‹将星石开光后，将赋予将星石五种元素属性！/SCOLOR=22>\ \
　　‹>    ‹五种元素属性分别是/SCOLOR=250>：\ \
　　‹>        ‹暴击几率增加/SCOLOR=244>    ‹增加攻击伤害/SCOLOR=244>\
　　‹>        ‹物理伤害减少/SCOLOR=244>    ‹忽视目标防御/SCOLOR=244>\
　　‹>        ‹人物体力增加/SCOLOR=244>\ \ \
　　‹>  ‹主属性随机增加6%-10%  其他属性随机增加1%-5%/SCOLOR=151>\ \ \ \ \ \
　　‹>                 ‹充值点达到100/SCOLOR=154>\
　　‹>                     ‹不扣除>\ \ \
　　‹IMGEX:90:97:98:99:104:-7/@开始晋升>\
　　[@开始晋升]
　　#IF
　　NOT CHECKUSEITEM 2
　　#ACT
　　MESSAGEBOX \提示：请先佩戴好将星石！
　　BREAK
　　#IF
　　CHECKGAMEGIRD ‹ 100
　　#ACT
　　MESSAGEBOX \提示：充值金额不够！
　　BREAK
　　#IF
　　CHECKCUSTOMITEMVALUE 2 0 > 0
　　#ACT
　　MESSAGEBOX \提示：您的【‹$RIGHTHAND>】已经开过光了！
　　BREAK
　　#IF
　　CHECKUSEITEM 2
　　CHECKGAMEGIRD ? 100
　　CHECKCUSTOMITEMVALUE 2 0 = 0
　　#ACT
　　CHANGECUSTOMITEMVALUE 2 0 = 1
　　CHANGECUSTOMITEMTEXT 2 [已开光]
　　CHANGECUSTOMITEMTEXTCOLOR 2 250
　　GETLISTSTRING ..\QuestDiary\QQ394099033\将星石系统\将星石属性.txt N0 S$将星石主属性 N$将星石主属性代码
　　MOVR N$开光随机元素1 1 6
　　MOVR N$开光随机元素2 1 6
　　MOVR N$开光随机元素3 1 6
　　MOVR N$开光随机元素4 1 6
　　MOVR N$开光随机元素5 1 6
　　MOVR N$开光随机元素6 6 11
　　SetNewItemValue 2 0 = ‹$STR(N$开光随机元素1)>
　　SetNewItemValue 2 1 = ‹$STR(N$开光随机元素2)>
　　SetNewItemValue 2 2 = ‹$STR(N$开光随机元素3)>
　　SetNewItemValue 2 4 = ‹$STR(N$开光随机元素4)>
　　SetNewItemValue 2 7 = ‹$STR(N$开光随机元素5)>
　　SetNewItemValue 2 ‹$STR(N$将星石主属性代码)> = ‹$STR(N$开光随机元素6)>
　　SENDCENTERMSG 251 0 [号外]:>恭喜玩家「‹$USERNAME>」成功为他的【‹$RIGHTHAND>】开光！！！ 1 3
　　GUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{‹$USERNAME>|250:0:1}」成功将他的【{‹$RIGHTHAND>|255:0:1}】开光！！！
　　GUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{‹$USERNAME>|250:0:1}」成功将他的【{‹$RIGHTHAND>|255:0:1}】开光！！！
　　GUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{‹$USERNAME>|250:0:1}」成功将他的【{‹$RIGHTHAND>|255:0:1}】开光！！！
　　MESSAGEBOX \提示：开光成功！
　　BREAK