传奇好私服抢红包功能

2019-06-22   作者:佚名   来源:本站整理   浏览:0   评论:2  
[@MAIN]
#if
CHECKLEVELEX > 0
#act
#CALL [\子木名单专用\抢红包系统\抢红包常量.INI] @抢红包常量设置
#if
CHECKLEVELEX > 0
#ACT
MOV S$显示个数
MOV S$显示金额
MOV S$发送模式 全服红包
GOTO @开始发全服红包
[@开始发全服红包]
#IF
LARGE S$显示个数 0
#ELSEACT
MOV S$显示个数 点击输入个数
#IF
LARGE S$显示金额 0
#ELSEACT
MOV S$显示金额 点击输入金额
#IF
LARGE S$显示个数 0
LARGE S$显示金额 0
#act
OPENMERCHANTBIGDLG 1 28 1 4 20 -60 1
#say
<ImgEx:0:1823:1824:1825:340:-15/@exit>
\ \
<全服红包/SCOLOR=250>  <行会红包{SCOLOR=253}/@发给行会>  <个人红包{SCOLOR=249}/@发给个人> \
 \
<红包个数:/SCOLOR=254> {<$STR(S$显示个数)>/SCOLOR=251}\
 \
<红包金额:/SCOLOR=254> {<$STR(S$显示金额)>/SCOLOR=251}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutInteger50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
<Img:$(HB-发送红包):0:70:-30/@确认发送红包>\
#ELSEact
OPENMERCHANTBIGDLG 1 28 1 4 20 -60 1
#ELSESAY
<ImgEx:0:1823:1824:1825:340:-15/@exit>
\ \
<Img:$(HB-红包):0:170:45><Img:$(HB-小元宝):0:150:90>\
<全服红包/SCOLOR=250>  <行会红包{SCOLOR=253}/@发给行会>  <个人红包{SCOLOR=249}/@发给个人> \
 \
<红包个数:/SCOLOR=254> {<$STR(S$显示个数)>/SCOLOR=250}\
 \
<红包金额:/SCOLOR=254> {<$STR(S$显示金额)>/SCOLOR=250}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutInteger50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
[@确认发送红包]
#IF
LARGE -HB-发送数量- 0
#act
Close
MessageBox 【A450】的红包还在争抢中!请稍等几秒后再来发送!
BREAK
#IF
checkgamegold > <$STR(S$显示金额)>
#act
MOV -HB-发送人- <$USERNAME>
MOV -HB-发送数量- <$STR(S$显示个数)>
MOV -HB-发送金额- <$STR(S$显示金额)>
GAMEGOLD - <$STR(S$显示金额)>
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向[全服]发送了[<$STR(S$显示个数)>]个红包,共计[<$STR(S$显示金额)>]个元宝!注意抢啊!只限10秒哦!
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向[全服]发送了[<$STR(S$显示个数)>]个红包,共计[<$STR(S$显示金额)>]个元宝!注意抢啊!只限10秒哦!
Gmexecute $(HB-全服提问) @开始抢红包
Close
#ELSEACT
Close
MessageBox  你好像元宝不够啊!装什么大款!
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;行会红包内容
[@发给行会]
#IF
CHECKLEVELEX > 0
#ACT
MOV S$显示个数
MOV S$显示金额
MOV S$发送模式 行会红包
GOTO @开始发行会红包
[@开始发行会红包]
#IF
LARGE S$显示个数 0
#ELSEACT
MOV S$显示个数 点击输入个数
#IF
LARGE S$显示金额 0
#ELSEACT
MOV S$显示金额 点击输入金额
#IF
LARGE S$显示个数 0
LARGE S$显示金额 0
#ACT
#say
<Img:$(HB-关闭按钮):0:230:-10/@exit>\
<Img:$(HB-红包):0:170:45><Img:$(HB-小元宝):0:150:90>\
<全服红包{SCOLOR=250}/@main>  <行会红包/SCOLOR=250>  <个人红包{SCOLOR=250}/@发给个人> \
 \
<红包个数:/SCOLOR=250> {<$STR(S$显示个数)>/SCOLOR=250}\
 \
