逍遥MIR 发表于 2024-7-17 01:54:14

传奇一条龙提供的抢红包脚本适用于GOM引擎

(@@InPutString @@InPutInteger )
[@main]
#if
isadmin
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <①行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A50)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G50)>】\
   <img:13:1:8:-23|^145#点击给①号行会发红包!/@派送红包1>\
   <②行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A51)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G51)>】\
   <img:13:1:8:-23|^145#点击给②号行会发红包!/@派送红包2>\
   <③行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A52)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G52)>】\
   <img:13:1:8:-23|^145#点击给③号行会发红包!/@派送红包3>\
      <全服红包/AUTOCOLOR=251>  <红包数量:/AUTOCOLOR=250>【<$Str(G53)>】\
   <img:13:1:8:-23|^145#点击给全服发红包!/@派红包>\
      <单人红包/AUTOCOLOR=251>  <红包数量:/AUTOCOLOR=250>【<$Str(G54)>】\
   <img:13:1:8:-23|^145#点击给指定玩家发红包!/@派单人红包>\
   <━━━━━━━━━━━━━━/SCOLOR=69><发红包啦!/SCOLOR=254><━━━━━━━━━━━━/SCOLOR=69>\
    <竞红包行会/AUTOCOLOR=249>   <清红包数据/AUTOCOLOR=249>            <发红包规则/AUTOCOLOR=253>\
   <img:13:1:8:-23|^145#点击竞标红包行会!/@我也要竞标>  <img:13:1:8:-23|^145#点击清理!/@清理>            <img:13:1:8:-23|^145#查看红包规则!/@游戏规则>\
#elseact
goto @kaishi

[@kaishi]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <①行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A50)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G50)>】\
   <img:13:1:8:-23|^145#点击给①号行会发红包!/@派送红包1>\
   <②行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A51)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G51)>】\
   <img:13:1:8:-23|^145#点击给②号行会发红包!/@派送红包2>\
   <③行会红包/AUTOCOLOR=251> <行会名称:/AUTOCOLOR=250>【<$Str(A52)>】 <红包数量:/AUTOCOLOR=250>【<$Str(G52)>】\
   <img:13:1:8:-23|^145#点击给③号行会发红包!/@派送红包3>\
      <全服红包/AUTOCOLOR=251>  <红包数量:/AUTOCOLOR=250>【<$Str(G53)>】\
   <img:13:1:8:-23|^145#点击给全服发红包!/@派红包>\
      <单人红包/AUTOCOLOR=251>  <红包数量:/AUTOCOLOR=250>【<$Str(G54)>】\
   <img:13:1:8:-23|^145#点击给指定玩家发红包!/@派单人红包>\
   <━━━━━━━━━━━━━━/SCOLOR=69><发红包啦!/SCOLOR=254><━━━━━━━━━━━━/SCOLOR=69>\
    <竞红包行会/AUTOCOLOR=249>                     <发红包规则/AUTOCOLOR=253>\
   <img:13:1:8:-23|^145#点击竞标红包行会!/@我也要竞标>                    <img:13:1:8:-23|^145#查看红包规则!/@游戏规则>\


[@我也要竞标]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <行会发红包,掌门可以给成员们发福利!/SCOLOR=125>\
   <红包数量,元宝数量可以自己定!/SCOLOR=125>\
   <但是我们的发红包位置有限!只能竞标了!/SCOLOR=125>\
   <竟标价格,你的行会就可以中标,直到下一位竞争对手出现!/SCOLOR=125>\
\
         <①号行会/AUTOCOLOR=251>  <行会名称:/AUTOCOLOR=250>【<$Str(A50)>】 <竞标价格:/AUTOCOLOR=250>【<$Str(G107)>】\
   <img:13:1:8:-23|^145#点击竞标①号红包行会!/@我也要竞标1>\
         <②号行会/AUTOCOLOR=251>  <行会名称:/AUTOCOLOR=250>【<$Str(A51)>】 <竞标价格:/AUTOCOLOR=250>【<$Str(G117)>】\
   <img:13:1:8:-23|^145#点击竞标②号红包行会!/@我也要竞标2>\
         <③号行会/AUTOCOLOR=251>  <行会名称:/AUTOCOLOR=250>【<$Str(A52)>】 <竞标价格:/AUTOCOLOR=250>【<$Str(G127)>】\
   <img:13:1:8:-23|^145#点击竞标③号红包行会!/@我也要竞标3>\

