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

感恩无私的分享与奉献 :)

淡定，淡定，淡定……

我只是路过打酱油的。

真是被感动的痛哭流涕……

无回帖，不论坛，这才是人道。

看到这帖子真是高兴！

我只是路过打酱油的。

楼主加油，我们都看好你哦。

我只是路过打酱油的。