项目

一般

简介

行会红包 » 历史记录 » 版本 15

chenjun, 2022-06-01 18:34

1 1 chenjun
h4. %{color:green}行会红包%
2
3
玩家可以在行会中发红包给行会成员,也可以收取其他成员发放的红包
4
5
-
6
-
7
8
h4. *%{color:deepskyblue}特戒引擎脚本示例:%*
9
10
-
11
-
12
13
bq. [<notextile>@</notextile>main]
14 2 chenjun
%{color:lightGrey};行会红包UI显示处理%
15 15 chenjun
#if
16 2 chenjun
#act
17
openMerchantBigDlg lc_chuangti 4 0 0 1 0 0
18 3 chenjun
goto <notextile>@</notextile>生成红包列表
19
goto <notextile>@</notextile>红包数据
20 2 chenjun
#say
21
<panelsize:1440:900>\
22
<Img:lc_quyufenge_01:255:95:1>\
23
<Img:lc_quyufenge_02:270:760:1>\
24
<text:灵符:<$gameGird>{scolor=250}:1100:840> \
25 3 chenjun
<ImgButton:lc_anniuhui_4zi_da:1300:820:去发红包/<notextile>@</notextile>去发红包>\
26 2 chenjun
%{color:lightGrey};创建领取红包列表界面%
27 15 chenjun
<notextile><</notextile>*{color:green}[[dlg_itemGrid_|itemGrid]]*:GridName,0,0,1:260:80:310,410:1,4,652,1:0>\
28 1 chenjun
&nbsp;
29
&nbsp;
30 15 chenjun
[<notextile>@</notextile>去发红包]
31
#if
32
#act
33
mov n$发红包金额显示值 1000
34
mov n$发红包数量显示值 10
35
goto <notextile>@</notextile>设置红包
36
&nbsp;
37
&nbsp;
38
[<notextile>@</notextile>设置红包]
39
#if
40
#act
41
openMerchantBigDlg lc_chuangti 4 0 0 1 0 0
42
#say
43
%{color:lightGrey};红包展示%
44
<Img:lc_hongbao_03:123:225:1:1.5>
45
<text:<$userName>的红包{scolor=151}:200:240> \
46
<text:恭喜发财,大吉大利{scolor=151}:128:374> \
47
<text:发放金额:{scolor=161}:500:230> \
48
<img:huatiao01:832:222:1:1>
49
%{color:lightGrey};红包金额输入框%
50
<notextile><</notextile>*{color:green}[[dlg_Input_|Input]]:1:1:<$str(n$发红包金额显示值)>:161:400:40:161:30:6:921:237/<notextile>@</notextile>endInput1> \
51
<text:今日可发<$str(u$今日剩余可发灵符)>灵符{scolor=160}:803:317> \
52
<ImgButton:lc_shangcheng_jh_anniu:772:224:/<notextile>@</notextile>发放金额减>\
53
<ImgButton:lc_shangcheng_jiahao_anniu:1074:224:/<notextile>@</notextile>发放金额加>\
54
<text:红包数量:{scolor=161}:500:480> \
55
<img:huatiao01:832:474:1:1>
56
%{color:lightGrey};红包数量输入框%
57
<notextile><</notextile>*{color:green}[[dlg_Input_|Input]]:2:1:<$str(n$发红包数量显示值)>:161:400:40:161:30:4:931:487/<notextile>@</notextile>endInput2> \
58
<ImgButton:lc_shangcheng_jh_anniu:772:476:/<notextile>@</notextile>红包数量减>\
59
<ImgButton:lc_shangcheng_jiahao_anniu:1074:476:/<notextile>@</notextile>红包数量加>\
60
<text:祝福语:{scolor=161}:500:700> \
61
<text:恭喜发财,大吉大利{scolor=161}:692:700> \
62
<text:注:未领取的红包将于24小时后退还{scolor=250}:100:850> \
63
<ImgButton:lc_anniuhui_4zi_da:1200:820:发送/<notextile>@</notextile>submitinput>\
64
&nbsp;
65
&nbsp;
66
[<notextile>@</notextile>endInput1]
67
%{color:lightGrey};触发编辑结束,如未输入红包金额,会返回一个空字符%
68
#act
69
mov n$新红包金额 <$str(s1)>
70
&nbsp;
71
#if
72
not equal s1
73
small n$新红包金额 n$发红包金额显示值
74
#act
75
sendtipsmsg 红包金额最少需要1000灵符
76
mov s1 1000
77
mov n$发红包金额显示值 <$str(s1)>
78
goto <notextile>@</notextile>设置红包
79
#elseact
80
mov n$发红包金额显示值 <$str(s1)>
81
&nbsp;
82
&nbsp;
83
[<notextile>@</notextile>endInput2]
84
%{color:lightGrey};触发编辑结束,如未输入红包数量,会返回一个空字符%
85
#act
86
mov n$新红包数量 <$str(s2)>
87
&nbsp;
88
#if
89
not equal s2
90
small n$新红包数量 n$发红包数量显示值
91
#act
92
sendtipsmsg 红包数量最少10个
93
mov s2 10
94
mov n$发红包数量显示值 <$str(s2)>
95
goto <notextile>@</notextile>设置红包
96
#elseact
97
mov n$发红包数量显示值 <$str(s2)>
98
&nbsp;
99
&nbsp;
100
%{color:lightGrey};点击调整红包金额的减号按钮触发%
101
[<notextile>@</notextile>发放金额减]
102
#if
103
small n$发红包金额显示值 1001
104
#act
105
mov n$发红包金额显示值 1000
106
sendtipsmsg 红包金额最少需要1000灵符
107
#elseact
108
mov n$显示值数字化金额 <$str(n$发红包金额显示值)>
109
dec n$显示值数字化金额 100
110
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
111
goto <notextile>@</notextile>设置红包
112
&nbsp;
113
&nbsp;
114
%{color:lightGrey};点击调整红包金额的加号按钮触发%
115
[<notextile>@</notextile>发放金额加]
116
#if
117
equal s1
118
#act
119
mov s1 10
120
mov n$显示值数字化金额 1000
121
inc n$显示值数字化金额 100
122
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
123
goto <notextile>@</notextile>设置红包
124
break
125
&nbsp;
126
#if
127
#act
128
mov n$显示值数字化金额 <$str(n$发红包金额显示值)>
129
inc n$显示值数字化金额 100
130
mov n$发红包金额显示值 <$str(n$显示值数字化金额)>
131
goto <notextile>@</notextile>设置红包
132
&nbsp;
133
&nbsp;
134
%{color:lightGrey};点击调整红包数量的减号按钮触发%
135
[<notextile>@</notextile>红包数量减]
136
#if
137
small n$发红包数量显示值 11
138
#act
139
mov n$发红包数量显示值 10
140
sendtipsmsg 红包数量最少10个
141
#elseact
142
mov n$显示值数字化数量 <$str(n$发红包数量显示值)>
143
dec n$显示值数字化数量 1
144
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
145
goto <notextile>@</notextile>设置红包
146
&nbsp;
147
&nbsp;
148
%{color:lightGrey};点击调整红包数量的加号按钮触发%
149
[<notextile>@</notextile>红包数量加]
150
#if
151
equal s2
152
#act
153
mov s2 10
154
mov n$显示值数字化数量 10
155
inc n$显示值数字化数量 1
156
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
157
goto <notextile>@</notextile>设置红包
158
break
159
&nbsp;
160
#if
161
#act
162
mov n$显示值数字化数量 <$str(n$发红包数量显示值)>
163
inc n$显示值数字化数量 1
164
mov n$发红包数量显示值 <$str(n$显示值数字化数量)>
165
goto <notextile>@</notextile>设置红包
166
&nbsp;
167
&nbsp;
168
[<notextile>@</notextile>submitinput]
169
%{color:lightGrey};触发提交时,如果未输入过任何内容,则返回值为空格%
170
#if
171
equal " " <$str(s1)>
172
#act
173
mov s1 <$str(n$发红包金额显示值)>
174
&nbsp;
175
#if
176
equal " " <$str(s2)>
177
#act
178
mov s2 <$str(n$发红包数量显示值)>
179
&nbsp;
180
%{color:lightGrey};今日剩余可发灵符不足时,弹出提示%
181
#act
182
mov n$新红包金额 <$str(s1)>
183
&nbsp;
184
#if
185
large n$新红包金额 u$今日剩余可发灵符
186
#act
187
messageBox 今日剩余可发灵符不足
188
break
189
&nbsp;
190
#if
191
small n$新红包金额 1000
192
#act
193
messageBox 红包金额最少需要1000灵符
194
break
195
&nbsp;
196
#if
197
small n$新红包数量 10
198
#act
199
messageBox 红包数量最少10个
200
break
201
&nbsp;
202
#if
203
#act
204
mov n$新红包金额 <$str(s1)>
205
%{color:lightGrey};更新今日剩余可发灵符%
206
dec u$今日剩余可发灵符 n$新红包金额
207
%{color:lightGrey};扣除灵符%
208
gameGird - <$str(s1)>
209
%{color:lightGrey};添加新红包数据,时间戳,发放者角色名,红包总金额,红包数量%
210
mov s$新红包数据 <$timeStamp>|<$userName>|<$str(s1)>|<$str(s2)>|:
211
inc s$新红包数据 <$guild2(行会红包)>
212
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$新红包数据)>
213
%{color:lightGrey};更新自己发出的红包列表,过期退还红包余额时用%
214
mov s1 <$str(t$自己发出的红包列表)>
215
inc s1 <$timeStamp>|
216
mov t$自己发出的红包列表 <$str(s1)> 
217
sendMsg 6 发送红包成功
218
%{color:lightGrey};重新加载红包列表界面%
219
goto <notextile>@</notextile>main
220
&nbsp;
221
&nbsp;
222
[<notextile>@</notextile>生成红包列表]
223
%{color:lightGrey};获取全部的行会红包,包括不能领取的%
224
#act
225
mov s$红包列表含已领取 <$guild2(行会红包)>
226
*{color:green}[[pgExtractString]]* : s$红包列表含已领取 s$红包列表含已领取分割后 n$行会红包总数
227
mov n$红包计数器 1
228
&nbsp;
229
%{color:lightGrey};循环取出列表中各红包的时间戳%
230
#if loop n$行会红包总数
231
#act
232
%{color:lightGrey};取出单个红包数据%
233
mov n$var <$str(n$红包计数器)>
234
*{color:green}[[getListValue]]* s$红包列表含已领取分割后 <$str(n$var)> s$红包
235
%{color:lightGrey};取出红包的时间戳%
236
*{color:green}[[pgExtractString]]* | <$str(s$红包)> s$红包分割后 n$红包分割后
237
mov n$var 1
238
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包的时间戳
239
goto <notextile>@</notextile>过滤红包
240
inc n$红包计数器 1
241
&nbsp;
242
&nbsp;
243
[<notextile>@</notextile>过滤红包]
244
%{color:lightGrey};列表不展示自己已经领取过的行会红包,列表不展示发出超过24小时的行会红包%
245
%{color:lightGrey};检测时间戳是否在自己领过的红包列表中,检测时间戳与当前时间的差值是否大于24小时%
246
#act
247
mov n$var1 <$timeStamp>
248
mov n$var2 <$str(s$红包的时间戳)>
249
dec n$var1 n$var2
250
div n$发出多少小时 n$var1 3600
251
&nbsp;
252
#or
253
*{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$红包的时间戳
254
not small n$发出多少小时 24
255
#act
256
mov s$tmp
257
*{color:green}[[ansiReplaceText]]* s$红包列表含已领取 <$str(s$红包)>: s$tmp
258
mov s$红包列表 <$str(s$红包列表含已领取)>
259
#elseact
260
mov s$红包列表 <$str(s$红包列表含已领取)>
261
&nbsp;
262
&nbsp;
263
[<notextile>@</notextile>红包数据]
264
#act
265
*{color:green}[[pgExtractString]]* : s$红包列表 s$红包列表分割后 n$行会红包总数
266
&nbsp;
267
%{color:lightGrey};没有可领取的红包%
268
#if
269
equal n$行会红包总数 0
270
#act
271
mov s$itemList 
272
&nbsp;
273
%{color:lightGrey};红包界面第1个红包%
274
#if
275
large n$行会红包总数 0
276
#act
277
mov n$var 1
278
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包1
279
*{color:green}[[pgExtractString]]* | <$str(s$红包1)> s$红包分割后 n$红包分割数
280
mov n$var 2
281
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
282
mov s$item1 (<itemindex:1>
283
inc s$item1 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(1)>
284
inc s$item1 <Img:lc_qiang:100:250:1>
285
inc s$item1 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
286
inc s$item1 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
287
mov s$itemList <$str(s$item1)>
288
&nbsp;
289
%{color:lightGrey};红包界面第2个红包%
290
#if
291
large n$行会红包总数 1
292
#act
293
mov n$var 2
294
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包2
295
*{color:green}[[pgExtractString]]* | <$str(s$红包2)> s$红包分割后 n$红包分割数
296
mov n$var 2
297
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
298
mov s$item2 (<itemindex:2>
299
inc s$item2 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(2)>
300
inc s$item2 <Img:lc_qiang:100:250:1>
301
inc s$item2 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
302
inc s$item2 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
303
inc s$itemList <$str(s$item2)>
304
&nbsp;
305
%{color:lightGrey};红包界面第3个红包%
306
#if
307
large n$行会红包总数 2
308
#act
309
mov n$var 3
310
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包3
311
*{color:green}[[pgExtractString]]* | <$str(s$红包3)> s$红包分割后 n$红包分割数
312
mov n$var 2
313
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
314
mov s$item3 (<itemindex:3>
315
inc s$item3 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(3)>
316
inc s$item3 <Img:lc_qiang:100:250:1>
317
inc s$item3 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
318
inc s$item3 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
319
inc s$itemList <$str(s$item3)>
320
&nbsp;
321
%{color:lightGrey};红包界面第4个红包%
322
#if
323
large n$行会红包总数 3
324
#act
325
mov n$var 4
326
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包4
327
*{color:green}[[pgExtractString]]* | <$str(s$红包4)> s$红包分割后 n$红包分割数
328
mov n$var 2
329
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
330
mov s$item4 (<itemindex:4>
331
inc s$item4 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(4)>
332
inc s$item4 <Img:lc_qiang:100:250:1>
333
inc s$item4 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
334
inc s$item4 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
335
inc s$itemList <$str(s$item4)>
336
&nbsp;
337
%{color:lightGrey};红包界面第5个红包%
338
#if
339
large n$行会红包总数 4
340
#act
341
mov n$var 5
342
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包5
343
*{color:green}[[pgExtractString]]* | <$str(s$红包5)> s$红包分割后 n$红包分割数
344
mov n$var 2
345
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
346
mov s$item5 (<itemindex:5>
347
inc s$item5 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(5)>
348
inc s$item5 <Img:lc_qiang:100:250:1>
349
inc s$item5 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
350
inc s$item5 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
351
inc s$itemList <$str(s$item5)>
352
&nbsp;
353
%{color:lightGrey};红包界面第6个红包%
354
#if
355
large n$行会红包总数 5
356
#act
357
mov n$var 6
358
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包6
359
*{color:green}[[pgExtractString]]* | <$str(s$红包6)> s$红包分割后 n$红包分割数
360
mov n$var 2
361
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
362
mov s$item6 (<itemindex:6>
363
inc s$item6 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(6)>
364
inc s$item6 <Img:lc_qiang:100:250:1>
365
inc s$item6 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
366
inc s$item6 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
367
inc s$itemList <$str(s$item6)>
368
&nbsp;
369
%{color:lightGrey};红包界面第7个红包%
370
#if
371
large n$行会红包总数 6
372
#act
373
mov n$var 7
374
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包7
375
*{color:green}[[pgExtractString]]* | <$str(s$红包7)> s$红包分割后 n$红包分割数
376
mov n$var 2
377
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
378
mov s$item7 (<itemindex:7>
379
inc s$item7 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(7)>
380
inc s$item7 <Img:lc_qiang:100:250:1>
381
inc s$item7 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
382
inc s$item7 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
383
inc s$itemList <$str(s$item7)>
384
&nbsp;
385
%{color:lightGrey};红包界面第8个红包%
386
#if
387
large n$行会红包总数 7
388
#act
389
mov n$var 8
390
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$红包8
391
*{color:green}[[pgExtractString]]* | <$str(s$红包8)> s$红包分割后 n$红包分割数
392
mov n$var 2
393
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$红包角色名
394
mov s$item8 (<itemindex:8>
395
inc s$item8 <Img:lc_hongbao_01:25:10:1/<notextile>@</notextile>领取红包(8)>
396
inc s$item8 <Img:lc_qiang:100:250:1>
397
inc s$item8 <text:<$str(s$红包角色名)>的红包{scolor=151}:60:55>
398
inc s$item8 <text:恭喜发财,大吉大利{scolor=151}:35:175>)
399
inc s$itemList <$str(s$item8)>
400
&nbsp;
401
&nbsp;
402
[<notextile>@</notextile>领取红包]
403
#if
404
#act
405
%{color:lightGrey};取出单个红包的数据%
406
mov n$var <$scriptParam1>
407
*{color:green}[[getListValue]]* s$红包列表分割后 <$str(n$var)> s$点的红包
408
*{color:green}[[pgExtractString]]* | <$str(s$点的红包)> s$红包分割后 n$红包分割数
409
%{color:lightGrey};取出红包的金额和数量%
410
mov n$var 1
411
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包时间戳
412
mov n$var 3
413
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包金额
414
mov n$var 4
415
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$点的红包数量
416
mov n1 <$str(s$点的红包金额)>
417
mov n2 <$str(s$点的红包数量)>
418
&nbsp;
419
%{color:lightGrey};随机获得红包奖励%
420
%{color:lightGrey};如果红包数量大于1,领取后更新该红包%
421
#if
422
large n2 1
423
%{color:lightGrey};领过的红包不能再领%
424
not *{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$点的红包时间戳
425
#act
426
div n$当前平均值 n1 n2
427
mul n$当前平均值的2倍 n$当前平均值 2
428
%{color:lightGrey};一个行会红包只能再领2次时,最后1个玩家至少可以领取1个货币%
429
dec n$当前平均值的2倍 1
430
movr n$随机红包领取值 1 n$当前平均值的2倍
431
dec n1 n$随机红包领取值
432
dec n2 1
433
mov s1 <$str(s$红包分割后_1)>|<$str(s$红包分割后_2)>|<$str(n1)>|<$str(n2)>|
434
mov s$红包列表 <$guild2(行会红包)>
435
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$点的红包)> <$str(s1)>
436
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
437
gameGird + n$随机红包领取值
438
sendtipsmsg 恭喜你抢到了<$str(n$随机红包领取值)>灵符的红包
439
mov s1 <$str(t$自己领过的红包列表)>
440
inc s1 <$str(s$点的红包时间戳)>|
441
mov t$自己领过的红包列表 <$str(s1)> 
442
goto <notextile>@</notextile>main
443
&nbsp;
444
%{color:lightGrey};一个行会红包只能再领1次时,领取后删除该红包%
445
#if
446
equal n2 1
447
%{color:lightGrey};自己领过的红包不能再领%
448
not *{color:green}[[checkContainsText]]* t$自己领过的红包列表 s$点的红包时间戳
449
#act
450
mov s$tmp
451
mov s$红包列表 <$guild2(行会红包)>
452
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$点的红包)>: s$tmp
453
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
454
gameGird + n1
455
sendtipsmsg 恭喜你抢到了<$str(n1)>灵符的红包
456
goto <notextile>@</notextile>main
457
&nbsp;
458
&nbsp;
459
[<notextile>@</notextile>返还过期红包]
460
%{color:lightGrey};循环取出自己发出的红包%
461
#act
462
*{color:green}[[pgExtractString]]* | <$str(t$自己发出的红包列表)> s1 n1
463
mov n$红包计数器 1
464
&nbsp;
465
%{color:lightGrey};循环取出自己发红包列表中红包的时间戳%
466
#if loop n1
467
#act
468
%{color:lightGrey};取出时间戳%
469
mov n$var <$str(n$红包计数器)>
470
*{color:green}[[getListValue]]* s1 <$str(n$var)> s$红包的时间戳
471
goto <notextile>@</notextile>过期处理
472
inc n$红包计数器 1
473
&nbsp;
474
%{color:lightGrey};返还过期的红包%
475
#if
476
large u$过期返还的红包金额 0
477
#act
478
messageBox 您发出的行会红包超过24小时仍未领完\现将未领取的红包退还\共退还<$str(u$过期返还的红包金额)>灵符
479
gameGird + u$过期返还的红包金额
480
sendMsg 6 你获得了退还的<$str(u$过期返还的红包金额)>灵符
481
mov u$过期返还的红包金额 0
482
&nbsp;
483
&nbsp;
484
[<notextile>@</notextile>过期处理]
485
%{color:lightGrey};根据时间戳判断该红包是否过期%
486
#act
487
mov n$var1 <$timeStamp>
488
mov n$var2 <$str(s$红包的时间戳)>
489
dec n$var1 n$var2
490
div n$发出多少小时 n$var1 3600
491
&nbsp;
492
#if
493
not small n$发出多少小时 24
494
#act
495
%{color:lightGrey};从发红包数据中删除该红包%
496
mov s$tmp
497
*{color:green}[[ansiReplaceText]]* t$自己发出的红包列表 <$str(s$红包的时间戳)>| s$tmp
498
goto <notextile>@</notextile>找出仍在行会红包中的
499
&nbsp;
500
%{color:lightGrey};过期并且依然存在于行会红包中的,找出来%
501
[<notextile>@</notextile>找出仍在行会红包中的]
502
#act
503
%{color:lightGrey};获取全部的行会红包%
504
mov s$红包列表含已领取 <$guild2(行会红包)>
505
*{color:green}[[pgExtractString]]* : s$红包列表含已领取 s$红包列表含已领取分割后 n$行会红包总数
506
&nbsp;
507
#if
508
*{color:green}[[checkContainsText]]* s$红包列表含已领取 s$红包的时间戳
509
#act
510
mov n$红包计数器2号 1
511
%{color:lightGrey};循环取出列表中红包们的时间戳%
512
#if loop n$行会红包总数
513
#act
514
%{color:lightGrey};取出红包%
515
mov n$var <$str(n$红包计数器2号)>
516
*{color:green}[[getListValue]]* s$红包列表含已领取分割后 <$str(n$var)> s$红包
517
*{color:green}[[pgExtractString]]* | <$str(s$红包)> s$红包分割后 n$红包分割后
518
%{color:lightGrey};取出红包的时间戳%
519
mov n$var 1
520
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$行会红包的时间戳
521
%{color:lightGrey};取出红包的红包金额%
522
mov n$var 3
523
*{color:green}[[getListValue]]* s$红包分割后 <$str(n$var)> s$行会红包金额
524
goto <notextile>@</notextile>处理仍在行会红包中的
525
inc n$红包计数器2号 1
526
&nbsp;
527
&nbsp;
528
%{color:lightGrey};将红包余额存个人变量,再从行会红包中删除%
529
[<notextile>@</notextile>处理仍在行会红包中的]
530
#if
531
*{color:green}[[CompareText]]* s$红包的时间戳 s$行会红包的时间戳
532
#act
533
%{color:lightGrey};将红包余额存变量%
534
mov n$var <$str(s$行会红包金额)>
535
inc u$过期返还的红包金额 n$var
536
%{color:lightGrey};从行会红包中删除该红包%
537
mov s$tmp
538
mov s$红包列表 <$guild2(行会红包)>
539
*{color:green}[[ansiReplaceText]]* s$红包列表 <$str(s$红包)>: s$tmp
540
*{color:green}[[calcVar]]* guild2 行会红包 = <$str(s$红包列表)>
541
&nbsp;
542
&nbsp;
543
%{color:lightGrey};自己领红包数据中,删除时间超过24小时的红包%
544
[<notextile>@</notextile>更新领红包数据]
545
%{color:lightGrey};循环取出自己领取的红包%
546
#act
547
*{color:green}[[pgExtractString]]* | <$str(t$自己领过的红包列表)> s1 n1
548
mov n$红包计数器 1
549
&nbsp;
550
%{color:lightGrey};循环取出自己领取红包列表中红包的时间戳%
551
#if loop n1
552
#act
553
%{color:lightGrey};取出时间戳%
554
mov n$var <$str(n$红包计数器)>
555
*{color:green}[[getListValue]]* s1 <$str(n$var)> s$红包的时间戳
556
goto <notextile>@</notextile>领红包过期处理
557
inc n$红包计数器 1
558
&nbsp;
559
&nbsp;
560
[<notextile>@</notextile>领红包过期处理]
561
%{color:lightGrey};根据时间戳判断该红包是否过期%
562
#act
563
mov n$var1 <$timeStamp>
564
mov n$var2 <$str(s$红包的时间戳)>
565
dec n$var1 n$var2
566
div n$发出多少小时 n$var1 3600
567
&nbsp;
568
#if
569
not small n$发出多少小时 24
570
#act
571
%{color:lightGrey};从领红包数据中删除该红包%
572
mov s$tmp
573
*{color:green}[[ansiReplaceText]]* t$自己领过的红包列表 <$str(s$红包的时间戳)>| s$tmp
574
&nbsp;
575
&nbsp;
576
&nbsp;
577
%{color:lightGrey};..\Mir200\Envir\MapQuest_def\QManage.txt%
578
[<notextile>@</notextile>Login]
579
#if
580
%{color:lightGrey};登陆时返还过期红包%
581
#call [\行会红包\行会红包.txt] <notextile>@</notextile>返还过期红包
582
%{color:lightGrey};登陆时,自己领红包数据中,删除时间超过24小时的红包%
583
#call [\行会红包\行会红包.txt] <notextile>@</notextile>更新领红包数据
584
&nbsp;
585
%{color:lightGrey};每日首次登陆时重置每日数据%
586
#if
587
CHECKLOGINCOUNT = 1
588
#ACT
589
mov u$今日剩余可发灵符 10000000