;唯一官网:http://www.800ji.com蓝胖子脚本库   

;站长推荐服务器QQ:95028102CPJidc-小白

;本站只提供免费下载脚本,不提供免费安装,如需要安装另收费,价格10-100不等!



[@清理]
#if
#act
MOV A50 0
MOV A51 0
MOV A52 0
mov G50 0
MOV G51 0
MOV G52 0
MOV G107 0
MOV G117 0
MOV G127 0
MOV G53 0
messagebox 数据清理完毕!


[@我也要竞标1]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
         <┏━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ /SCOLOR=250>\
         <当前①号红包行会:/SCOLOR=154> <$STR(A50)><竞标价格:/SCOLOR=154> <$STR(G107)> <元宝/SCOLOR=154>\
         <竞标时间:/SCOLOR=154> <$STR(A110)>\
         <┗━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ /SCOLOR=250>\
\
\
             <我要竞标/AUTOCOLOR=249>                            <返回首页/AUTOCOLOR=251>\
       <img:13:1:8:-23|^145#(点击竞标①号红包行会)只有行会掌门人才可以竞标哦!/@竞标开始E>                        <img:13:1:8:-23|^145#点击返回首页!/@main>\


[@我也要竞标2]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
         <┏━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ /SCOLOR=250>\
         <当前②号红包行会:/SCOLOR=154> <$STR(A51)><竞标价格:/SCOLOR=154> <$STR(G117)> <元宝/SCOLOR=154>\
         <竞标时间:/SCOLOR=154> <$STR(A120)>\
         <┗━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ /SCOLOR=250>\
\
\
             <我要竞标/AUTOCOLOR=249>                            <返回首页/AUTOCOLOR=251>\
       <img:13:1:8:-23|^145#(点击竞标②号红包行会)只有行会掌门人才可以竞标哦!/@竞标开始F>                        <img:13:1:8:-23|^145#点击返回首页!/@main>\

[@我也要竞标3]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
         <┏━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ /SCOLOR=250>\
         <当前③号红包行会:/SCOLOR=154> <$STR(A52)><竞标价格:/SCOLOR=154> <$STR(G127)> <元宝/SCOLOR=154>\
         <竞标时间:/SCOLOR=154> <$STR(A130)>\
         <┗━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ /SCOLOR=250>\
\
\
             <我要竞标/AUTOCOLOR=249>                            <返回首页/AUTOCOLOR=251>\
       <img:13:1:8:-23|^145#(点击竞标③号红包行会)只有行会掌门人才可以竞标哦!/@竞标开始G>                        <img:13:1:8:-23|^145#点击返回首页!/@main>\





[@竞标开始E]
#if
ISGUILDMASTER
#act
goto @竞标开始2
#elseact
messagebox 对不起,你不是行会掌门

[@竞标开始F]
#if
ISGUILDMASTER
#act
goto @竞标开始22
#elseact
messagebox 对不起,你不是行会掌门

[@竞标开始G]
#if
ISGUILDMASTER
#act
goto @竞标开始222
#elseact
messagebox 对不起,你不是行会掌门

[@竞标开始2]
#if
equal A50 <$GUILDNAME>
#act
messagebox 错误,你所在的行会已经是中标行会!
break
#elseact
goto @竞标开始2a

[@竞标开始2a]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <行会掌门人可以竞标红包行会为自己的会员发福利红包!/SCOLOR=125>\
   <红包数量,元宝数量可以自己定!/SCOLOR=125>\
   <但是我们的发红包位置有限!只能竞标了!/SCOLOR=125>\
   <竟标价格,你的行会就可以中标,直到下一位竞争对手出现!/SCOLOR=125>\
\
         <竞标价格/AUTOCOLOR=249>                            <返回竞标/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@@InPutInteger70>                        <img:13:1:8:-23|^145#点击返回首页!/@我也要竞标>\


[@竞标开始22]
#if
equal A51 <$GUILDNAME>
#act
messagebox 错误,你所在的行会已经是中标行会!
break
#elseact
goto @竞标开始22a


[@竞标开始22a]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <行会掌门人可以竞标红包行会为自己的会员发福利红包!/SCOLOR=125>\
   <红包数量,元宝数量可以自己定!/SCOLOR=125>\
   <但是我们的发红包位置有限!只能竞标了!/SCOLOR=125>\
   <竟标价格,你的行会就可以中标,直到下一位竞争对手出现!/SCOLOR=125>\
