项目

一般

简介

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

chenjun, 2022-06-02 17:08

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