[功能系统]黑暗系统+黑暗转移

[复制链接]
查看30 | 回复0 | 2025-11-9 22:09:17 | 显示全部楼层 |阅读模式
[@main]
<color=db0505 ╭┈┈┈┈┈┈┈┈><COLOR=GREEN [黑暗☉强化]><color=db0505 ┈┈┈┈┈┈┈┈┈╮>\
   黑暗<color=green +1><color=red 200黑暗魔力成功率100%>  您黑暗魔力为[<$GAMEPOINT>]点\
   黑暗<color=green +2><color=red 800黑暗魔力成功率 50%>    {color=~$
 #0xff00ff00$
$=========================================================================================================================#0xFF00BFFF$
$推荐1:玩家可进,特殊终极地图,比如魔龙巢穴等20张地图,4小时刷新一次,建议和朋友一起进去打,因为怪的属性很高,必出黑暗魔力100点#0xFFFF1493$#0xFFFF1493$
$推荐2:土豪玩家可进通天不周塔,黑暗魔力爆率超高,特殊层必爆#0xFFFF1493$#0xFFFF1493$
$推荐3:其次,可在充值回馈地图,黑暗魔力,爆率也很高#0xFFFF1493$#0xFFFF1493$
$推荐4:当然普通玩家,可在各大地图的BOSS身上获得,#0xFFFF1493$#0xFFFF1493$
$=========================================================================================================================#0xFF00BFFF$#0xFF00BFFF$ 黑暗出处说明} \
   黑暗<color=green +3><color=red 1600黑暗魔力成功率 30%>\
;黑暗<color=green +4><color=red 2000黑暗魔力成功率20%>
;黑暗<color=green +5><color=red 3000黑暗魔力成功率10%>
               \
   <COLOR=F400FF 防御、魔御,只针对戒指、腰带、靴子、衣服>\
   <COLOR=F400FF 攻击、魔法、道术,针对所有装备。勋章和宝石除外>\
       <打造黑暗装备/@打造>  <黑暗属性转移/@黑暗转移> 1000元宝一次 \
  <color=db0505 ╰┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈╯>\

125903rl8nk1nnqlnkt8ln.png
[@黑暗转移]
#if
CHECKGAMEGOLD < 1000
#act
MessageBox 你的元宝不足1000无法转移
break
#IF
True
#ACT
ShowSpotDlg 6 请放入被转移的装备: @黑暗转移_1
break
#SAY
\
\
请放入被转移的装备:

[@黑暗转移_1]
#IF
True
#ACT
mov P10 $ITEMINFO[$PARAM(1)].ITEMEXT(29)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(30)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(31)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(32)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(33)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(45)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(46)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(47)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(48)
inc P10 $ITEMINFO[$PARAM(1)].ITEMEXT(49)

#IF
small P10 1
#ACT
MessageBox <$PARAM(0)>没有黑暗属性!
break
#ELSEACT
CalcVar HUMAN 黑暗转移 = $PARAM(1)
ShowSpotDlg 6 请放入转移到的装备: @黑暗转移_2
break
#ELSESAY
\
\
请放入转移到的装备:

[@黑暗转移_2]
#IF
!CheckitemID $HUMAN(黑暗转移)
#ACT
CalcVar HUMAN 黑暗转移 = 0
goto @main
break

#IF
!PosInList |<$ITEMINFO[$HUMAN(黑暗转移)].Stdmode>| \..\..\..\..\永恒数据\游戏功能\Stdmode.txt S5
#ACT
CalcVar HUMAN 黑暗转移 = 0
goto @main
break

#IF
!pos $STR(S5) |<$ITEMINFO[$PARAM(1)].Stdmode>|
#ACT
MessageBox <$ITEMINFO[$HUMAN(黑暗转移)].NAME>与<$PARAM(0)>不是同类装备,无法转移!
break
#ELSEACT
GAMEGOLD - 1000
UPGRADEUSERITEM $PARAM(1) 29 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(29)
UPGRADEUSERITEM $PARAM(1) 30 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(30)
UPGRADEUSERITEM $PARAM(1) 31 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(31)
UPGRADEUSERITEM $PARAM(1) 32 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(32)
UPGRADEUSERITEM $PARAM(1) 33 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(33)
UPGRADEUSERITEM $PARAM(1) 45 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(45)
UPGRADEUSERITEM $PARAM(1) 46 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(46)
UPGRADEUSERITEM $PARAM(1) 47 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(47)
UPGRADEUSERITEM $PARAM(1) 48 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(48)
UPGRADEUSERITEM $PARAM(1) 49 = $ITEMINFO[$HUMAN(黑暗转移)].ITEMEXT(49)
;takem $HUMAN(黑暗转移)
UPGRADEUSERITEM $HUMAN(黑暗转移)  29 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  30 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  31 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  32 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  33 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  45 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  46 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  47 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  48 = 0
UPGRADEUSERITEM $HUMAN(黑暗转移)  49 = 0
MessageBox 转移成功!
break








[@打造]
  <color=db0505 ╭┈┈┈┈┈┈┈┈><COLOR=GREEN [黑暗☉强化]><color=db0505 ┈┈┈┈┈┈┈┈┈╮>\
   黑暗<color=green +1><color=red 500黑暗魔力成功率100%>  您黑暗魔力为[<$GAMEPOINT>]点\
   黑暗<color=green +2><color=red 1500黑暗魔力成功率 50%>\
   黑暗<color=green +3><color=red 3000黑暗魔力成功率 30%>\
;黑暗<color=green +4><color=red 2000黑暗魔力成功率20%>
;黑暗<color=green +5><color=red 2500黑暗魔力成功率10%>
 ╭<增加/@增加攻击上限> <COLOR=Ce9e4e 黑暗攻击上限>    ┊    <增加/@增加攻击下限> <COLOR=Ce9e4e 黑暗攻击下限>╮\
 ┊<增加/@增加魔法上限> <COLOR=Ce9e4e 黑暗魔法上限>    ┊    <增加/@增加魔法下限> <COLOR=Ce9e4e 黑暗魔法下限>┊\
 ┊<增加/@增加道术上限> <COLOR=Ce9e4e 黑暗道术上限>    ┊    <增加/@增加道术下限> <COLOR=Ce9e4e 黑暗道术下限>┊\
 ┊<增加/@增加防御上限> <COLOR=Ce9e4e 黑暗防御上限>    ┊    <增加/@增加防御下限> <COLOR=Ce9e4e 黑暗防御下限>┊\
 ╰<增加/@增加魔防上限> <COLOR=Ce9e4e 黑暗魔御上限>    ┊    <增加/@增加魔防下限> <COLOR=Ce9e4e 黑暗魔御下限>╯\\\\


;================================================================================================================

[@增加攻击上限]
#ACT
ShowSpotDlg 6 放想升攻击上限首饰 @getboxitem249

[@getboxitem249]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].HIGLOOM(6) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(6) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @攻击上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(6) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @攻击上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(6) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @攻击上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(6) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @攻击上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(6) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @攻击上限成功机率
BREAK