\
         <竞标价格/AUTOCOLOR=249>                            <返回竞标/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@@InPutInteger80>                        <img:13:1:8:-23|^145#点击返回首页!/@我也要竞标>\


[@竞标开始222]
#if
equal A52 <$GUILDNAME>
#act
messagebox 错误,你所在的行会已经是中标行会!
break
#elseact
goto @开始竞标222a

[@开始竞标222a]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <行会掌门人可以竞标红包行会为自己的会员发福利红包!/SCOLOR=125>\
   <红包数量,元宝数量可以自己定!/SCOLOR=125>\
   <但是我们的发红包位置有限!只能竞标了!/SCOLOR=125>\
   <竟标价格,你的行会就可以中标,直到下一位竞争对手出现!/SCOLOR=125>\
\
         <竞标价格/AUTOCOLOR=249>                            <返回竞标/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@@InPutInteger90>                        <img:13:1:8:-23|^145#点击返回首页!/@我也要竞标>\


[@InPutInteger70]
#if
large n70 <$STR(G107)>
#act
goto @竞标3
#elseact
messagebox 对不起,你的出价太低!

[@InPutInteger80]
#if
large n80 <$STR(G117)>
#act
goto @竞标33
#elseact
messagebox 对不起,你的出价太低!

[@InPutInteger90]
#if
large n90 <$STR(G127)>
#act
goto @竞标333
#elseact
messagebox 对不起,你的出价太低!

[@竞标3]
#if
CHECKGAMEGOLD < <$STR(n70)>
#act
messagebox 对不起,你没有那么多元宝!
#elseact
goto @竞标4

[@竞标33]
#if
CHECKGAMEGOLD < <$STR(n80)>
#act
messagebox 对不起,你没有那么多元宝!
#elseact
goto @竞标44

[@竞标333]
#if
CHECKGAMEGOLD < <$STR(n90)>
#act
messagebox 对不起,你没有那么多元宝!
#elseact
goto @竞标444



[@竞标4]
#if
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <以下是你的全部信息,点击确定提交信息:/SCOLOR=250>\
   <行会名称:/SCOLOR=154><$GUILDNAME>\
   <行会掌门:/SCOLOR=154><$USERNAME>\
   <竞标价格:/SCOLOR=154><$STR(n70)>元宝\
   <竞标时间:/SCOLOR=154><$DATETIME>\
\
         <确定提交/AUTOCOLOR=249>                            <重新填写/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@竞标5>                        <img:13:1:8:-23|^145#点击返回首页!/@竞标开始E>\



[@竞标44]
#If
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <以下是你的全部信息,点击确定提交信息:/SCOLOR=250>\
   <行会名称:/SCOLOR=154><$GUILDNAME>\
   <行会掌门:/SCOLOR=154><$USERNAME>\
   <竞标价格:/SCOLOR=154><$STR(n80)>元宝\
   <竞标时间:/SCOLOR=154><$DATETIME>\
\
         <确定提交/AUTOCOLOR=249>                            <重新填写/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@竞标55>                        <img:13:1:8:-23|^145#点击返回首页!/@竞标开始F>\


[@竞标444]
#If
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <以下是你的全部信息,点击确定提交信息:/SCOLOR=250>\
   <行会名称:/SCOLOR=154><$GUILDNAME>\
   <行会掌门:/SCOLOR=154><$USERNAME>\
   <竞标价格:/SCOLOR=154><$STR(n90)>元宝\
   <竞标时间:/SCOLOR=154><$DATETIME>\
\
         <确定提交/AUTOCOLOR=249>                            <重新填写/AUTOCOLOR=251>\
      <img:13:1:8:-23|^145#(点击输入竞标价格(只能为整数)!/@竞标555>                        <img:13:1:8:-23|^145#点击返回首页!/@竞标开始G>\


[@竞标5]
#if
CHECKGAMEGOLD > <$STR(n70)>
large n70 <$STR(G107)>
#act
GAMEGOLD - <$STR(n70)>
mov A50 <$GUILDNAME>
mov g107 <$STR(n70)>
mov a110 <$DATETIME>
mov a121 <$USERNAME>
mov g109 0
mov g110 0
SENDMSG 0 <$USERNAME>为自己的行会竞标成功、可以给成员们发福利啦!
close
#elseact
SENDMSG 7 [超时]
goto @main


