Gom引擎脚本-股票系统

[@股票]
{
#if
EQUAL G400 1
#act
OpenBigDialogBox 1 26 1 4
#say

\　\　　　　　　　　　　　　　　　　　{<$SERVERNAME>股票/scolor=146}<img:7:2:180:-8/@关闭>
\　
\　　　　　　　　　　　<尊敬的玩家您好！/scolor=253><【<$SERVERNAME>感谢有您！】/scolor=249>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　　<为了感谢众多玩家对我们的支持，特推出本股票获得回馈大家/scolor=232>
\　　　　　　　　<每次只开放100股，每个人只可认购1股./scolor=232>
\　　　　　　　　<每股需要缴纳10000元宝+100点充值积分./scolor=232>
\　　　　　　　　<本活动每个角色认购1次,已经认购的，奖励永久有效！>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　　　<1.认购后达到/scolor=232><45级/scolor=116><可获得/scolor=232> <12000元宝+100积分/scolor=116> <回馈/scolor=255>
\　　　　　　　　　<2.认购后达到/scolor=232><48级/scolor=116><可获得/scolor=232> <15000元宝+100积分/scolor=116> <回馈/scolor=255>
\　　　　　　　　　<3.认购后达到/scolor=232><50级/scolor=116><可获得/scolor=232> <20000元宝+100积分/scolor=116> <回馈/scolor=255>
\　　　　　　　　　<4.认购后达到/scolor=232><52级/scolor=116><可获得/scolor=232> <30000元宝+100积分/scolor=116> <回馈/scolor=255>
\　　　　　　　　　<5.认购后达到/scolor=232><54级/scolor=116><可获得/scolor=232> <50000元宝+100积分/scolor=116> <回馈/scolor=255>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　<当前服务器开放股份数量还剩余/scolor=250>【<$str(G401)>】<股,认购从速！/scolor=250>
\　　　　　　　<注意:五种收益模式只能领取一种，领取后股票认购状态结束！>
\　<------------------------------------------------------------------------------/scolor=240>
\　　<认购/scolor=251>　　　　　　　　　　　　　　 　<领取/scolor=250>　　　　　　　　　　　 　　 　<关闭/scolor=251>
\　<img:22:1:-10:-30/@认购>　　　　　　　　<img:22:1:37:-30/@领取>　　　　　　　 　　　　<img:22:1:37:-30/@exit>

#ELSEACT
mov G400 1
mov G401 100
goto @股票

[@关闭]
#IF
#ACT
close
CloseBigDialogBox


[@领取]
#if
check [400] 1
#act
OpenBigDialogBox 1 26 1 4 0
#say

\　\　　　　　　　　　　　　　　　　　　　{<$SERVERNAME>股票/scolor=146}<img:7:2:180:-8/@关闭>
\　
\　　　　　　　　　　　<尊敬的玩家您好！/scolor=253><【<$SERVERNAME>感谢有您！】/scolor=249>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　　<特别提醒，股票领取最多只能领取一项，建议高级之后领取/scolor=249>
\　　　　　　　　<一旦领取后，将无法继续领取，/scolor=253>
\　　　　　　　　<本活动每个角色认购1次,已经认购的，奖励永久有效！/scolor=232>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　　　<1.认购后达到/scolor=232><45级/scolor=116><可获得/scolor=232> <12000元宝+100积分/scolor=116>      <领45级奖励/@45级>
\　　　　　　　　　<2.认购后达到/scolor=232><48级/scolor=116><可获得/scolor=232> <15000元宝+100积分/scolor=116>      <领48级奖励/@48级>
\　　　　　　　　　<3.认购后达到/scolor=232><50级/scolor=116><可获得/scolor=232> <20000元宝+100积分/scolor=116>      <领50级奖励/@50级>
\　　　　　　　　　<4.认购后达到/scolor=232><52级/scolor=116><可获得/scolor=232> <30000元宝+100积分/scolor=116>      <领52级奖励/@52级>
\　　　　　　　　　<5.认购后达到/scolor=232><54级/scolor=116><可获得/scolor=232> <50000元宝+100积分/scolor=116>      <领54级奖励/@54级>
\　<------------------------------------------------------------------------------/scolor=240>
\　　　　　　　<当前服务器开放股份数量还剩余/scolor=250>【<$str(G401)>】<股,认购从速！/scolor=250>
\　　　　　　　<注意:五种收益模式只能领取一种，领取后股票认购状态结束！>
\　
\　<------------------------------------------------------------------------------/scolor=240>
\　 <上一页/scolor=251>　　　　　　　　　　　　　  　<领取/scolor=250>　　　　　　　　　　　 　　 　<关闭/scolor=251>
\　<img:22:1:-13:-30/@股票>　　　　　　　　<img:22:1:37:-30/@领取>　　　　　　　 　　　　<img:22:1:37:-30/@exit>

#ELSEACT
MESSAGEBOX  很遗憾，您还没有认购过，无法查看！






[@45级]
#if
check [401] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 44
#act
mov S$股票回馈 12000
MESSAGEBOX 你确定要领取45级奖励吗？\　\领取之后无法继续一下的领取了哦。\　\请三思。当前可领取的元宝为【<$STR(S$股票回馈)>】\　\建议高级之后领取奖励更多 @领45级 @exit
break
#ELSEACT
MESSAGEBOX 不好意思您等级没有达到45级，无法领奖

[@48级]
#if
check [401] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 47
#act
mov S$股票回馈 15000
MESSAGEBOX 你确定要领取48级奖励吗？\　\领取之后无法继续一下的领取了哦。\　\请三思。当前可领取的元宝为【<$STR(S$股票回馈)>】\　\建议高级之后领取奖励更多 @领45级 @exit
break
#ELSEACT
MESSAGEBOX 不好意思您等级没有达到48级，无法领奖

[@50级]
#if
check [401] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 49
#act
mov S$股票回馈 20000
MESSAGEBOX 你确定要领取50级奖励吗？\　\领取之后无法继续一下的领取了哦。\　\请三思。当前可领取的元宝为【<$STR(S$股票回馈)>】\　\建议高级之后领取奖励更多 @领45级 @exit
break
#ELSEACT
MESSAGEBOX 不好意思您等级没有达到50级，无法领奖

[@52级]
#if
check [401] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 51
#act
mov S$股票回馈 30000
MESSAGEBOX 你确定要领取52级奖励吗？\　\领取之后无法继续一下的领取了哦。\　\请三思。当前可领取的元宝为【<$STR(S$股票回馈)>】\　\建议高级之后领取奖励更多 @领45级 @exit
break
#ELSEACT
MESSAGEBOX 不好意思您等级没有达到52级，无法领奖


[@54级]
#if
check [401] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 53
#act
mov S$股票回馈 50000
MESSAGEBOX 你确定要领取54级奖励吗？\　\领取之后无法继续一下的领取了哦。\　\请三思。当前可领取的元宝为【<$STR(S$股票回馈)>】\　\建议高级之后领取奖励更多 @领45级 @exit
break
#ELSEACT
MESSAGEBOX 不好意思您等级没有达到54级，无法领奖







[@领45级]
#if
check [400] 1
#act
gamegold + <$STR(S$股票回馈)>
GAMEDIAMOND + 100


SET [401] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【<$STR(S$股票回馈)>】元宝+100积分奖励。
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【<$STR(S$股票回馈)>】元宝+100积分奖励。
break
















[@认购]
#if
small G401 1
#act
MESSAGEBOX 很遗憾，放出的股份已被洗劫一空，请等待下次开放！
break

#if
check [400] 1
#act
MESSAGEBOX 很遗憾，您当前以购买过了。无需继续购买！
break

#if
checkgamegold < 9999
CHECKGAMEDIAMOND < 99
#act
MESSAGEBOX 很遗憾，您元宝数量少于1W，或者积分少于100!请先去充值！
break

#if
LARGE G401 0
check [400] 0
checkgamegold > 9999
CHECKGAMEDIAMOND > 99
;积分位置
#act
GAMEDIAMOND - 100
gamegold - 10000
DEC G401 1
SET [400] 1
set [401] 1
SENDMSG 0 《<$USERNAME>》购买了1股股票，羡慕吗？当前股票奖励还剩下<$STR(G401)>个！
goto @股票
break

[@领取]




}