GOM引擎提升项链脚本，项链升级至运5可获得暴击，让人物获得等级提升教程
[@MAIN]#IF
#ACT
;OPENMERCHANTBIGDLG 15 710 0 0 0 0 1 433 5
OPENMERCHANTBIGDLG 8 4217 1 4 0 0 0 433 5
#say
<ImgEx:8:3289:3290:3291:440:-10/@EXIT>\ \ \ \
<> <提升项链说明:项链升级至运5可获得暴击 高暴击项链可以让人物获得等级提升/SCOLOR=251>\
<> <项链暴击详情:|^251#项链暴击8:人物等级+1项链暴击9:人物等级+2项链暴击10:人物等级+3/SCOLOR=249><>\
<> <升级幸运请先将项链放入框内再升级/SCOLOR=71> <【点击升级幸运】/@DS升级项链幸运><>\
<> <升级幸运请先将项链放入框内再升级/SCOLOR=71> <【点击升级洗练】/@DS洗练项链幸运><>\
<> \
<> <幸运升级：+1需2W元宝 +2需5W元宝 +3需10W元宝 +4需200钻石 +5需500钻石/SCOLOR=250><>\
<> <幸运说明：人物幸运+10将发挥最佳攻击状态 洗练项链每次收取2000钻石/SCOLOR=250><>\
<> <项链介绍：项链幸运+5随机获得1-10点暴击幸运5项链可洗练，可转移 /SCOLOR=250><>\
<> <被转移幸运须比接受转移装备幸运高/SCOLOR=71> <【点击转移】/@DS项链幸运转移><>\
<> <转移幸运系统会收取2000元宝辛苦费/SCOLOR=71> <查看幸运加成|^251#幸运11增加倍攻0.10倍 幸运12增加倍攻0.15倍 幸运13增加倍攻0.20倍 幸运14增加倍攻0.25倍 幸运15增加倍攻0.30倍/SCOLOR=249><>\
<> <ITEMBOX:2:15:711:216:-140:40:56:19,20:250#请放入项链：><>\
<><ITEMBOX:3:15:711:216:-59:56:56:19,20:250#请放入被转移的项链：><>\
<><ITEMBOX:4:15:711:270:-75:56:56:19,20:70#请放入接受转移项链：><>\
[@ItemIntoBox3]
#IF
#ACT
SetUpgradeItem 3
#IF
CHECKITEMADDVALUE -1 1 = 0
#ACT
ReturnBoxItem 3
MESSAGEBOX 【操作失败：】\ \ 你的项链都没有附加幸运，无法转移！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 0
#ACT
MOV N$DS0725项链幸运A 0
#IF
CHECKITEMADDVALUE -1 1 = 1
#ACT
MOV N$DS0725项链幸运A 1
MOV N$项链颜色 240
#IF
CHECKITEMADDVALUE -1 1 = 2
#ACT
MOV N$DS0725项链幸运A 2
MOV N$项链颜色 241
#IF
CHECKITEMADDVALUE -1 1 = 3
#ACT
MOV N$DS0725项链幸运A 3
MOV N$项链颜色 242
#IF
CHECKITEMADDVALUE -1 1 = 4
#ACT
MOV N$DS0725项链幸运A 4
MOV N$项链颜色 243
#IF
CHECKITEMADDVALUE -1 1 = 5
#ACT
MOV N$DS0725项链幸运A 5
MOV N$项链颜色 244
MOV N$DS0725ZYYS1 <$BOXITEM.VALUE1>
#IF
EQUAL <$BOXITEM.VALUE1> 8
#ACT
MOV N$修改持久 81000
#IF
EQUAL <$BOXITEM.VALUE1> 9
#ACT
MOV N$修改持久 82000
#IF
EQUAL <$BOXITEM.VALUE1> 10
#ACT
MOV N$修改持久 83000
[@ItemIntoBox4]
#IF
#ACT
SetUpgradeItem 4
#IF
CHECKITEMADDVALUE -1 1 = 5
#ACT
ReturnBoxItem 4
MESSAGEBOX 【操作失败：】\ \ 当前放入的项链已经是幸运+5，无法操作！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 0
#ACT
MOV N$DS0725项链幸运B 0
#IF
CHECKITEMADDVALUE -1 1 = 1
#ACT
MOV N$DS0725项链幸运B 1
MOV
#IF
CHECKITEMADDVALUE -1 1 = 2
#ACT
MOV N$DS0725项链幸运B 2
#IF
CHECKITEMADDVALUE -1 1 = 3
#ACT
MOV N$DS0725项链幸运B 3
#IF
CHECKITEMADDVALUE -1 1 = 4
#ACT
MOV N$DS0725项链幸运B 4
#IF
CHECKITEMADDVALUE -1 1 = 5
#ACT
MOV N$DS0725项链幸运B 5
[@DS项链幸运转移]
#IF
CHECKGAMEGOLD < 2000
#ACT
MESSAGEBOX 【操作失败：】\ \ 元宝不足2000，无法转移幸运属性！！
BREAK
#IF
CheckBoxItemCount 3
CheckBoxItemCount 4
#ELSEACT
MESSAGEBOX 【操作失败：】\ \ 请先放入项链再进行无损转移！！
BREAK
#IF
CHECKGAMEGOLD > 1999
#ACT
GAMEGOLD - 2000
SetUpgradeItem 3
CHANGEITEMADDVALUE -1 1 = <$STR(N$DS0725项链幸运B)>
ChangeItemNameColor -1 239
CHANGEITEMADDVALUE -1 14 = 80000
SetNewItemValue -1 0 = 0
SetUpgradeItem 4
CHANGEITEMADDVALUE -1 1 = <$STR(N$DS0725项链幸运A)>
SetNewItemValue -1 0 = <$STR(N$DS0725ZYYS1)>
ChangeItemNameColor -1 <$str(N$项链颜色)>
CHANGEITEMADDVALUE -1 14 = <$str(N$修改持久)>
UpDateBoxItem 3
UpDateBoxItem 4
MESSAGEBOX 【操作成功：】\ \ 无损转移操作成功！！
BREAK
[@DS洗练项链幸运]
#IF
CheckBoxItemCount 2
#ACT
SetUpgradeItem 2
#ELSEACT
MESSAGEBOX 【操作失败：】\ \ 请先放入项链再洗练项链元素属性！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 < 5
#ACT
MESSAGEBOX 【操作失败：】\ \ 你的项链幸运没有达到5点，无法洗练！！
BREAK
#IF
CHECKGAMEDIAMOND < 2000
#ACT
MESSAGEBOX 【操作失败：】\ \ 当前洗练需：2000钻石，你当前钻石不足！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 5
CHECKGAMEDIAMOND > 1999
#ACT
GAMEDIAMOND - 2000
GetRandomText ..\QuestDiary\项链暴击增加.txt S25
SetNewItemValue -1 0 = <$STR(S25)>
goto @检测数据
UpDateBoxItem 2
SENDMSG 7 恭喜您的项链已经重新洗练!
SENDMSG 7 您的项链洗练成功，附加暴击值为<$STR(S25)>%!
BREAK
[@DS升级项链幸运]
#IF
CheckBoxItemCount 2
#ACT
SetUpgradeItem 2
#ELSEACT
MESSAGEBOX 【操作失败：】\ \ 请先放入项链再提升幸运！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 5
#ACT
MESSAGEBOX 【操作失败：】\ \ 项链已经满幸运了！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 4
CHECKGAMEDIAMOND < 500
#ACT
MESSAGEBOX 【操作失败：】\ \ 钻石不足，现阶段提升项链幸运需要500钻石！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 3
CHECKGAMEDIAMOND < 200
#ACT
MESSAGEBOX 【操作失败：】\ \ 钻石不足，现阶段提升项链幸运需要200钻石！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 2
CHECKGAMEGOLD < 100000
#ACT
MESSAGEBOX 【操作失败：】\ \ 元宝不足，现阶段提升项链幸运需要100000元宝！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 1
CHECKGAMEGOLD < 50000
#ACT
MESSAGEBOX 【操作失败：】\ \ 元宝不足，现阶段提升项链幸运需要50000元宝！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 0
CHECKGAMEGOLD < 20000
#ACT
MESSAGEBOX 【操作失败：】\ \ 元宝不足，现阶段提升项链幸运需要20000元宝！！
BREAK
#IF
CHECKITEMADDVALUE -1 1 = 0
#act
goto @幸运1
break
#IF
CHECKITEMADDVALUE -1 1 = 1
#act
goto @幸运2
break
#IF
CHECKITEMADDVALUE -1 1 = 2
#act
goto @幸运3
break
#IF
CHECKITEMADDVALUE -1 1 = 3
#act
goto @幸运4
break
#IF
CHECKITEMADDVALUE -1 1 = 4
#act
goto @幸运5
break
[@幸运1]
#IF
CHECKITEMADDVALUE -1 1 = 0
CHECKGAMEGOLD > 19999
#ACT
GAMEGOLD - 20000
CHANGEITEMADDVALUE -1 1 + 1
ChangeItemNameColor -1 240
UpDateBoxItem 2
SENDMSG 7 恭喜：您的项链幸运值增加一点。
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
break
[@幸运2]
#if
random 2
#act
goto @跳2
#elseact
GAMEGOLD - 50000
SENDMSG 7 加幸运失败,你的运气真差。
BREAK
[@跳2]
#IF
CHECKITEMADDVALUE -1 1 = 1
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CHANGEITEMADDVALUE -1 1 + 1
ChangeItemNameColor -1 241
UpDateBoxItem 2
SENDMSG 7 恭喜：您的项链幸运值增加一点。
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
BREAK
[@幸运3]
#if
random 5
#act
goto @跳3
#elseact
GAMEGOLD - 100000
SENDMSG 7 加幸运失败,你的运气真差。
BREAK
[@跳3]
#IF
CHECKITEMADDVALUE -1 1 = 2
CHECKGAMEGOLD > 99999
#ACT
GAMEGOLD - 100000
CHANGEITEMADDVALUE -1 1 + 1
ChangeItemNameColor -1 242
UpDateBoxItem 2
SENDMSG 7 恭喜：您的项链幸运值增加一点。
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
BREAK
[@幸运4]
#if
random 10
#act
goto @跳4
#elseact
GAMEDIAMOND - 200
SENDMSG 7 加幸运失败,你的运气真差。
BREAK
[@跳4]
#IF
CHECKITEMADDVALUE -1 1 = 3
CHECKGAMEDIAMOND > 199
#ACT
GAMEDIAMOND - 200
CHANGEITEMADDVALUE -1 1 + 1
ChangeItemNameColor -1 243
UpDateBoxItem 2
SENDMSG 7 恭喜：您的项链幸运值增加一点。
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功提升了项链的幸运！！！
BREAK
[@幸运5]
#if
random 20
#act
goto @跳5
#elseact
GAMEDIAMOND - 500
SENDMSG 7 加幸运失败,你的运气真差。
BREAK
[@跳5]
#IF
CHECKITEMADDVALUE -1 1 = 4
CHECKGAMEDIAMOND > 499
#ACT
GAMEDIAMOND - 500
CHANGEITEMADDVALUE -1 1 + 1
ChangeItemNameColor -1 244
GetRandomText ..\QuestDiary\项链暴击增加.txt S25
SetNewItemValue -1 0 = <$STR(S25)>
goto @检测数据
UpDateBoxItem 2
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功{将他的『<$BOXITEM.NAME>』附加幸运提升到5点|253:0:1}！！
SENDMSG 5 幸运提升：恭喜【{<$USERNAME>|151:0:1}】成功{将他的『<$BOXITEM.NAME>』附加幸运提升到5点|253:0:1}！！
messagebox 恭喜：您的项链幸运值已经达到峰值。\恭喜：你的项链获得暴击增加<$STR(S25)>%。
SENDMSG 7 您的项链幸运属性已经增加!
SENDMSG 7 您的项链附加暴击增加<$STR(S25)>%!
BREAK
[@检测数据]
#If
small s25 8
#act
CHANGEITEMADDVALUE -1 14 = 80000
#If
equal s25 8
#act
CHANGEITEMADDVALUE -1 14 = 81000
#If
equal s25 9
#act
CHANGEITEMADDVALUE -1 14 = 82000
#If
equal s25 10
#act
CHANGEITEMADDVALUE -1 14 = 83000 有没有开这种类型传奇sf的人啊？我要玩玩！ 我是个英雄合击传奇粉丝，希望论坛可以多分享一下这种类型的服务端，支持64gm论坛！ 超级变态sf 传奇私服发布站 中变传奇私服网站 这东西我收了！ 楼主发贴辛苦了，谢谢楼主分享！ 在这里可以学到很多传奇一条龙开区时遇到的问题。 这东西我收了！谢谢楼主！
页:
[1]
2