[@竞标55]
#if
CHECKGAMEGOLD > <$STR(n80)>
large n80 <$STR(G117)>
#act
GAMEGOLD - <$STR(n80)>
mov A51 <$GUILDNAME>
mov g117 <$STR(n80)>
mov a120 <$DATETIME>
mov a122 <$USERNAME>
mov g109 0
mov g110 0
SENDMSG 0 <$USERNAME>为自己的行会竞标成功、可以给成员们发福利啦!
close
#elseact
SENDMSG 7 [超时]
goto @main

[@竞标555]
#if
CHECKGAMEGOLD > <$STR(n90)>
large n90 <$STR(G127)>
#act
GAMEGOLD - <$STR(n90)>
mov A52 <$GUILDNAME>
mov g127 <$STR(n90)>
mov a130 <$DATETIME>
mov a123 <$USERNAME>
mov g109 0
mov g110 0
SENDMSG 0 <$USERNAME>为自己的行会竞标成功、可以给成员们发福利啦!
close
#elseact
SENDMSG 7 [超时]
goto @main

[@介绍查询]
行会竞标上榜后可以行会内部发红包:\

     <返回上一页/@main>     <关  闭/@exit>\





;只写第一个其他类似,先设定下G50=2w,可以行会掌门自定义那发!

[@派送红包1]
#if
equal G50 0
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <在此输入需要发送的红包元宝数量!/SCOLOR=125>\
   <发送完成之后,10秒后系统将会把剩余的元宝返还给你!/SCOLOR=125>\
   <当然如果你发送的红包被抢完了!!/SCOLOR=125>\
   <那么系统也就没有办法给你返还了!/SCOLOR=125>\
\
         <红包数量/AUTOCOLOR=249>  <您输入的红包金额为:/SCOLOR=250>【<$Str(n72)>】\
      <img:13:1:8:-23|^145#(点击输入红包元宝数量)!/@@InPutInteger72>\
      <开始发红包/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击发送红包!/@开始发红包a>\
         <返    回/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击返回竞标界面!/@我也要竞标>\
#elsesay
messagebox 对不起,您行会之前还有红包没有领完!

[@派送红包2]
#if
equal G51 0
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <在此输入需要发送的红包元宝数量!/SCOLOR=125>\
   <发送完成之后,10秒后系统将会把剩余的元宝返还给你!/SCOLOR=125>\
   <当然如果你发送的红包被抢完了!!/SCOLOR=125>\
   <那么系统也就没有办法给你返还了!/SCOLOR=125>\
\
         <红包数量/AUTOCOLOR=249>  <您输入的红包金额为:/SCOLOR=250>【<$Str(n82)>】\
      <img:13:1:8:-23|^145#(点击输入红包元宝数量)!/@@InPutInteger82>\
      <开始发红包/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击发送红包!/@开始发红包b>\
         <返    回/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击返回竞标界面!/@我也要竞标>\
#elsesay
messagebox 对不起,您行会之前还有红包没有领完!

[@派送红包3]
#if
equal G52 0
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <在此输入需要发送的红包元宝数量!/SCOLOR=125>\
   <发送完成之后,10秒后系统将会把剩余的元宝返还给你!/SCOLOR=125>\
   <当然如果你发送的红包被抢完了!!/SCOLOR=125>\
   <那么系统也就没有办法给你返还了!/SCOLOR=125>\
\
         <红包数量/AUTOCOLOR=249>  <您输入的红包金额为:/SCOLOR=250>【<$Str(n92)>】\
      <img:13:1:8:-23|^145#(点击输入红包元宝数量)!/@@InPutInteger92>\
      <开始发红包/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击发送红包!/@开始发红包c>\
         <返    回/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击返回竞标界面!/@我也要竞标>\
#elsesay
messagebox 对不起,您行会之前还有红包没有领完!!

[@派红包]
#if
equal G53 0
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <在此输入需要发送的红包元宝数量!/SCOLOR=125>\
   <发送完成之后,10秒后系统将会把剩余的元宝返还给你!/SCOLOR=125>\
   <当然如果你发送的红包被抢完了!!/SCOLOR=125>\
   <那么系统也就没有办法给你返还了!/SCOLOR=125>\
   <PS:此红包为全服红包,所有人都可以抢!看手速看运气/SCOLOR=125>\