[@攻击上限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].HIGLOOM(6)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 45 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性上限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

[@增加攻击下限]
#ACT
ShowSpotDlg 6 放想升攻击下限首饰 @getboxitem250

[@getboxitem250]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].LOGLOOM(6) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(6) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @攻击下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(6) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @攻击下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(6) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @攻击下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(6) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @攻击下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(6) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @攻击下限成功机率
BREAK



[@攻击下限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].LOGLOOM(6)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 29 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗攻击属性下限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

;================================================================================================================


;================================================================================================================

[@增加魔法上限]
#ACT
ShowSpotDlg 6 放想升魔法上限首饰 @getboxitem251

[@getboxitem251]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].HIGLOOM(7) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(7) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @魔法上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(7) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @魔法上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(7) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @魔法上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(7) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @魔法上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(7) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @魔法上限成功机率
BREAK


[@魔法上限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].HIGLOOM(7)
INC P11 1
GamePoint - $STR(S10)
UPGRADEUSERITEM $PARAM(1) 46 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性上限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

[@增加魔法下限]
#ACT
ShowSpotDlg 6 放想升魔法下限首饰 @getboxitem252

[@getboxitem252]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].LOGLOOM(7) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(7) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @魔法下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(7) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @魔法下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(7) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @魔法下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(7) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @魔法下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(7) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @魔法下限成功机率
BREAK



[@魔法下限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].LOGLOOM(7)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 30 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔法属性下限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

;================================================================================================================

;================================================================================================================

[@增加道术上限]
#ACT
ShowSpotDlg 6 放想升道术上限首饰 @getboxitem253

