【全服过滤】动态界面脚本，可保存状态，可恢复状态

高启强

QM人物上线 CALL @ScriptLogin
QF 功能 CALL @ScriptEntry

自己排下版，我没排版。

1. [@FilterInit]
   
2. {
   
3. #if
   
4. #act
   
5. GetListVarCount L$按钮状态 P0
   
6. 
   
7. #if
   
8. EQUAL P0 0
   
9. #act
   
10. MOV L$按钮状态 <$STR(T90)>
    
11. 
    
12. #if
    
13. #act
    
14. MOV L$屏蔽信息 [屏蔽提示,屏蔽全局,屏蔽系统,屏蔽滚动]
    
15. MOV L$解除信息 [解除提示,解除全局,解除系统,解除滚动]
    
16. MOV N$按钮数量 4
    
17. MOV N$按钮下标 0
    
18. MOV N$默认状态 0
    
19. LoopGoto @FilterButtonInit <$STR(N$按钮数量)>
    
20. 
    
21. [@FilterButtonInit]
    
22. #if
    
23. #act
    
24. MOV S$FilterButton<$STR(N$按钮下标)> <<$STR(L$屏蔽信息[<$STR(N$按钮下标)>])>/@OnFilterButton(<$STR(N$按钮下标)>,1,9)>
    
25. 
    
26. #if
    
27. #act
    
28. INC N$按钮下标 1
    
29. }
    
30. 
    
31. [@ScriptLogin]
    
32. {
    
33. #if
    
34. #act
    
35. #CALLEx [..\QuestDiary\游戏功能\综合服务.txt] @FilterInit
    
36. #CALLEx [..\QuestDiary\游戏功能\综合服务.txt] @ResetFilterButton
    
37. }
    
38. 
    
39. [@ScriptEntry]
    
40. {
    
41. #if
    
42. #act
    
43. #CALLEx [..\QuestDiary\游戏功能\综合服务.txt] @FilterInit
    
44. #CALLEx [..\QuestDiary\游戏功能\综合服务.txt] @ResetFilterButton
    
45. #CALLEx [..\QuestDiary\游戏功能\综合服务.txt] @FilterMain
    
46. }
    
47. 
    
48. [@FilterMain]
    
49. {
    
50. #if
    
51. #act
    
52. CLOSEMERCHANTBIGDLG
    
53. MOV T90 <$STR(L$按钮状态)>
    
54. #say
    
55. ;<清空变量/@清空>\
    
56. <╔┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈╗/SCOLOR=13>\
    
57. <╠--------------------------------------------------------╣/SCOLOR=13>\
    
58. <┊/SCOLOR=13>        <$STR(S$FilterButton0)>        <$STR(S$FilterButton1)>        <$STR(S$FilterButton2)>        <┊/SCOLOR=13>\
    
59. <╠--------------------------------------------------------╣/SCOLOR=13>\
    
60. <┊/SCOLOR=13>        <$STR(S$FilterButton3)>               <┊/SCOLOR=13>\
    
61. <╚┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈╝/SCOLOR=13>\
    
62. 
    
63. [@清空]
    
64. #if
    
65. #act
    
66. MOV T90
    
67. MOV L$按钮状态
    
68. 
    
69. [@OnFilterButton]
    
70. #if
    
71. #act
    
72. MOV N$按钮下标 <$SCRIPTPARAM1>
    
73. MOV N$按钮状态 <$SCRIPTPARAM2>
    
74. 
    
75. #if
    
76. large N$按钮状态 1
    
77. small N$按钮状态 0
    
78. #act
    
79. SENDMSG 6 非法的参数1
    
80. break
    
81. 
    
82. #if
    
83. #act
    
84. SendMsg 6 Index:<$STR(N$按钮下标)>,State:<$STR(N$按钮状态)>
    
85. 
    
86. #if
    
87. CHECKSCRIPTPARAM <$STR(N$按钮下标)>,0,9
    
88. #act
    
89. RemoveListByContent L$按钮状态 <$STR(N$按钮下标)>
    
90. MOV S$FilterButton<$STR(N$按钮下标)> <<$STR(L$屏蔽信息[<$STR(N$按钮下标)>])>/@OnFilterButton(<$STR(N$按钮下标)>,1,9)>
    
91. 
    
92. #if
    
93. CHECKSCRIPTPARAM <$STR(N$按钮下标)>,1,9
    
94. #act
    
95. AddToList L$按钮状态 <$STR(N$按钮下标)>
    
96. MOV S$FilterButton<$STR(N$按钮下标)> <<$STR(L$解除信息[<$STR(N$按钮下标)>])>/@OnFilterButton(<$STR(N$按钮下标)>,0,9)>
    
97. 
    
98. #if
    
99. #act
    
100. GOTO @OnFilterButtonEvent(<$STR(N$按钮下标)>,<$STR(N$按钮状态)>)
     
101. GOTO @FilterMain
     
102. 
     
103. [@OnFilterButtonEvent]
     
104. #if
     
105. #act
     
106. MOV N$按钮下标 <$SCRIPTPARAM1>
     
107. MOV N$按钮状态 <$SCRIPTPARAM2>
     
108. 
     
109. #if
     
110. #act
     
111. MOV N$屏蔽类型 <$STR(N$按钮下标)>
     
112. INC N$屏蔽类型 1
     
113. 
     
114. #if
     
115. #act
     
116. ;SendMsg 6 屏蔽类型：<$STR(N$屏蔽类型)>，屏蔽状态：<$STR(N$按钮状态)>
     
117. 
     
118. #if
     
119. SMALL N$按钮下标 5
     
120. #act
     
121. FilterGlobalMsg <$STR(N$屏蔽类型)> <$STR(N$按钮状态)>
     
122. break
     
123. }
     
124. 
     
125. [@ResetFilterButton]
     
126. {
     
127. #if
     
128. #act
     
129. MOV N$按钮下标 0
     
130. LoopGoto @ResetFilterButtonLoop <$STR(N$按钮数量)>
     
131. 
     
132. [@ResetFilterButtonLoop]
     
133. #if
     
134. #act
     
135. MOV N$屏蔽类型 <$STR(N$按钮下标)>
     
136. INC N$屏蔽类型 1
     
137. 
     
138. #if
     
139. CheckVarInList L$按钮状态 <$STR(N$按钮下标)>
     
140. #act
     
141. MOV S$FilterButton<$STR(N$按钮下标)> <<$STR(L$解除信息[<$STR(N$按钮下标)>])>/@OnFilterButton(<$STR(N$按钮下标)>,0,9)>
     
142. FilterGlobalMsg <$STR(N$屏蔽类型)> 1
     
143. SendMsg 5 恢复按钮：<$STR(N$按钮下标)>
     
144. 
     
145. #if
     
146. #act
     
147. INC N$按钮下标 1
     
148. }

复制代码

zdmianfei8

不愧是鱼佬强锅

wtw120

【全服过滤】动态界面脚本，可保存状态，可恢复状态 [修改]

mkfx521

不愧是鱼佬强锅

mkfx521

不愧是鱼佬强锅

黑色蝙蝠

不愧是鱼佬强锅

zhwu530

了解，多谢分享！

一一

了解，多谢分享！