行会红包 » 历史记录 » 修订 17
修订 16 (chenjun, 2022-06-01 18:37) → 修订 17/29 (chenjun, 2022-06-01 18:39)
h4. %{color:green}行会红包%
玩家可以在行会中发红包给行会成员，也可以收取其他成员发放的红包
-
-
h4. *%{color:deepskyblue}特戒引擎脚本示例：%*
-
-
bq. [<notextile>@</notextile>main]
%{color:lightGrey};行会红包UI显示处理%
#if
#act
openMerchantBigDlg lc_chuangti 4 0 0 1 0 0
goto <notextile>@</notextile>生成红包列表
goto <notextile>@</notextile>红包数据
#say
<panelsize:1440:900>\
<Img:lc_quyufenge_01:255:95:1>\
<Img:lc_quyufenge_02:270:760:1>\
<text:灵符：<$gameGird>{scolor=250}:1100:840> \
<ImgButton:lc_anniuhui_4zi_da:1300:820:去发红包/<notextile>@</notextile>去发红包>\
%{color:lightGrey};创建领取红包列表界面%
<notextile><</notextile>*{color:green}[[dlg_itemGrid_|itemGrid]]*:GridName,0,0,1:260:80:310,410:1,4,652,1:0>\
[<notextile>@</notextile>去发红包]
#if
#act
mov n$发红包金额显示值 1000
mov n$发红包数量显示值 10
goto <notextile>@</notextile>设置红包
[<notextile>@</notextile>设置红包]
#if
#act
openMerchantBigDlg lc_chuangti 4 0 0 1 0 0
#say
%{color:lightGrey};红包展示%
<Img:lc_hongbao_03:123:225:1:1.5>
<text:<$userName>的红包{scolor=151}:200:240> \
<text:恭喜发财，大吉大利{scolor=151}:128:374> \
<text:发放金额：{scolor=161}:500:230> \
<img:huatiao01:832:222:1:1>
%{color:lightGrey};红包金额输入框%
<notextile><</notextile>*{color:green}[[dlg_Input_|Input]]*:1:1:<$str(n$发红包金额显示值)>:161:400:40:161:30:6:921:237/<notextile>@</notextile>endInput1> <notextile><</notextile>*{color:green}[[dlg_Input_|Input]]:1:1:<$str(n$发红包金额显示值)>:161:400:40:161:30:6:921:237/<notextile>@</notextile>endInput1> \
<text:今日可发<$str(u$今日剩余可发灵符)>灵符{scolor=160}:803:317> \
<ImgButton:lc_shangcheng_jh_anniu:772:224:/<notextile>@</notextile>发放金额减>\
<ImgButton:lc_shangcheng_jiahao_anniu:1074:224:/<notextile>@</notextile>发放金额加>\
<text:红包数量：{scolor=161}:500:480> \
<img:huatiao01:832:474:1:1>
%{color:lightGrey};红包数量输入框%
<notextile><</notextile>*{color:green}[[dlg_Input_|Input]]:2:1:<$str(n$发红包数量显示值)>:161:400:40:161:30:4:931:487/<notextile>@</notextile>endInput2> \
<ImgButton:lc_shangcheng_jh_anniu:772:476:/<notextile>@</notextile>红包数量减>\
<ImgButton:lc_shangcheng_jiahao_anniu:1074:476:/<notextile>@</notextile>红包数量加>\
<text:祝福语：{scolor=161}:500:700> \
<text:恭喜发财，大吉大利{scolor=161}:692:700> \
<text:注：未领取的红包将于24小时后退还{scolor=250}:100:850> \
<ImgButton:lc_anniuhui_4zi_da:1200:820:发送/<notextile>@</notextile>submitinput>\
[<notextile>@</notextile>endInput1]
%{color:lightGrey};触发编辑结束,如未输入红包金额,会返回一个空字符%
#act
mov n$新红包金额 <$str(s1)>
#if
not equal s1
small n$新红包金额 n$发红包金额显示值
#act
sendtipsmsg 红包金额最少需要1000灵符
mov s1 1000
mov n$发红包金额显示值 <$str(s1)>
goto <notextile>@</notextile>设置红包
#elseact
mov n$发红包金额显示值 <$str(s1)>
[<notextile>@</notextile>endInput2]
%{color:lightGrey};触发编辑结束,如未输入红包数量,会返回一个空字符%
#act
mov n$新红包数量 <$str(s2)>
#if
not equal s2
small n$新红包数量 n$发红包数量显示值
#act
sendtipsmsg 红包数量最少10个
mov s2 10
mov n$发红包数量显示值 <$str(s2)>
goto <notextile>@</notextile>设置红包
#elseact
mov n$发红包数量显示值 <$str(s2)>
%{color:lightGrey};点击调整红包金额的减号按钮触发%
[<notextile>@</notextile>发放金额减]
#if
small n$发红包金额显示值 1001
#act
mov n$发红包金额显示值 1000
sendtipsmsg 红包金额最少需要1000灵符
#elseact
mov n$显示值数字化金额 <$str(n$发红包金额显示值)>
dec n$显示值数字化金额 100
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
goto <notextile>@</notextile>设置红包
%{color:lightGrey};点击调整红包金额的加号按钮触发%
[<notextile>@</notextile>发放金额加]
#if
equal s1
#act
mov s1 10
mov n$显示值数字化金额 1000
inc n$显示值数字化金额 100
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
goto <notextile>@</notextile>设置红包
break
#if
#act
mov n$显示值数字化金额 <$str(n$发红包金额显示值)>
inc n$显示值数字化金额 100
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
goto <notextile>@</notextile>设置红包
%{color:lightGrey};点击调整红包数量的减号按钮触发%
[<notextile>@</notextile>红包数量减]
#if
small n$发红包数量显示值 11
#act
mov n$发红包数量显示值 10
sendtipsmsg 红包数量最少10个
#elseact
mov n$显示值数字化数量 <$str(n$发红包数量显示值)>
dec n$显示值数字化数量 1
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
goto <notextile>@</notextile>设置红包
%{color:lightGrey};点击调整红包数量的加号按钮触发%
[<notextile>@</notextile>红包数量加]
#if
equal s2
#act
mov s2 10
mov n$显示值数字化数量 10
inc n$显示值数字化数量 1
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
goto <notextile>@</notextile>设置红包
break
#if
#act
mov n$显示值数字化数量 <$str(n$发红包数量显示值)>
inc n$显示值数字化数量 1
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
goto <notextile>@</notextile>设置红包
[<notextile>@</notextile>submitinput]
%{color:lightGrey};触发提交时,如果未输入过任何内容,则返回值为空格%
#if
equal " " <$str(s1)>
#act
mov s1 <$str(n$发红包金额显示值)>
#if
equal " " <$str(s2)>
#act
mov s2 <$str(n$发红包数量显示值)>
%{color:lightGrey};今日剩余可发灵符不足时，弹出提示%
#act
mov n$新红包金额 <$str(s1)>
#if
large n$新红包金额 u$今日剩余可发灵符
#act
messageBox 今日剩余可发灵符不足
break
#if
small n$新红包金额 1000
#act
messageBox 红包金额最少需要1000灵符
break
#if
small n$新红包数量 10
#act
messageBox 红包数量最少10个
break
#if
#act
mov n$新红包金额 <$str(s1)>
%{color:lightGrey};更新今日剩余可发灵符%
dec u$今日剩余可发灵符 n$新红包金额
%{color:lightGrey};扣除灵符%
gameGird - <$str(s1)>
%{color:lightGrey};添加新红包数据，时间戳，发放者角色名，红包总金额，红包数量%
mov s$新红包数据 <$timeStamp>|<$userName>|<$str(s1)>|<$str(s2)>|:
inc s$新红包数据 <$guild2(行会红包)>
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$新红包数据)>
%{color:lightGrey};更新自己发出的红包列表，过期退还红包余额时用%
mov s1 <$str(t$自己发出的红包列表)>
inc s1 <$timeStamp>|
mov t$自己发出的红包列表 <$str(s1)>
sendMsg 6 发送红包成功
%{color:lightGrey};重新加载红包列表界面%
goto <notextile>@</notextile>main
[<notextile>@</notextile>生成红包列表]
%{color:lightGrey};获取全部的行会红包，包括不能领取的%
#act
mov s$红包列表含已领取 <$guild2(行会红包)>
*{color:green}[[pgExtractString]]* : s$红包列表含已领取 s$红包列表含已领取分割后 n$行会红包总数
mov n$红包计数器 1
%{color:lightGrey};循环取出列表中各红包的时间戳%
#if loop n$行会红包总数
#act
%{color:lightGrey};取出单个红包数据%
mov n$var <$str(n$红包计数器)>
*{color:green}[[getListValue]]* s$红包列表含已领取分割后 <$str(n$var)> s$红包
%{color:lightGrey};取出红包的时间戳%
*{color:green}[[pgExtractString]]* | <$str(s$红包)> s$红包分割后 n$红包分割后
mov n$var 1
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包的时间戳
goto <notextile>@</notextile>过滤红包
inc n$红包计数器 1
[<notextile>@</notextile>过滤红包]
%{color:lightGrey};列表不展示自己已经领取过的行会红包，列表不展示发出超过24小时的行会红包%
%{color:lightGrey};检测时间戳是否在自己领过的红包列表中，检测时间戳与当前时间的差值是否大于24小时%
#act
mov n$var1 <$timeStamp>
mov n$var2 <$str(s$红包的时间戳)>
dec n$var1 n$var2
div n$发出多少小时 n$var1 3600
#or
*{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$红包的时间戳
not small n$发出多少小时 24
#act
mov s$tmp
*{color:green}[[ansiReplaceText]]* s$红包列表含已领取 <$str(s$红包)>: s$tmp
mov s$红包列表 <$str(s$红包列表含已领取)>
#elseact
mov s$红包列表 <$str(s$红包列表含已领取)>
[<notextile>@</notextile>红包数据]
#act
*{color:green}[[pgExtractString]]* : s$红包列表 s$红包列表分割后 n$行会红包总数
%{color:lightGrey};没有可领取的红包%
#if
equal n$行会红包总数 0
#act
mov s$itemList
%{color:lightGrey};红包界面第1个红包%
#if
large n$行会红包总数 0
#act
mov n$var 1
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包1
*{color:green}[[pgExtractString]]* | <$str(s$红包1)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item1 (<itemindex:1>
inc s$item1 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(1)>
inc s$item1 <Img:lc_qiang:100:250:1>
inc s$item1 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item1 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
mov s$itemList <$str(s$item1)>
%{color:lightGrey};红包界面第2个红包%
#if
large n$行会红包总数 1
#act
mov n$var 2
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包2
*{color:green}[[pgExtractString]]* | <$str(s$红包2)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item2 (<itemindex:2>
inc s$item2 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(2)>
inc s$item2 <Img:lc_qiang:100:250:1>
inc s$item2 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item2 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item2)>
%{color:lightGrey};红包界面第3个红包%
#if
large n$行会红包总数 2
#act
mov n$var 3
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包3
*{color:green}[[pgExtractString]]* | <$str(s$红包3)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item3 (<itemindex:3>
inc s$item3 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(3)>
inc s$item3 <Img:lc_qiang:100:250:1>
inc s$item3 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item3 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item3)>
%{color:lightGrey};红包界面第4个红包%
#if
large n$行会红包总数 3
#act
mov n$var 4
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包4
*{color:green}[[pgExtractString]]* | <$str(s$红包4)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item4 (<itemindex:4>
inc s$item4 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(4)>
inc s$item4 <Img:lc_qiang:100:250:1>
inc s$item4 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item4 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item4)>
%{color:lightGrey};红包界面第5个红包%
#if
large n$行会红包总数 4
#act
mov n$var 5
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包5
*{color:green}[[pgExtractString]]* | <$str(s$红包5)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item5 (<itemindex:5>
inc s$item5 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(5)>
inc s$item5 <Img:lc_qiang:100:250:1>
inc s$item5 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item5 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item5)>
%{color:lightGrey};红包界面第6个红包%
#if
large n$行会红包总数 5
#act
mov n$var 6
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包6
*{color:green}[[pgExtractString]]* | <$str(s$红包6)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item6 (<itemindex:6>
inc s$item6 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(6)>
inc s$item6 <Img:lc_qiang:100:250:1>
inc s$item6 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item6 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item6)>
%{color:lightGrey};红包界面第7个红包%
#if
large n$行会红包总数 6
#act
mov n$var 7
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包7
*{color:green}[[pgExtractString]]* | <$str(s$红包7)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item7 (<itemindex:7>
inc s$item7 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(7)>
inc s$item7 <Img:lc_qiang:100:250:1>
inc s$item7 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item7 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item7)>
%{color:lightGrey};红包界面第8个红包%
#if
large n$行会红包总数 7
#act
mov n$var 8
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包8
*{color:green}[[pgExtractString]]* | <$str(s$红包8)> s$红包分割后 n$红包分割数
mov n$var 2
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
mov s$item8 (<itemindex:8>
inc s$item8 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(8)>
inc s$item8 <Img:lc_qiang:100:250:1>
inc s$item8 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
inc s$item8 <text:恭喜发财，大吉大利{scolor=151}:35:175>)
inc s$itemList <$str(s$item8)>
[<notextile>@</notextile>领取红包]
#if
#act
%{color:lightGrey};取出单个红包的数据%
mov n$var <$scriptParam1>
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$点的红包
*{color:green}[[pgExtractString]]* | <$str(s$点的红包)> s$红包分割后 n$红包分割数
%{color:lightGrey};取出红包的金额和数量%
mov n$var 1
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包时间戳
mov n$var 3
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包金额
mov n$var 4
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包数量
mov n1 <$str(s$点的红包金额)>
mov n2 <$str(s$点的红包数量)>
%{color:lightGrey};随机获得红包奖励%
%{color:lightGrey};如果红包数量大于1，领取后更新该红包%
#if
large n2 1
%{color:lightGrey};领过的红包不能再领%
not *{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$点的红包时间戳
#act
div n$当前平均值 n1 n2
mul n$当前平均值的2倍 n$当前平均值 2
%{color:lightGrey};一个行会红包只能再领2次时，最后1个玩家至少可以领取1个货币%
dec n$当前平均值的2倍 1
movr n$随机红包领取值 1 n$当前平均值的2倍
dec n1 n$随机红包领取值
dec n2 1
mov s1 <$str(s$红包分割后_1)>|<$str(s$红包分割后_2)>|<$str(n1)>|<$str(n2)>|
mov s$红包列表 <$guild2(行会红包)>
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$点的红包)> <$str(s1)>
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
gameGird + n$随机红包领取值
sendtipsmsg 恭喜你抢到了<$str(n$随机红包领取值)>灵符的红包
mov s1 <$str(t$自己领过的红包列表)>
inc s1 <$str(s$点的红包时间戳)>|
mov t$自己领过的红包列表 <$str(s1)>
goto <notextile>@</notextile>main
%{color:lightGrey};一个行会红包只能再领1次时，领取后删除该红包%
#if
equal n2 1
%{color:lightGrey};自己领过的红包不能再领%
not *{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$点的红包时间戳
#act
mov s$tmp
mov s$红包列表 <$guild2(行会红包)>
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$点的红包)>: s$tmp
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
gameGird + n1
sendtipsmsg 恭喜你抢到了<$str(n1)>灵符的红包
goto <notextile>@</notextile>main
[<notextile>@</notextile>返还过期红包]
%{color:lightGrey};循环取出自己发出的红包%
#act
*{color:green}[[pgExtractString]]* | <$str(t$自己发出的红包列表)> s1 n1
mov n$红包计数器 1
%{color:lightGrey};循环取出自己发红包列表中红包的时间戳%
#if loop n1
#act
%{color:lightGrey};取出时间戳%
mov n$var <$str(n$红包计数器)>
*{color:green}[[getListValue]]* s1 <$str(n$var)> s$红包的时间戳
goto <notextile>@</notextile>过期处理
inc n$红包计数器 1
%{color:lightGrey};返还过期的红包%
#if
large u$过期返还的红包金额 0
#act
messageBox 您发出的行会红包超过24小时仍未领完\现将未领取的红包退还\共退还<$str(u$过期返还的红包金额)>灵符
gameGird + u$过期返还的红包金额
sendMsg 6 你获得了退还的<$str(u$过期返还的红包金额)>灵符
mov u$过期返还的红包金额 0
[<notextile>@</notextile>过期处理]
%{color:lightGrey};根据时间戳判断该红包是否过期%
#act
mov n$var1 <$timeStamp>
mov n$var2 <$str(s$红包的时间戳)>
dec n$var1 n$var2
div n$发出多少小时 n$var1 3600
#if
not small n$发出多少小时 24
#act
%{color:lightGrey};从发红包数据中删除该红包%
mov s$tmp
*{color:green}[[ansiReplaceText]]* t$自己发出的红包列表 <$str(s$红包的时间戳)>| s$tmp
goto <notextile>@</notextile>找出仍在行会红包中的
%{color:lightGrey};过期并且依然存在于行会红包中的，找出来%
[<notextile>@</notextile>找出仍在行会红包中的]
#act
%{color:lightGrey};获取全部的行会红包%
mov s$红包列表含已领取 <$guild2(行会红包)>
*{color:green}[[pgExtractString]]* : s$红包列表含已领取 s$红包列表含已领取分割后 n$行会红包总数
#if
*{color:green}[[checkContainsText]]* s$红包列表含已领取 s$红包的时间戳
#act
mov n$红包计数器2号 1
%{color:lightGrey};循环取出列表中红包们的时间戳%
#if loop n$行会红包总数
#act
%{color:lightGrey};取出红包%
mov n$var <$str(n$红包计数器2号)>
*{color:green}[[getListValue]]* s$红包列表含已领取分割后 <$str(n$var)> s$红包
*{color:green}[[pgExtractString]]* | <$str(s$红包)> s$红包分割后 n$红包分割后
%{color:lightGrey};取出红包的时间戳%
mov n$var 1
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$行会红包的时间戳
%{color:lightGrey};取出红包的红包金额%
mov n$var 3
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$行会红包金额
goto <notextile>@</notextile>处理仍在行会红包中的
inc n$红包计数器2号 1
%{color:lightGrey};将红包余额存个人变量，再从行会红包中删除%
[<notextile>@</notextile>处理仍在行会红包中的]
#if
*{color:green}[[CompareText]]* s$红包的时间戳 s$行会红包的时间戳
#act
%{color:lightGrey};将红包余额存变量%
mov n$var <$str(s$行会红包金额)>
inc u$过期返还的红包金额 n$var
%{color:lightGrey};从行会红包中删除该红包%
mov s$tmp
mov s$红包列表 <$guild2(行会红包)>
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$红包)>: s$tmp
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
%{color:lightGrey};自己领红包数据中，删除时间超过24小时的红包%
[<notextile>@</notextile>更新领红包数据]
%{color:lightGrey};循环取出自己领取的红包%
#act
*{color:green}[[pgExtractString]]* | <$str(t$自己领过的红包列表)> s1 n1
mov n$红包计数器 1
%{color:lightGrey};循环取出自己领取红包列表中红包的时间戳%
#if loop n1
#act
%{color:lightGrey};取出时间戳%
mov n$var <$str(n$红包计数器)>
*{color:green}[[getListValue]]* s1 <$str(n$var)> s$红包的时间戳
goto <notextile>@</notextile>领红包过期处理
inc n$红包计数器 1
[<notextile>@</notextile>领红包过期处理]
%{color:lightGrey};根据时间戳判断该红包是否过期%
#act
mov n$var1 <$timeStamp>
mov n$var2 <$str(s$红包的时间戳)>
dec n$var1 n$var2
div n$发出多少小时 n$var1 3600
#if
not small n$发出多少小时 24
#act
%{color:lightGrey};从领红包数据中删除该红包%
mov s$tmp
*{color:green}[[ansiReplaceText]]* t$自己领过的红包列表 <$str(s$红包的时间戳)>| s$tmp
%{color:lightGrey};..\Mir200\Envir\MapQuest_def\QManage.txt%
[<notextile>@</notextile>Login]
#if
%{color:lightGrey};登陆时返还过期红包%
#call [\行会红包\行会红包.txt] <notextile>@</notextile>返还过期红包
%{color:lightGrey};登陆时，自己领红包数据中，删除时间超过24小时的红包%
#call [\行会红包\行会红包.txt] <notextile>@</notextile>更新领红包数据
%{color:lightGrey};每日首次登陆时重置每日数据%
#if
CHECKLOGINCOUNT = 1
#ACT
mov u$今日剩余可发灵符 10000000