(@@InPutString@@InPutInteger)
[@开始抢米包]
{
#IF
CheckLevelEx>0
#SAY
\\\\\\\\
<$STR(A19)>\\\\\\
<$STR(G22)>\\\\\\\
{<$STR(A18)> /FCOLOR=150}\
{<$STR(G23)>元宝/FCOLOR=150}\
{<$STR(G24)>人/FCOLOR=150}\
{<$STR(G25)>元宝/FCOLOR=150}\
<Img:10:1:0:0/@万人领包>\\\\
【<我要发米包/@@InPutInteger22(请输入你要发放的米包数目：（一次性醉少发放100元宝米包）)>】 <$STR(U13)>\
#ACT
OPENMERCHANTBIGDLG11140013856
BREAK
[@万人领包]
#IF
NOTLargeG250
#ACT
MESSAGEBOX<$STR(A18)>发放的米包没有了，等待下一个发米包的人吧。
BREAK
#IF
CHECKNAMELIST..\TxData\限制\已领米包.txt
#ACT
MESSAGEBOX你刚刚领取过<$STR(A18)>发放的米包了。
BREAK
#IF
Random30
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random20
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转2
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random10
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转4
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random5
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转5
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额120
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
LargeG250
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
[@InPutInteger22]
#IF
LargeG250
#ACT
MESSAGEBOX<$STR(A18)>刚刚发放的米包还没被领完，领完你再发吧！\ \5分钟内没被领取完的米包将被系统领取哟^_^
MOVN220
GOTO@开始抢米包
BREAK
#IF
SmallN22100
#ACT
MESSAGEBOX发放米包太少了，一次性醉少发放100元宝的米包！
MOVN220
GOTO@开始抢米包
BREAK
#IF
CHECKGAMEGOLD<<$STR(N22)>
#ACT
MESSAGEBOX发放米包太少了，一次性醉少发放100以上的元宝米包！
MOVN220
GOTO@开始抢米包
BREAK
#IF
CHECKNAMELIST..\TxData\限制\万人敬仰.txt
#ACT
GAMEGOLD-<$STR(N22)>
INCU13<$STR(N22)>
#ELSEACT
Addnamelist..\TxData\限制\万人敬仰.txt
GAMEGOLD-<$STR(N22)>
MOVU13<$STR(N22)>
#IF
CheckLevelEx>0
#ACT
MOVA18<$USERNAME>
MOVG23<$STR(N22)>
MOVG240
MOVG25<$STR(N22)>
#IF
LargeU13<$STR(G22)>
#ACT
SendNewLineMsg0251012250101我们敬爱的{%s|249:0:1}造福大家，成为了万人敬仰！站在万人敬仰者的周围，每分钟可以获得经验值！
#ELSEACT
ClearNameList..\TxData\限制\已领米包.txt
SendNewLineMsg0251012250101我们敬爱的{%s|249:0:1}发放了{<$STR(N22)>|249:0:1}个元宝，大家快去{万人敬仰NPC|249:0:1}处(盟重省:335:344)领取呀^_^
MESSAGEBOX你发放了大量的米包，造福大家，努力成为万人敬仰者吧！
GOTO@开始抢米包
BREAK
#IF
CHECKONLINE<$STR(A19)>
#ACT
<$STR(A19)>.ChangeHumAbility1=0
<$STR(A19)>.ChangeHumAbility2=0
<$STR(A19)>.ChangeHumAbility3=0
<$STR(A19)>.ChangeHumAbility4=0
<$STR(A19)>.ChangeHumAbility11=0
<$STR(A19)>.ChangeHumAbility12=0
<$STR(A19)>.CloseClientBuff20
<$STR(A19)>.SETICON2-1
<$STR(A19)>.SETICON3-1
#IF
NOTEQUALA19<$USERNAME>
CHECKONLINE<$STR(A19)>
#ACT
<$STR(A19)>.SENDMSG5你的万人敬仰者头衔被别人抢去了...
#IF
CheckLevelEx>0
#ACT
ChangeHumAbility1=10
ChangeHumAbility2=30
ChangeHumAbility3=10
ChangeHumAbility4=30
ChangeHumAbility11=1000
ChangeHumAbility12=1000
SetClientBuff1220157-1778615
SetIcon312240-5-76101200
SetIcon2241-5-761510200
MOVA19<$USERNAME>
MOVG22<$STR(U13)>
SetNpcImage9900
ClearNameList..\TxData\限制\已领米包.txt
MESSAGEBOX你成为【万人敬仰】，世界因你而精彩！
GOTO@开始抢米包
BREAK
}
无度传奇是一个流行的网络游戏平台，其gom传奇引擎是一款基于网络技术的游戏开发工具。抢红包脚本是一种自动抢红包的程序，可以帮助玩家更快速地抢到红包，提高游戏体验。
然而，使用抢红包脚本可能会违反游戏规则和道德规范，甚至可能导致游戏账号被封禁。此外，使用抢红包脚本还可能存在安全风险，因为这些程序可能会携带簿或其他恶意软件。
因此，建议玩家不要使用抢红包脚本，而是通过提高自己的技能和技巧来获得游戏胜利。同时，游戏平台也应该加强对使用脚本的监管和惩罚，以维护游戏的公平性和安全性
[@开始抢米包]
{
#IF
CheckLevelEx>0
#SAY
\\\\\\\\
<$STR(A19)>\\\\\\
<$STR(G22)>\\\\\\\
{<$STR(A18)> /FCOLOR=150}\
{<$STR(G23)>元宝/FCOLOR=150}\
{<$STR(G24)>人/FCOLOR=150}\
{<$STR(G25)>元宝/FCOLOR=150}\
<Img:10:1:0:0/@万人领包>\\\\
【<我要发米包/@@InPutInteger22(请输入你要发放的米包数目：（一次性醉少发放100元宝米包）)>】 <$STR(U13)>\
#ACT
OPENMERCHANTBIGDLG11140013856
BREAK
[@万人领包]
#IF
NOTLargeG250
#ACT
MESSAGEBOX<$STR(A18)>发放的米包没有了，等待下一个发米包的人吧。
BREAK
#IF
CHECKNAMELIST..\TxData\限制\已领米包.txt
#ACT
MESSAGEBOX你刚刚领取过<$STR(A18)>发放的米包了。
BREAK
#IF
Random30
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random20
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转2
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random10
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转4
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
Random5
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
DIVN$米包中转5
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
LargeG2520
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额120
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
#IF
LargeG250
#ACT
INCG241
MOVN$米包中转<$STR(G25)>
INCN$米包中转1
Addnamelist..\TxData\限制\已领米包.txt
MOVRN$米包金额1<$STR(N$米包中转)>
DECG25<$STR(N$米包金额)>
GAMEGOLD+<$STR(N$米包金额)>
MESSAGEBOX恭喜你领取了【<$STR(N$米包金额)>】个元宝的米包！
GOTO@开始抢米包
BREAK
[@InPutInteger22]
#IF
LargeG250
#ACT
MESSAGEBOX<$STR(A18)>刚刚发放的米包还没被领完，领完你再发吧！\ \5分钟内没被领取完的米包将被系统领取哟^_^
MOVN220
GOTO@开始抢米包
BREAK
#IF
SmallN22100
#ACT
MESSAGEBOX发放米包太少了，一次性醉少发放100元宝的米包！
MOVN220
GOTO@开始抢米包
BREAK
#IF
CHECKGAMEGOLD<<$STR(N22)>
#ACT
MESSAGEBOX发放米包太少了，一次性醉少发放100以上的元宝米包！
MOVN220
GOTO@开始抢米包
BREAK
#IF
CHECKNAMELIST..\TxData\限制\万人敬仰.txt
#ACT
GAMEGOLD-<$STR(N22)>
INCU13<$STR(N22)>
#ELSEACT
Addnamelist..\TxData\限制\万人敬仰.txt
GAMEGOLD-<$STR(N22)>
MOVU13<$STR(N22)>
#IF
CheckLevelEx>0
#ACT
MOVA18<$USERNAME>
MOVG23<$STR(N22)>
MOVG240
MOVG25<$STR(N22)>
#IF
LargeU13<$STR(G22)>
#ACT
SendNewLineMsg0251012250101我们敬爱的{%s|249:0:1}造福大家，成为了万人敬仰！站在万人敬仰者的周围，每分钟可以获得经验值！
#ELSEACT
ClearNameList..\TxData\限制\已领米包.txt
SendNewLineMsg0251012250101我们敬爱的{%s|249:0:1}发放了{<$STR(N22)>|249:0:1}个元宝，大家快去{万人敬仰NPC|249:0:1}处(盟重省:335:344)领取呀^_^
MESSAGEBOX你发放了大量的米包，造福大家，努力成为万人敬仰者吧！
GOTO@开始抢米包
BREAK
#IF
CHECKONLINE<$STR(A19)>
#ACT
<$STR(A19)>.ChangeHumAbility1=0
<$STR(A19)>.ChangeHumAbility2=0
<$STR(A19)>.ChangeHumAbility3=0
<$STR(A19)>.ChangeHumAbility4=0
<$STR(A19)>.ChangeHumAbility11=0
<$STR(A19)>.ChangeHumAbility12=0
<$STR(A19)>.CloseClientBuff20
<$STR(A19)>.SETICON2-1
<$STR(A19)>.SETICON3-1
#IF
NOTEQUALA19<$USERNAME>
CHECKONLINE<$STR(A19)>
#ACT
<$STR(A19)>.SENDMSG5你的万人敬仰者头衔被别人抢去了...
#IF
CheckLevelEx>0
#ACT
ChangeHumAbility1=10
ChangeHumAbility2=30
ChangeHumAbility3=10
ChangeHumAbility4=30
ChangeHumAbility11=1000
ChangeHumAbility12=1000
SetClientBuff1220157-1778615
SetIcon312240-5-76101200
SetIcon2241-5-761510200
MOVA19<$USERNAME>
MOVG22<$STR(U13)>
SetNpcImage9900
ClearNameList..\TxData\限制\已领米包.txt
MESSAGEBOX你成为【万人敬仰】，世界因你而精彩！
GOTO@开始抢米包
BREAK
}
无度传奇是一个流行的网络游戏平台，其gom传奇引擎是一款基于网络技术的游戏开发工具。抢红包脚本是一种自动抢红包的程序，可以帮助玩家更快速地抢到红包，提高游戏体验。
然而，使用抢红包脚本可能会违反游戏规则和道德规范，甚至可能导致游戏账号被封禁。此外，使用抢红包脚本还可能存在安全风险，因为这些程序可能会携带簿或其他恶意软件。
因此，建议玩家不要使用抢红包脚本，而是通过提高自己的技能和技巧来获得游戏胜利。同时，游戏平台也应该加强对使用脚本的监管和惩罚，以维护游戏的公平性和安全性