\
         <红包数量/AUTOCOLOR=249>  <您输入的红包金额为:/SCOLOR=250>【<$Str(n93)>】\
      <img:13:1:8:-23|^145#(点击输入红包元宝数量)!/@@InPutInteger93>\
      <开始发红包/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击发送红包!/@开始发红包d>\
         <返    回/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击返回竞标界面!/@exit>\
#elsesay
messagebox 对不起,之前的红包还没有结算完毕!!


[@派单人红包]
#if
equal G54 0
#act
OPENMERCHANTBIGDLG 1 15 1 0 -10 10 0
#say
<img:11:1:408:5/@exit>\
\
   <在此输入需要发送的红包元宝数量!/SCOLOR=125>\
   <发送完成之后,10秒后系统将会把剩余的元宝返还给你!/SCOLOR=125>\
   <当然如果你发送的红包被抢完了!!/SCOLOR=125>\
   <那么系统也就没有办法给你返还了!/SCOLOR=125>\
   <PS:此红包为全服红包,所有人都可以抢!看手速看运气/SCOLOR=125>\
\
         <玩家名字/AUTOCOLOR=249>  <您输入玩家名字:/SCOLOR=250>【<$Str(S51)>】\
      <img:13:1:8:-23|^145#(点击输入接收红包的玩家名字)!/@@InPutString51>\
         <红包数量/AUTOCOLOR=249>  <您输入的红包金额为:/SCOLOR=250>【<$Str(n95)>】\
      <img:13:1:8:-23|^145#(点击输入红包元宝数量)!/@@InPutInteger95>\
      <开始发红包/AUTOCOLOR=249>      <返    回/AUTOCOLOR=249>\
      <img:13:1:8:-23|^145#点击发送红包!/@开始发红包e>      <img:13:1:8:-23|^145#点击返回竞标界面!/@exit>\

#elsesay
messagebox 对不起,之前的红包还没有结算完毕!!



[@InPutInteger72]
#if
CHECKOFGUILD <$Str(A50)>
#act
goto @派送红包1
#elseact
messagebox 对不起,或者你的行会还没有竞标①号行会成功!

[@InPutInteger82]
#if
CHECKOFGUILD <$Str(A51)>
#act
goto @派送红包2
#elseact
messagebox 对不起,或者你的行会还没有竞标②号行会成功!


[@InPutInteger92]
#if
CHECKOFGUILD <$Str(A52)>
#act
goto @派送红包3
#elseact
messagebox 对不起,你的行会还没有竞标③号行会成功!

[@InPutInteger93]
#if
#act
goto @派红包

[@InPutString51]
#if
CheckOnline <$STR(S51)>
#act
goto @派单人红包
break
#elseact
messagebox 对不起,对方没有在线!

[@InPutInteger95]
#if
LARGE <$Str(n95)> 100
#act
goto @派单人红包
break
#elseact
messagebox 对不起,单人红包发送低于100元宝的红包!


[@开始发红包a]
#if
checkgamegold > <$Str(n72)>
#act
GameGold - <$Str(n72)>
mov G50 <$Str(n72)>
SENDMSG 6 红包发送完毕,行会玩家可以抢红包啦!
GMEXECUTE 开始提问 @我要抢红包啦1
DELAYGOTO 10000 @返还1
#elseact
messagebox 对不起,您当前元宝数量不足【<$Str(n72)>】个,请重新输入 !

[@开始发红包b]
#if
checkgamegold > <$Str(n82)>
#act
GameGold - <$Str(n82)>
mov G51 <$Str(n82)>
SENDMSG 6 红包发送完毕,行会玩家可以抢红包啦!
GMEXECUTE 开始提问 @我要抢红包啦2
DELAYGOTO 10000 @返还2
#elseact
messagebox 对不起,您当前元宝数量不足【<$Str(n82)>】个,请重新输入 !

[@开始发红包c]
#if
checkgamegold > <$Str(n92)>
#act
GameGold - <$Str(n92)>
mov G52 <$Str(n92)>
SENDMSG 6 红包发送完毕,行会玩家可以抢红包啦!
GMEXECUTE 开始提问 @我要抢红包啦3
DELAYGOTO 10000 @返还3
#elseact
messagebox 对不起,您当前元宝数量不足【<$Str(n92)>】个,请重新输入 !


