GOM传奇引擎定制版幸运系统脚本
[@main]
#IF
CHECKLEVELEX > 1
#act
MOV S88 -1
movr N98 9
OPENMERCHANTBIGDLG 49 15 3 4 0 -80 1 438 45
goto @幸运
[@幸运]
#if
#act
OPENMERCHANTBIGDLG 47 28 1 4 0 -120 0 0 0
#say
<> <Img:40:49:108:68/@exit>\
\ \ \ \ \ \ \ \
<> <ITEMBOX:2:48:115:80:20:36:36:19,:222#放入需要升级的项链首饰!>\ \ \ \ \ \
<当前幸运:+<$BOXITEM[2].HMAC> /FCOLOR=222>\ \
<消耗元宝: <$STR(p97)> /FCOLOR=150> \
<Img:110:49:-17:25/@锻造幸运> \ \ \ \ \ \
<锻造收费查询|251#锻造幸运+1 成功几率:99% 需要1万元宝 ^154#──────────────────^254#锻造幸运+2 成功几率:80% 需要1万元宝 ^154#──────────────────^222#锻造幸运+3 成功几率:60% 需要2万元宝 ^154#──────────────────^245#锻造幸运+4 成功几率:40% 需要2万元宝 ^154#──────────────────^70#锻造幸运+5 成功几率:20% 需要3万元宝 >
<『幸运转移传承』/@传承>\
[@ItemIntoBox2]
#if
equal <$BOXITEM[2].HMAC> 0
#act
MOV P97 10000
goto @main
break
#if
equal <$BOXITEM[2].HMAC> 1
#act
MOV P97 10000
goto @main
break
#if
equal <$BOXITEM[2].HMAC> 2
#act
MOV P97 20000
goto @main
break
#if
equal <$BOXITEM[2].HMAC> 3
#act
MOV P97 20000
goto @main
break
#if
equal <$BOXITEM[2].HMAC> 4
#act
MOV P97 30000
goto @main
BREAK
[@ItemOutBox2]
#if
#act
mov P97 0
goto @main
[@ItemIntoBox3]
#act
goto @传承
[@传承]
#if
#act
OPENMERCHANTBIGDLG 47 28 1 4 0 -120 0 0 0
#say
<> <Img:40:49:108:68/@exit>\
\ \ \ \ \ \ \ \
<> <ITEMBOX:3:48:115:80:20:36:36:19,:254#此处请放入带有幸运属性的项链装备> <ITEMBOX:4:48:115:80:20:36:36:19,:222#此处请放入被传承的项链装备.^70#被传承项链不能带有属性否则无法传承!>\ \ \ \ \ \
<1.带有幸运属性的项链可免费传承到其他项链/FCOLOR=222>\
<2.例如:幸运+1的项链,把幸运属性传承到其他项链上/FCOLOR=254>\
<Img:223:49:-17:25/@锻造传承> \ \ \ \ \ \
<锻造收费查询|251#锻造幸运+1 成功几率:99% 需要1万元宝 ^154#──────────────────^254#锻造幸运+2 成功几率:80% 需要1万元宝 ^154#──────────────────^222#锻造幸运+3 成功几率:60% 需要2万元宝 ^154#──────────────────^245#锻造幸运+4 成功几率:40% 需要2万元宝 ^154#──────────────────^70#锻造幸运+5 成功几率:20% 需要3万元宝 >
<『幸运锻造』/@幸运>\
[@锻造传承]
#if
CHECKLEVELEX > 1
#act
SetUpgradeItem 3
goto @mail-1
#elseact
MESSAGEBOX 你的项链以满无法继续加！
break
[@mail-1]
#if
equal <$BOXITEM[3].HMAC> 0
#act
messagebox 当前项链装备没幸运点,您无法进行此项锻造操作 !
#ELSEACT
mov p98 <$BOXITEM[3].HMAC>
SetUpgradeItem 4
goto @mail-2
[@mail-2]
#if
equal <$BOXITEM[4].HMAC> 0
#act
CHANGEITEMADDVALUE -1 1 + <$STR(p98)>
SetUpgradeItem 3
goto @mail-3
#ELSEACT
messagebox 被传承的项链装备幸运点必须是零,否则无法进行锻造 !
[@mail-3]
#if
CHECKLEVELEX > 1
#act
CHANGEITEMADDVALUE -1 1 – <$STR(p98)>
UpDateBoxItem 3
UpDateBoxItem 4
goto @传承
[@锻造幸运]
#if
CHECKLEVELEX > 1
equal <$BOXITEM[2].STDMODE> 19
#act
SetUpgradeItem 2
goto @mail
#ELSEACT
messagebox 被传承的项链装备幸运点必须是零,否则无法进行锻造 !
[@mail]
#if
equal <$BOXITEM[2].HMAC> 0
#act
goto @+1
break
#if
equal <$BOXITEM[2].HMAC> 1
#act
goto @+2k
break
#if
equal <$BOXITEM[2].HMAC> 2
#act
goto @+3k
break
#if
equal <$BOXITEM[2].HMAC> 3
#act
goto @+4k
break
#if
equal <$BOXITEM[2].HMAC> 4
#act
goto @+5k
break
[@+1]
#if
CHECKGAMEGOLD > 9999
#act
GAMEGOLD – 10000
CHANGEITEMADDVALUE -1 1 + 1
RECLAIMITEM
UpDateBoxItem 2
goto @main
break
#ELSEACT
messagebox 你元宝不足不能为你升级!
break
[@+2k]
#if
CHECKGAMEGOLD > 9999
#act
GAMEGOLD – 10000
goto @+2
break
#ELSEACT
messagebox 你元宝不足不能为你升级!
break
[@+3k]
#if
CHECKGAMEGOLD > 19999
#act
GAMEGOLD – 20000
goto @+3
break
#ELSEACT
messagebox 你元宝不足不能为你升级!
break
[@+4k]
#if
CHECKGAMEGOLD > 19999
#act
GAMEGOLD – 20000
goto @+4
break
#ELSEACT
messagebox 你元宝不足不能为你升级!
break
[@+5k]
#if
CHECKGAMEGOLD > 29999
#act
GAMEGOLD – 30000
goto @+5
break
#ELSEACT
messagebox 你元宝不足不能为你升级!
break
[@+2]
#if
equal N98 0
#act
goto @成功
break
#if
equal N98 1
#act
goto @成功
break
#if
equal N98 2
#act
goto @成功
break
#if
equal N98 3
#act
goto @成功
break
#if
equal N98 4
#act
goto @成功
break
#if
equal N98 5
#act
goto @成功
break
#if
equal N98 6
#act
goto @成功
break
#if
equal N98 7
#act
goto @失败
break
#if
equal N98 8
#act
goto @失败
break
#if
equal N98 9
#act
goto @失败
break
[@+3]
#if
equal N98 0
#act
goto @成功
break
#if
equal N98 1
#act
goto @成功
break
#if
equal N98 2
#act
goto @成功
break
#if
equal N98 3
#act
goto @成功
break
#if
equal N98 4
#act
goto @成功
break
#if
equal N98 5
#act
goto @失败
break
#if
equal N98 6
#act
goto @失败
break
#if
equal N98 7
#act
goto @失败
break
#if
equal N98 8
#act
goto @失败
break
#if
equal N98 9
#act
goto @失败
break
[@+4]
#if
equal N98 0
#act
goto @成功
break
#if
equal N98 1
#act
goto @成功
break
#if
equal N98 2
#act
goto @成功
break
#if
equal N98 3
#act
goto @失败
break
#if
equal N98 4
#act
goto @失败
break
#if
equal N98 5
#act
goto @失败
break
#if
equal N98 6
#act
goto @失败
break
#if
equal N98 7
#act
goto @失败
break
#if
equal N98 8
#act
goto @失败
break
#if
equal N98 9
#act
goto @失败
break
[@+5]
#if
equal N98 0
#act
goto @成功
break
#if
equal N98 1
#act
goto @失败
break
#if
equal N98 2
#act
goto @失败
break
#if
equal N98 3
#act
goto @失败
break
#if
equal N98 4
#act
goto @失败
break
#if
equal N98 5
#act
goto @失败
break
#if
equal N98 6
#act
goto @失败
break
#if
equal N98 7
#act
goto @失败
break
#if
equal N98 8
#act
goto @失败
break
#if
equal N98 9
#act
goto @失败
break
[@成功]
#act
MOV S88 6
CHANGEITEMADDVALUE -1 1 + 1
UpDateBoxItem 2
goto @ItemIntoBox2
SENDMSG 6 恭喜你将项链幸运属性升级成【+<$BOXITEM[2].HMAC>】!
break
[@失败]
#act
MOV S88 -1
CHANGEITEMADDVALUE -1 1 – 1
UpDateBoxItem 2
goto @ItemIntoBox2
SENDMSG 5 很遗憾你升级项链幸运失败被降低到【+<$BOXITEM[2].HMAC>】!
break
