项目

一般

简介

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

chenjun, 2022-06-02 17:52

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