[@开始发红包d]
#if
checkgamegold > <$Str(n93)>
#act
GameGold - <$Str(n93)>
mov G53 <$Str(n93)>
SENDMSG 6 红包发送完毕,全服所有玩家可以抢红包啦!
GMEXECUTE 开始提问 @我要抢红包啦4
DELAYGOTO 10000 @返还4
#elseact
messagebox 对不起,您当前元宝数量不足【<$Str(n93)>】个,请重新输入 !


[@开始发红包e]
#if
checkgamegold > <$Str(n95)>
#act
GameGold - <$Str(n95)>
mov G54 <$Str(n95)>
AddTextList ..\QuestDiary\红包名单.txt <$STR(S51)>
SENDMSG 6 红包发送完毕,【<$Str(S51)>】玩家将马上收到您的红包,如果10秒没有接收,那么系统将红包一起返还给你!
GMEXECUTE 开始提问 @我要抢红包啦5
DELAYGOTO 10000 @返还5
#elseact
messagebox 对不起,您当前元宝数量不足【<$Str(n95)>】个,请重新输入 !


[@返还1]
#if
#act
GameGold + <$Str(G50)>
SENDMSG 6 抢红包时间结束,剩余【<$Str(G50)>】的红包返还给你!请注意查收!
MOV G50 0

[@返还2]
#if
#act
GameGold + <$Str(G51)>
SENDMSG 6 抢红包时间结束,剩余【<$Str(G51)>】的红包返还给你!请注意查收!
MOV G51 0


[@返还3]
#if
#act
GameGold + <$Str(G52)>
SENDMSG 6 抢红包时间结束,剩余【<$Str(G52)>】的红包返还给你!请注意查收!
MOV G52 0


[@返还4]
#if
#act
GameGold + <$Str(G53)>
SENDMSG 6 抢红包时间结束,剩余【<$Str(G53)>】的红包返还给你!请注意查收!
MOV G53 0

[@返还5]
#if
#act
GameGold + <$Str(G54)>
SENDMSG 6 抢红包时间结束,剩余【<$Str(G54)>】的红包返还给你!请注意查收!
MOV G54 0
ClearNameList ..\QuestDiary\红包名单.txt


[@游戏规则]
#if
#act
OPENMERCHANTBIGDLG 1 14 1 0 0 0 0
#say
 <img:11:1:412:5/@exit>\
\
   <行会红包:/SCOLOR=146> \
   <行会红包:顾名思义就是行会内部,非本行会的玩家领不到红包。/SCOLOR=253> \   
   <发送条件:必须在竞价板上争取一个行会位置,不然不能发送红包。/SCOLOR=253> \
   <领取条件:同一行会的成员均可领取,领取时间限制10秒。/SCOLOR=253> \
             <超过10秒将返回给发送此红包的玩家,手速决定一切。/SCOLOR=253> \
   <全服红包:/SCOLOR=146> \
   <全服红包:顾名思义就是发送给所有玩家,只要在线均有机会得红包。/SCOLOR=253> \
   <发送条件:没有特殊条件只要你有元宝就可以发送。/SCOLOR=253> \
   <领取条件:在线玩家均可领取,领取时间超过10秒自动返还发红包玩家。/SCOLOR=253> \
   <指定红包:/SCOLOR=146> \
   <指定红包:发送给你指定的玩家,只要收红包的玩家在线就可以发红包。/SCOLOR=253> \
   <发送条件:必须对方在线,不在线发不出此红包。/SCOLOR=253> \
   <领取条件:领取时间超过10秒自动返还给发此红包的玩家。/SCOLOR=253> \
   <注意事项:/SCOLOR=146> \
   <红包说明:不管发行会,或者全服,发送小于100元宝只有一包,只能一个人/SCOLOR=249> \
             <领取反之发送大于100元宝的红包系统将随机拆解分包发送给/SCOLOR=249> \
             <玩家,有时候拆解成10包,运气好拆解成4-5包,所有玩家得到/SCOLOR=249>\
             <元宝数量都不等/SCOLOR=249>\
   <作者寄语:/SCOLOR=146> \
   <本脚本由/SCOLOR=125>:<战盟网络管理小组>.<独家奉献,谢谢大家/SCOLOR=125>\
   <战盟全体成员恭祝大家/SCOLOR=125>:<万事如意/SCOLOR=251>,<财源滚滚/SCOLOR=250>,<身体健康/SCOLOR=254>\
页: [1]
查看完整版本: 传奇一条龙提供的抢红包脚本适用于GOM引擎