<红包金额:/SCOLOR=250> {<$STR(S$显示金额)>/SCOLOR=250}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutInteger50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
<Img:$(HB-发送红包):0:70:-30/@确认发送红包行会>\
#ELSEACT
#ELSESAY
<Img:$(HB-关闭按钮):0:230:-10/@exit>\
<Img:$(HB-红包):0:170:45><Img:$(HB-小元宝):0:150:90>\
<全服红包{SCOLOR=250}/@main>  <行会红包/SCOLOR=250>  <个人红包{SCOLOR=250}/@发给个人> \
 \
<红包个数:/SCOLOR=250> {<$STR(S$显示个数)>/SCOLOR=250}\
 \
<红包金额:/SCOLOR=250> {<$STR(S$显示金额)>/SCOLOR=250}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutInteger50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
[@确认发送红包行会]
#IF
LARGE -HB-发送数量- 0
#act
Close
MessageBox 【A450】的红包还在争抢中!请稍等几秒后再来发送!
BREAK
#IF
 HAVEGUILD
#ELSEact
Close
MessageBox  你没有行会!不能发送行会红包!
BREAK
#IF
checkgamegold > <$STR(S$显示金额)>
#act
MOV -HB-发送行会- <$GUILDNAME>
MOV -HB-发送人- <$USERNAME>
MOV -HB-发送数量- <$STR(S$显示个数)>
MOV -HB-发送金额- <$STR(S$显示金额)>
GAMEGOLD - <$STR(S$显示金额)>
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向行会[<$STR(-HB-发送行会-)>]发送了[<$STR(S$显示个数)>]个红包,共计[<$STR(S$显示金额)>]个元宝!注意抢啊!只限10秒哦!
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向行会[<$STR(-HB-发送行会-)>]发送了[<$STR(S$显示个数)>]个红包,共计[<$STR(S$显示金额)>]个元宝!注意抢啊!只限10秒哦!
Close
Gmexecute $(HB-全服提问) @开始抢行会红包
#ELSEACT
Close
MessageBox  你好像元宝不够啊!装什么大款!
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;个人红包内容
[@发给个人]
#IF
CHECKLEVELEX > 0
#ACT
MOV S$显示对方名字  
MOV S$显示金额
MOV S$判断个人 0
MOV S$发送模式 个人红包
GOTO @开始发个人红包
[@开始发个人红包]
#IF
EQUAL S$判断个人 0
#ACT
MOV S$显示对方名字 点击输入名字
#IF
LARGE S$显示金额 0
#ELSEACT
MOV S$显示金额 点击输入金额
#IF
LARGE S$显示金额 0
LARGE S$判断个人 0
#ACT
#say
<Img:$(HB-关闭按钮):0:230:-10/@exit>\
<Img:$(HB-红包):0:170:45><Img:$(HB-小元宝):0:150:90>\
<全服红包{SCOLOR=250}/@main>  <行会红包{SCOLOR=250}/@发给行会>  <个人红包/SCOLOR=250> \
 \
<对方名字:/SCOLOR=250> {<$STR(S$显示对方名字)>/SCOLOR=250}\
 \
<红包金额:/SCOLOR=250> {<$STR(S$显示金额)>/SCOLOR=250}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutString50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
<Img:$(HB-发送红包):0:70:-30/@确认发送红包个人>\
#ELSEACT
#ELSESAY
<Img:$(HB-关闭按钮):0:230:-10/@exit>\
<Img:$(HB-红包):0:170:45><Img:$(HB-小元宝):0:150:90>\
<全服红包{SCOLOR=250}/@main>  <行会红包{SCOLOR=250}/@发给行会>  <个人红包/SCOLOR=250> \
 \
<对方名字:/SCOLOR=250> {<$STR(S$显示对方名字)>/SCOLOR=250}\
 \
<红包金额:/SCOLOR=250> {<$STR(S$显示金额)>/SCOLOR=250}\
 \
