项目

一般

简介

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

chenjun, 2022-06-01 18:40

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