[@getboxitem253]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].HIGLOOM(8) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(8) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @道术上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(8) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @道术上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(8) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @道术上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(8) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @道术上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(8) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @道术上限成功机率
BREAK


[@道术上限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].HIGLOOM(8)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 47 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性上限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

[@增加道术下限]
#ACT
ShowSpotDlg 6 放想升道术下限首饰 @getboxitem254

[@getboxitem254]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型1.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].LOGLOOM(8) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(8) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @道术下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(8) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @道术下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(8) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @道术下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(8) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @道术下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(8) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @道术下限成功机率
BREAK



[@道术下限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].LOGLOOM(8)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 31 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗道术属性下限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

;================================================================================================================

;================================================================================================================

[@增加防御上限]
#ACT
ShowSpotDlg 6 放想升防御上限首饰 @getboxitem255

[@getboxitem255]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].HIGLOOM(9) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(9) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @防御上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(9) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @防御上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(9) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @防御上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(9) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @防御上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(9) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @防御上限成功机率
BREAK



[@防御上限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].HIGLOOM(9)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 48 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性上限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

[@增加防御下限]
#ACT
ShowSpotDlg 6 放想升防御下限首饰 @getboxitem256

[@getboxitem256]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].LOGLOOM(9) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(9) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @防御下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(9) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @防御下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(9) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @防御下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(9) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @防御下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(9) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @防御下限成功机率
BREAK



[@防御下限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].LOGLOOM(9)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 32 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗防御属性下限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

;================================================================================================================

;================================================================================================================

[@增加魔防上限]
#ACT
ShowSpotDlg 6 放想升魔防上限首饰 @getboxitem257

[@getboxitem257]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].HIGLOOM(10) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(10) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @魔防上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(10) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @魔防上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(10) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @魔防上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(10) 3
#ACT
MOV S10 1500
MOV P10 50
GOTO @魔防上限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].HIGLOOM(10) 4
#ACT
MOV S10 3000
MOV P10 10
GOTO @魔防上限成功机率
BREAK



[@魔防上限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].HIGLOOM(10)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 49 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性上限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK

[@增加魔防下限]
#ACT
ShowSpotDlg 6 放想升魔防下限首饰 @getboxitem258

[@getboxitem258]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].STDMODE \..\..\..\..\永恒数据\游戏功能\首饰类型.txt
#ACT
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break

#IF
LARGE $ITEMINFO[$PARAM(1)].LOGLOOM(10) 2
#SAY
\\\\当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(10) 0
#ACT
MOV S10 500
MOV P10 1
GOTO @魔防下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(10) 1
#ACT
MOV S10 1500
MOV P10 11
GOTO @魔防下限成功机率
BREAK

#IF
EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(10) 2
#ACT
MOV S10 3000
MOV P10 30
GOTO @魔防下限成功机率
BREAK

;#IF
;EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(10) 3
;#ACT
;MOV S10 1500
;MOV P10 50
;GOTO @魔防下限成功机率
;BREAK

;#IF
;EQUAL $ITEMINFO[$PARAM(1)].LOGLOOM(10) 4
;#ACT
;MOV S10 3000
;MOV P10 10
;GOTO @魔防下限成功机率
;BREAK



[@魔防下限成功机率]
#IF
CheckGamePoint < $STR(S10)
#SAY
\\\\对不起,当前人物黑暗魔力不足<$STR(S10)>,无法帮你升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ACT
BREAK

#IF
Random $STR(P10)
#ACT
GamePoint - $STR(S10)
MOV P11 $ITEMINFO[$PARAM(1)].LOGLOOM(10)
INC P11 1
UPGRADEUSERITEM $PARAM(1) 33 + 1
SENDMSG 5 恭喜您,您的运气太好了,升级成功了!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功!
SENDMSG 14 ★系统提示★:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功,在黑暗升级处升级!
SENDMSG 1 <[游戏玩家]>:恭喜游戏玩家<%s>升级黑暗魔防属性下限+<$STR(P11)>成功,在黑暗升级处升级!
GOTO @打造
BREAK
#ELSESAY
\\\\ 对不起,当前装备升级黑暗属性失败,请重新升级黑暗属性\
        [<返回上页/@打造>] [<关闭此页/@EXIT>]
#ELSEACT
GamePoint - $STR(S10)
BREAK




回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

64

主题

0

回帖

416

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
416