<Img:$(HB-输入框):0:61:-70/@@InPutString50>\
<Img:$(HB-输入框):0:61:-55/@@InPutInteger51>\
[@确认发送红包个人]
#IF
LARGE -HB-发送数量- 0
#act
Close
MessageBox 【A450】的红包还在争抢中!请稍等几秒后再来发送!
BREAK
#IF
checkgamegold > <$STR(S$显示金额)>
#act
MOV -HB-发送人- <$USERNAME>
MOV -HB-发送数量- 1
MOV -HB-发送金额- <$STR(S$显示金额)>
GAMEGOLD - <$STR(S$显示金额)>
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向[<$STR(S$显示对方名字)>]发送了1个红包,共计[<$STR(S$显示金额)>]个元宝!
GuildNoticeMsg 251 249 ぐ[<$USERNAME>]向[<$STR(S$显示对方名字)>]发送了1个红包,共计[<$STR(S$显示金额)>]个元宝!
MOV S50 <$STR(S$显示对方名字)>
S50.goto @发送个人红包
DELAYGOTO 10000 @返还红包金额
Close
#ELSEACT
Close
MessageBox  你好像元宝不够啊!装什么大款!
[@发送个人红包]
#IF
CHECKLEVELEX > 0
#ACT
#CALL [\子木名单专用\抢红包系统\抢红包常量.INI] @抢红包常量设置
ADDBUTTON 0 $(HB-按钮编号1) $(HB-头顶红包图) $(HB-头顶红包图) $(HB-头顶红包图) 360 35 0 -1 点击抢红包!
ADDBUTTON 0 $(HB-按钮编号2) $(HB-头顶红包图特效框) $(HB-头顶红包图特效框) $(HB-头顶红包图特效框) 360 35 0 -1 点击抢红包!
DELAYGOTO 10000 @返还红包金额
[@返还红包金额]
#IF
LARGE -HB-发送数量- 0
#ACT
DELBUTTON $(HB-按钮编号1)
DELBUTTON $(HB-按钮编号2)
#IF
LARGE -HB-发送数量- 0
EQUAL -HB-发送人- <$USERNAME>
#ACT
GAMEGOLD + <$STR(-HB-发送金额-)>
SENDMSG 6 【红包返还提示】:还剩[<$STR(-HB-发送数量-)>]个红包无人领取,共计:[<$STR(-HB-发送金额-)>]个元宝!已返还给你!
SENDMSG 6 【红包返还提示】:还剩[<$STR(-HB-发送数量-)>]个红包无人领取,共计:[<$STR(-HB-发送金额-)>]个元宝!已返还给你!
MOV -HB-发送数量- 0
MOV -HB-发送金额- 0
[@InPutString50]
#IF
CHECKLEVELEX > 0
#ACT
MOV S$显示对方名字 <$STR(s50)>
#IF
EQUAL S$显示对方名字
#act
MOV S$显示对方名字
MessageBox  请输入正确的文字!
BREAK
#IF
EQUAL S$显示对方名字 <$USERNAME>
#act
MOV S$显示对方名字
MessageBox  不能发给自己!
BREAK
#IF
s50.CheckOnline
#act
MOV S$判断个人 1
GOTO @开始发<$STR(S$发送模式)>
#ELSEACT
MessageBox  [<$STR(S$显示对方名字)>]不在线!无法发送红包!
MOV S$显示对方名字
[@InPutInteger50]
#IF
CHECKLEVELEX > 0
#ACT
MOV S$显示个数 <$STR(N50)>
#IF
LARGE S$显示个数 0
SMALL S$显示个数 16
#act
GOTO @开始发<$STR(S$发送模式)>
#ELSEACT
MOV S$显示个数 0
MessageBox  红包的个数必须在1-15之间!
[@InPutInteger51]
#IF
CHECKLEVELEX > 0
#ACT
MOV S$显示金额 <$STR(N51)>
#IF
LARGE S$显示金额 1499
#act
GOTO @开始发<$STR(S$发送模式)>
#ELSEACT
MOV S$显示金额 0
MessageBox  红包的金额必须在1500以上!
Tags:责任编辑:chenjiake
顶一下(1)
100%
踩一下(0)
0.00%

已有 2 人参与评论  网友评论

请自觉遵守互联网相关政策法规,评论内容只代表网友观点,与本站立场无关!
    登录   注册

栏目导航

本类排行

相关文章