[传奇技术]自写脚本免费分享-捡到更强的装备则向玩家提示

源码资源网

[传奇技术]自写脚本免费分享-捡到更强的装备则向玩家提示

[传奇技术]自写脚本免费分享-捡到更强的装备则向玩家提示

优点:

使用了热血传奇官方十周年自带ui,安全健康绿色环保(ui_n.wzl)
具有装备位置判断,是武器就比较捡起的武器和正在使用的武器
具有职业判断,比如角色是法师,就比较捡起的装备和地上的装备两者的魔法攻击力
具有等级判断,如果等级太高则不弹出提示框
具有性别判断(衣服),比如男角色捡起女衣服时不会弹出

建议有一定脚本基础的人根据以下提示使用脚本:
将此脚本安装于QF中,作为捡取事件[@PickUpItemEX]中的一部分
演示图片中对话框里的图片素材需要自己调整,不会的话请自行搜索或请教他人
演示图片中的对话框,位置是可调的,只需找到OPENMERCHANTBIGDLG语句,修改它的第五第六个参数(是X,Y的微调参数)
脚本中使用了变量P0P1P2S0S1S2等,其实是很不建议这么做的;请在文本编辑器内使用ctrl+h,把每个变量替换成你想用的变量(建议自定义变量,比如n$捡起并比较0,S$捡起并比较0等
请注意和其他脚本冲突的情况.比如这个脚本放在拾取鉴定脚本之后继续执行才比较合适

扩展须知:
此脚本只认装备的攻击力魔法力和精神力值(先看最大值再看最小值),如果想加入其他属性的比较(比如防御)...就自个看着办吧
此脚本只认等级大小的判断,如果想加入其他判断,比如职业&等级那种...还是自个看着办吧,但比上一个简单

以上功能是可以做到的,但脚本技术上和逻辑上稍微有些难度,,萌新可能搞不定


目前没有发现Bug,如果有bug请在帖子里反馈,我会及时修改
脚本:

1. [@PickUpItemEX]
   
2. 
   
3. #act
   
4. 
   
5. LINKPICKUPITEM
   
6. 
   
7. mov p0 0
   
8. 
   
9. GetItemFieldValue -1 needlevel p0
   
10. 
    
11. GetItemFieldValue -1 need p1
    
12. 
    
13. #if
    
14. 
    
15. equal p1 0
    
16. 
    
17. small <$Level> <$STR(P0)>
    
18. 
    
19. #act
    
20. 
    
21. break
    
22. 
    
23. #elseact
    
24. 
    
25. mov p0 0
    
26. 
    
27. GetItemFieldValue -1 stdmode p0
    
28. 
    
29. #if
    
30. 
    
31. equal <$GENDER> 0
    
32. 
    
33. equal <$STR(P0)> 10
    
34. 
    
35. #act
    
36. 
    
37. goto @捡物比较(0,<$Job>)
    
38. 
    
39. #if
    
40. 
    
41. equal <$GENDER> 1
    
42. 
    
43. equal <$STR(P0)> 11
    
44. 
    
45. #act
    
46. 
    
47. goto @捡物比较(0,<$Job>)
    
48. 
    
49. #or
    
50. 
    
51. equal <$STR(P0)> 5
    
52. 
    
53. equal <$STR(P0)> 6
    
54. 
    
55. #act
    
56. 
    
57. goto @捡物比较(1,<$Job>)
    
58. 
    
59. #if
    
60. 
    
61. equal <$STR(P0)> 30
    
62. 
    
63. #act
    
64. 
    
65. goto @捡物比较(2,<$Job>)
    
66. 
    
67. #or
    
68. 
    
69. equal <$STR(P0)> 19
    
70. 
    
71. equal <$STR(P0)> 20
    
72. 
    
73. equal <$STR(P0)> 21
    
74. 
    
75. #act
    
76. 
    
77. goto @捡物比较(3,<$Job>)
    
78. 
    
79. #or
    
80. 
    
81. equal <$STR(P0)> 15
    
82. 
    
83. #act
    
84. 
    
85. goto @捡物比较(4,<$Job>)
    
86. 
    
87. #or
    
88. 
    
89. equal <$STR(P0)> 24
    
90. 
    
91. equal <$STR(P0)> 26
    
92. 
    
93. #act
    
94. 
    
95. goto @捡物比较(5,<$Job>)
    
96. 
    
97. #or
    
98. 
    
99. equal <$STR(P0)> 22
    
100. 
     
101. equal <$STR(P0)> 23
     
102. 
     
103. #act
     
104. 
     
105. goto @捡物比较(7,<$Job>)
     
106. 
     
107. #if
     
108. 
     
109. equal <$STR(P0)> 25
     
110. 
     
111. #act
     
112. 
     
113. goto @捡物比较(9,<$Job>)
     
114. 
     
115. #if
     
116. 
     
117. equal <$STR(P0)> 64
     
118. 
     
119. #act
     
120. 
     
121. goto @捡物比较(10,<$Job>)
     
122. 
     
123. #if
     
124. 
     
125. equal <$STR(P0)> 62
     
126. 
     
127. #act
     
128. 
     
129. goto @捡物比较(11,<$Job>)
     
130. 
     
131. #if
     
132. 
     
133. equal <$STR(P0)> 63
     
134. 
     
135. #act
     
136. 
     
137. goto @捡物比较(12,<$Job>)
     
138. 
     
139. [@捡物比较]
     
140. 
     
141. #act
     
142. 
     
143. mov p0 <$SCRIPTPARAM1>
     
144. 
     
145. mov p1 <$SCRIPTPARAM2>
     
146. 
     
147. #if
     
148. 
     
149. equal p1 0
     
150. 
     
151. #act
     
152. 
     
153. mov s0 dc
     
154. 
     
155. #if
     
156. 
     
157. equal p1 1
     
158. 
     
159. #act
     
160. 
     
161. mov s0 mc
     
162. 
     
163. #if
     
164. 
     
165. equal p1 2
     
166. 
     
167. #act
     
168. 
     
169. mov s0 sc
     
170. 
     
171. #if
     
172. 
     
173. #act
     
174. 
     
175. MOV p1 0
     
176. 
     
177. mov p2 0
     
178. 
     
179. GetItemFieldValue -1 h<$STR(S0)> p1
     
180. 
     
181. GetItemFieldValue <$SCRIPTPARAM1> h<$STR(S0)> p2
     
182. 
     
183. #if
     
184. 
     
185. large p1 <$STR(P2)>
     
186. 
     
187. #act
     
188. 
     
189. goto @捡物对话框提示
     
190. 
     
191. break
     
192. 
     
193. #elseact
     
194. 
     
195. GetItemFieldValue -1 1<$STR(S0)> p1
     
196. 
     
197. GetItemFieldValue <$SCRIPTPARAM1> 1<$STR(S0)> p2
     
198. 
     
199. #if
     
200. 
     
201. large p1 <$STR(P2)>
     
202. 
     
203. #act
     
204. 
     
205. goto @捡物对话框提示
     
206. 
     
207. break
     
208. 
     
209. #or
     
210. 
     
211. equal p0 5
     
212. 
     
213. equal p0 7
     
214. 
     
215. #act
     
216. 
     
217. inc p0 1
     
218. 
     
219. goto @捡物比较(<$STR(P0)>,<$Job>)
     
220. 
     
221. [@捡物对话框提示]
     
222. 
     
223. #act
     
224. 
     
225. OPENMERCHANTBIGDLG 1 1590 0 3 -100 -250 1 380 3 0
     
226. 
     
227. mov s1 无
     
228. 
     
229. mov s2 无
     
230. 
     
231. GetItemFieldValue -1 name_g s1
     
232. 
     
233. GetUserItemName <$STR(P0)> S2
     
234. 
     
235. GetItemFieldValue -1 idx p1
     
236. 
     
237. clearLinkItem
     
238. 
     
239. mov s0 <ItemShow:<$STR(P1)>:0:18:23:0:3>
     
240. 
     
241. inc s0
     
242. 
     
243. MOV S3 <ImgEx:1:1668:1669:1670:5:-25:/@捡物换装备(
     
244. 
     
245. INC S3 <$STR(S1)>,<$STR(P0)>)>
     
246. 
     
247. #say
     
248. 
     
249. <$STR(S0)>
     
250. 
     
251. 　　　　　　恭喜你获得更强的装备[<$STR(S1)>]
     
252. 
     
253. 　　　　　　是否替换身上正在穿的[<$STR(S2)>]?
     
254. 
     
255. 　　　　　　　　　　是　　　　　　　　　　否
     
256. 
     
257. 　　　　　　　<$STR(S3)>　　　　<ImgEx:1:1668:1669:1670:12:-25:/@EXIT>
     
258. 
     
259. [@捡物换装备]
     
260. 
     
261. #act
     
262. 
     
263. close
     
264. 
     
265. mov s0 <$SCRIPTPARAM1>
     
266. 
     
267. mov p0 <$SCRIPTPARAM2>
     
268. 
     
269. #if
     
270. 
     
271. CheckItem <$STR(S0)> 1 0 1
     
272. 
     
273. #act
     
274. 
     
275. TakeOnItem <$STR(S0)> <$STR(p0)>
     
276. 
     
277. #elseact
     
278. 
     
279. sendmsg 5 你的背包里已没有此装备!

复制代码

20201215最新更新

优化了脚本(减少变量的占用,和解除一了不必要的装备绑定状态)
因为好多人都在给我赞,所以我受到了鼓励!
然后就花了很多精力来优化它

1. 
   
2. [@PickUpItemEX]
   
3. 
   
4. #act
   
5. 
   
6. LINKPICKUPITEM
   
7. 
   
8. mov p0 0
   
9. 
   
10. GetItemFieldValue -1 needlevel p0
    
11. 
    
12. GetItemFieldValue -1 need p1
    
13. 
    
14. #if
    
15. 
    
16. equal p1 0
    
17. 
    
18. small <$Level> <$STR(P0)>
    
19. 
    
20. #act
    
21. 
    
22. updateitem -1
    
23. 
    
24. clearLinkItem
    
25. 
    
26. break
    
27. 
    
28. #elseact
    
29. 
    
30. mov p0 0
    
31. 
    
32. GetItemFieldValue -1 stdmode p0
    
33. 
    
34. #if
    
35. 
    
36. equal <$GENDER> 0
    
37. 
    
38. equal <$STR(P0)> 10
    
39. 
    
40. #act
    
41. 
    
42. goto @捡物比较(0)
    
43. 
    
44. break
    
45. 
    
46. #if
    
47. 
    
48. equal <$GENDER> 1
    
49. 
    
50. equal <$STR(P0)> 11
    
51. 
    
52. #act
    
53. 
    
54. goto @捡物比较(0)
    
55. 
    
56. break
    
57. 
    
58. #or
    
59. 
    
60. equal <$STR(P0)> 5
    
61. 
    
62. equal <$STR(P0)> 6
    
63. 
    
64. #act
    
65. 
    
66. goto @捡物比较(1)
    
67. 
    
68. break
    
69. 
    
70. #if
    
71. 
    
72. equal <$STR(P0)> 30
    
73. 
    
74. #act
    
75. 
    
76. goto @捡物比较(2)
    
77. 
    
78. break
    
79. 
    
80. #or
    
81. 
    
82. equal <$STR(P0)> 19
    
83. 
    
84. equal <$STR(P0)> 20
    
85. 
    
86. equal <$STR(P0)> 21
    
87. 
    
88. #act
    
89. 
    
90. goto @捡物比较(3)
    
91. 
    
92. break
    
93. 
    
94. #or
    
95. 
    
96. equal <$STR(P0)> 15
    
97. 
    
98. #act
    
99. 
    
100. goto @捡物比较(4)
     
101. 
     
102. break
     
103. 
     
104. #or
     
105. 
     
106. equal <$STR(P0)> 24
     
107. 
     
108. equal <$STR(P0)> 26
     
109. 
     
110. #act
     
111. 
     
112. goto @捡物比较(5)
     
113. 
     
114. break
     
115. 
     
116. #or
     
117. 
     
118. equal <$STR(P0)> 22
     
119. 
     
120. equal <$STR(P0)> 23
     
121. 
     
122. #act
     
123. 
     
124. goto @捡物比较(7)
     
125. 
     
126. break
     
127. 
     
128. #if
     
129. 
     
130. equal <$STR(P0)> 25
     
131. 
     
132. #act
     
133. 
     
134. goto @捡物比较(9)
     
135. 
     
136. break
     
137. 
     
138. #if
     
139. 
     
140. equal <$STR(P0)> 64
     
141. 
     
142. #act
     
143. 
     
144. goto @捡物比较(10)
     
145. 
     
146. break
     
147. 
     
148. #if
     
149. 
     
150. equal <$STR(P0)> 62
     
151. 
     
152. #act
     
153. 
     
154. goto @捡物比较(11)
     
155. 
     
156. break
     
157. 
     
158. #if
     
159. 
     
160. equal <$STR(P0)> 63
     
161. 
     
162. #act
     
163. 
     
164. goto @捡物比较(12)
     
165. 
     
166. break
     
167. 
     
168. [@捡物比较]
     
169. 
     
170. #act
     
171. 
     
172. mov p0 <$SCRIPTPARAM1>
     
173. 
     
174. #if
     
175. 
     
176. equal <$Job> 0
     
177. 
     
178. #act
     
179. 
     
180. mov s0 dc
     
181. 
     
182. #if
     
183. 
     
184. equal <$Job> 1
     
185. 
     
186. #act
     
187. 
     
188. mov s0 mc
     
189. 
     
190. #if
     
191. 
     
192. equal <$Job> 2
     
193. 
     
194. #act
     
195. 
     
196. mov s0 sc
     
197. 
     
198. #if
     
199. 
     
200. #act
     
201. 
     
202. MOV p1 0
     
203. 
     
204. mov p2 0
     
205. 
     
206. GetItemFieldValue -1 h<$STR(S0)> p1
     
207. 
     
208. GetItemFieldValue <$SCRIPTPARAM1> h<$STR(S0)> p2
     
209. 
     
210. #if
     
211. 
     
212. large p1 <$STR(P2)>
     
213. 
     
214. #act
     
215. 
     
216. goto @捡物对话框提示
     
217. 
     
218. break
     
219. 
     
220. #elseact
     
221. 
     
222. GetItemFieldValue -1 1<$STR(S0)> p3
     
223. 
     
224. inc p1 <$STR(p3)>
     
225. 
     
226. GetItemFieldValue <$SCRIPTPARAM1> 1<$STR(S0)> p3
     
227. 
     
228. inc p2 <$STR(p3)>
     
229. 
     
230. #if
     
231. 
     
232. large p1 <$STR(P2)>
     
233. 
     
234. #act
     
235. 
     
236. goto @捡物对话框提示
     
237. 
     
238. break
     
239. 
     
240. #or
     
241. 
     
242. equal p0 5
     
243. 
     
244. equal p0 7
     
245. 
     
246. #act
     
247. 
     
248. inc p0 1
     
249. 
     
250. goto @捡物比较(<$STR(P0)>)
     
251. 
     
252. #elseact
     
253. 
     
254. updateitem -1
     
255. 
     
256. clearLinkItem
     
257. 
     
258. [@捡物对话框提示]
     
259. 
     
260. #act
     
261. 
     
262. OPENMERCHANTBIGDLG 1 1590 0 3 -100 -250 1 380 3 0
     
263. 
     
264. mov s1 无
     
265. 
     
266. mov s2 无
     
267. 
     
268. GetItemFieldValue -1 name_g s1
     
269. 
     
270. GetUserItemName <$STR(P0)> S2
     
271. 
     
272. GetItemFieldValue -1 idx p1
     
273. 
     
274. updateitem -1
     
275. 
     
276. clearLinkItem
     
277. 
     
278. mov s0 <ItemShow:<$STR(P1)>:0:18:23:0:3>
     
279. 
     
280. inc s0
     
281. 
     
282. MOV S3 <ImgEx:1:1668:1669:1670:5:-25:/@捡物换装备(
     
283. 
     
284. INC S3 <$STR(S1)>,<$STR(P0)>)>
     
285. 
     
286. #say
     
287. 
     
288. <$STR(S0)>
     
289. 
     
290. 　　　　　　恭喜你获得新装备[<$STR(S1)>]
     
291. 
     
292. 　　　　　　是否替换身上的[<$STR(S2)>]?
     
293. 
     
294. 　　　　　　　　　　是　　　　　　　　　　否
     
295. 
     
296. 　　　　　　　<$STR(S3)>　　　　<ImgEx:1:1668:1669:1670:12:-25:/@EXIT>
     
297. 
     
298. [@捡物换装备]
     
299. 
     
300. #act
     
301. 
     
302. close
     
303. 
     
304. mov s0 <$SCRIPTPARAM1>
     
305. 
     
306. mov p0 <$SCRIPTPARAM2>
     
307. 
     
308. #if
     
309. 
     
310. CheckItem <$STR(S0)> 1 0 1
     
311. 
     
312. #act
     
313. 
     
314. TakeOnItem <$STR(S0)> <$STR(p0)>
     
315. 
     
316. #elseact
     
317. 
     
318. sendmsg 5 你的背包里已没有此装备!

复制代码