GOM引擎版本比较流行的股票投资脚本

整个脚本所引用变量如下,如有占用请自行变更

G440
G441


[@main]
#if
EQUAL G440 1
#act
OPENMERCHANTBIGDLG 27 11 1 0 0 0 1 0 0
#say
\
<Img:905:27:360:-15/@EXIT>\
\　
　<尊敬的玩家您好！/FCOLOR=253><【(向阳在线）感谢有您！】/FCOLOR=249>\
　<-----------------------------------------------------------/FCOLOR=240>\
　<为了感谢众多玩家对我们的支持，特推出本股票获得回馈大家/FCOLOR=232>\
　<每次只开放8股，每个人只可认购1股./FCOLOR=232>\
　<每股需要缴纳20000元宝./FCOLOR=232>\
　<本活动每个角色认购1次,已经认购的，奖励永久有效！>\
　<-----------------------------------------------------------/FCOLOR=240>\
　<1.认购后达到/FCOLOR=232><50级/FCOLOR=116><可获得/FCOLOR=232> <25000元宝/FCOLOR=116> <回馈/FCOLOR=255>\
　<2.认购后达到/FCOLOR=232><53级/FCOLOR=116><可获得/FCOLOR=232> <30000元宝/FCOLOR=116> <回馈/FCOLOR=255>\
　<3.认购后达到/FCOLOR=232><55级/FCOLOR=116><可获得/FCOLOR=232> <44000元宝/FCOLOR=116> <回馈/FCOLOR=255>\
　<4.认购后达到/FCOLOR=232><58级/FCOLOR=116><可获得/FCOLOR=232> <60000元宝/FCOLOR=116> <回馈/FCOLOR=255>\
　<5.认购后达到/FCOLOR=232><60级/FCOLOR=116><可获得/FCOLOR=232> <100000元宝/FCOLOR=116><回馈/FCOLOR=255>\
　<-----------------------------------------------------------/FCOLOR=240>\
　<当前服务器开放股份数量还剩余/FCOLOR=250>【<$str(G441)>】<股,认购从速！/FCOLOR=250>\
　<注意:五种收益模式只能领取一种，领取后股票认购状态结束！>\
　<本活动只有【新区】第一天开放,已认购的,奖励永远有效!/FCOLOR=116>\ \

　　　　　　　　<认购股票/@认购>　　　　　　　　<股票分红/@领取>　　　　　　\
#ELSEACT
mov G440 1
mov G441 8
goto @main
[@1]
#if
#act
SET [440] 0
set [441] 0

[@领取]
#if
check [440] 1
#act
OPENMERCHANTBIGDLG 27 11 1 0 0 0 1 440 2
#say
\
<Img:905:27:360:-15/@EXIT>\
\　
　<尊敬的玩家您好！/FCOLOR=253><【(天涯传奇）感谢有您！】/FCOLOR=249>\
　<-----------------------------------------------------------/FCOLOR=240>\
　<为了感谢众多玩家对我们的支持，特推出本股票获得回馈大家/FCOLOR=232>\
　<每次只开放8股，每个人只可认购1股./FCOLOR=232>\
　<每股需要缴纳20000元宝./FCOLOR=232>\
　<本活动每个角色认购1次,已经认购的，奖励永久有效！>\
　<当前服务器开放股份数量还剩余/FCOLOR=250>【<$str(G441)>】<股,认购从速！/FCOLOR=250>\ \
　<-----------------------------------------------------------/FCOLOR=240>\
　<1.认购后达到/FCOLOR=232><50级/FCOLOR=116><可获得/FCOLOR=232> <25000元宝/FCOLOR=116> 　　<5选1/FCOLOR=253>　<-领取股票分红/@领50级>\
　<2.认购后达到/FCOLOR=232><53级/FCOLOR=116><可获得/FCOLOR=232> <30000元宝/FCOLOR=116> 　　<5选1/FCOLOR=253>　<-领取股票分红/@领53级>\
　<3.认购后达到/FCOLOR=232><55级/FCOLOR=116><可获得/FCOLOR=232> <44000元宝/FCOLOR=116> 　　<5选1/FCOLOR=253>　<-领取股票分红/@领55级>\
　<4.认购后达到/FCOLOR=232><58级/FCOLOR=116><可获得/FCOLOR=232> <60000元宝/FCOLOR=116> 　　<5选1/FCOLOR=253>　<-领取股票分红/@领58级>\
　<5.认购后达到/FCOLOR=232><60级/FCOLOR=116><可获得/FCOLOR=232> <100000元宝/FCOLOR=116>  　<5选1/FCOLOR=253>　<-领取股票分红/@领60级>\
　<-----------------------------------------------------------/FCOLOR=240>\ \
　<注意:五种收益模式只能领取一种，领取后股票认购状态结束！>\
　<本活动只有【新区】第一天开放,已认购的,奖励永远有效!/FCOLOR=116>\ \
#ELSEACT
MESSAGEBOX  很遗憾，您还没有认购过，无法查看！

[@领50级]
#if
check [441] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 49
#act
GOTO @领50级1
#ELSEACT
MESSAGEBOX \\不好意思您等级没有达到50级，无法领奖

[@领53级]
#if
check [441] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 52
#act
GOTO @领53级1
#ELSEACT
MESSAGEBOX \\不好意思您等级没有达到53级，无法领奖

[@领55级]
#if
check [441] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 54
#act
GOTO @领55级1
#ELSEACT
MESSAGEBOX \\不好意思您等级没有达到55级，无法领奖

[@领58级]
#if
check [441] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 57
#act
GOTO @领58级1
#ELSEACT
MESSAGEBOX \\不好意思您等级没有达到58级，无法领奖

[@领60级]
#if
check [441] 0
#act
MESSAGEBOX 很遗憾，您当前以购领取过了。无法继续领取！！
break
#if
CHECKLEVELEX > 59
#act
GOTO @领60级1
#ELSEACT
MESSAGEBOX \\不好意思您等级没有达到60级，无法领奖

[@领50级1]
#if
check [440] 1
#act
GAMEGOLD + 25000
SET [441] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【25000】元宝。
break

[@领53级1]
#if
check [440] 1
#act
GAMEGOLD + 30000
SET [441] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【30000】元宝。
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【30000】元宝。
break

[@领55级1]
#if
check [440] 1
#act
GAMEGOLD + 44000
SET [441] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【44000】元宝。
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【44000】元宝。
break

[@领58级1]
#if
check [440] 1
#act
GAMEGOLD + 60000
SET [441] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【60000】元宝。
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【60000】元宝。
break

[@领60级1]
#if
check [440] 1
#act
GAMEGOLD + 100000
SET [441] 0
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【100000】元宝。
SENDMSG 0 《<$USERNAME>》领取股票回馈级奖励获得【100000】元宝。
break

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

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

#if
CHECKGAMEGOLD > 19999
LARGE G441 0
check [440] 0
#ACT
GAMEGOLD - 20000
DEC G441 1
SET [440] 1
set [441] 1
goto @main
SENDMSG 0 《<$USERNAME>》购买了1股股票，羡慕吗？当前股票奖励还剩下<$STR(G441)>个！
#ELSEACT
MESSAGEBOX \\【提示】::很遗憾，您元宝数量少于20000!请先去充值！
break

6666666666666666666666666666666666666