dishonor_of_seals.lua

main 506 lines · 19.3 KB Raw
Alex Alex Commit Server upload 18/10/2026 23:38
1SPELL_ID = 00
2local min = 0
3local max = 0
4
5-- =============== COMBAT VARS ===============
6-- Areas/Combat for 100ms
7local combat1_Brush = createCombatObject()
8setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
9setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
10setCombatArea(combat1_Brush,createCombatArea({{2, 0},
11{0, 1}}))
12function getDmg_Brush(cid, level, maglevel)
13
14 return -min, -max
15end
16setCombatCallback(combat1_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
17
18-- Areas/Combat for 0ms
19local combat0_Brush = createCombatObject()
20setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
21setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
22setCombatArea(combat0_Brush,createCombatArea({{2},
23{0},
24{1}}))
25function getDmg_Brush(cid, level, maglevel)
26
27 return -min, -max
28end
29setCombatCallback(combat0_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat0_Brush_2 = createCombatObject()
30setCombatParam(combat0_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
31setCombatParam(combat0_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
32setCombatArea(combat0_Brush_2,createCombatArea({{2},
33{1}}))
34function getDmg_Brush_2(cid, level, maglevel)
35
36 return -min, -max
37end
38setCombatCallback(combat0_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
39
40-- Areas/Combat for 200ms
41local combat2_Brush = createCombatObject()
42setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
43setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
44setCombatArea(combat2_Brush,createCombatArea({{2, 0, 1}}))
45function getDmg_Brush(cid, level, maglevel)
46
47 return -min, -max
48end
49setCombatCallback(combat2_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat2_Brush_2 = createCombatObject()
50setCombatParam(combat2_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
51setCombatParam(combat2_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
52setCombatArea(combat2_Brush_2,createCombatArea({{2, 1}}))
53function getDmg_Brush_2(cid, level, maglevel)
54
55 return -min, -max
56end
57setCombatCallback(combat2_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
58
59-- Areas/Combat for 300ms
60local combat3_Brush = createCombatObject()
61setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
62setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
63setCombatArea(combat3_Brush,createCombatArea({{0, 1},
64{2, 0}}))
65function getDmg_Brush(cid, level, maglevel)
66
67 return -min, -max
68end
69setCombatCallback(combat3_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
70
71-- Areas/Combat for 400ms
72local combat4_Brush = createCombatObject()
73setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
74setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
75setCombatArea(combat4_Brush,createCombatArea({{1},
76{0},
77{2}}))
78function getDmg_Brush(cid, level, maglevel)
79
80 return -min, -max
81end
82setCombatCallback(combat4_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat4_Brush_2 = createCombatObject()
83setCombatParam(combat4_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
84setCombatParam(combat4_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
85setCombatArea(combat4_Brush_2,createCombatArea({{1},
86{2}}))
87function getDmg_Brush_2(cid, level, maglevel)
88
89 return -min, -max
90end
91setCombatCallback(combat4_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
92
93-- Areas/Combat for 500ms
94local combat5_Brush = createCombatObject()
95setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
96setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
97setCombatArea(combat5_Brush,createCombatArea({{1, 0},
98{0, 2}}))
99function getDmg_Brush(cid, level, maglevel)
100
101 return -min, -max
102end
103setCombatCallback(combat5_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
104
105-- Areas/Combat for 600ms
106local combat6_Brush = createCombatObject()
107setCombatParam(combat6_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
108setCombatParam(combat6_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
109setCombatArea(combat6_Brush,createCombatArea({{1, 0, 2}}))
110function getDmg_Brush(cid, level, maglevel)
111
112 return -min, -max
113end
114setCombatCallback(combat6_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat6_Brush_2 = createCombatObject()
115setCombatParam(combat6_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
116setCombatParam(combat6_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
117setCombatArea(combat6_Brush_2,createCombatArea({{1, 2}}))
118function getDmg_Brush_2(cid, level, maglevel)
119
120 return -min, -max
121end
122setCombatCallback(combat6_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
123
124-- Areas/Combat for 700ms
125local combat7_Brush = createCombatObject()
126setCombatParam(combat7_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
127setCombatParam(combat7_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
128setCombatArea(combat7_Brush,createCombatArea({{0, 2},
129{1, 0}}))
130function getDmg_Brush(cid, level, maglevel)
131
132 return -min, -max
133end
134setCombatCallback(combat7_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
135
136-- Areas/Combat for 800ms
137local combat8_Brush = createCombatObject()
138setCombatParam(combat8_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
139setCombatParam(combat8_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
140setCombatArea(combat8_Brush,createCombatArea({{2},
141{0},
142{1}}))
143function getDmg_Brush(cid, level, maglevel)
144
145 return -min, -max
146end
147setCombatCallback(combat8_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat8_Brush_2 = createCombatObject()
148setCombatParam(combat8_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
149setCombatParam(combat8_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
150setCombatArea(combat8_Brush_2,createCombatArea({{2},
151{1}}))
152function getDmg_Brush_2(cid, level, maglevel)
153
154 return -min, -max
155end
156setCombatCallback(combat8_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
157
158-- Areas/Combat for 900ms
159local combat9_Brush = createCombatObject()
160setCombatParam(combat9_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
161setCombatParam(combat9_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
162setCombatArea(combat9_Brush,createCombatArea({{2, 0},
163{0, 1}}))
164function getDmg_Brush(cid, level, maglevel)
165
166 return -min, -max
167end
168setCombatCallback(combat9_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
169
170-- Areas/Combat for 1000ms
171local combat10_Brush = createCombatObject()
172setCombatParam(combat10_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
173setCombatParam(combat10_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
174setCombatArea(combat10_Brush,createCombatArea({{2, 0, 1}}))
175function getDmg_Brush(cid, level, maglevel)
176
177 return -min, -max
178end
179setCombatCallback(combat10_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat10_Brush_2 = createCombatObject()
180setCombatParam(combat10_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
181setCombatParam(combat10_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
182setCombatArea(combat10_Brush_2,createCombatArea({{2, 1}}))
183function getDmg_Brush_2(cid, level, maglevel)
184
185 return -min, -max
186end
187setCombatCallback(combat10_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
188
189-- Areas/Combat for 1100ms
190local combat11_Brush = createCombatObject()
191setCombatParam(combat11_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
192setCombatParam(combat11_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
193setCombatArea(combat11_Brush,createCombatArea({{0, 1},
194{2, 0}}))
195function getDmg_Brush(cid, level, maglevel)
196
197 return -min, -max
198end
199setCombatCallback(combat11_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
200
201-- Areas/Combat for 1200ms
202local combat12_Brush = createCombatObject()
203setCombatParam(combat12_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
204setCombatParam(combat12_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
205setCombatArea(combat12_Brush,createCombatArea({{1},
206{0},
207{2}}))
208function getDmg_Brush(cid, level, maglevel)
209
210 return -min, -max
211end
212setCombatCallback(combat12_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat12_Brush_2 = createCombatObject()
213setCombatParam(combat12_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
214setCombatParam(combat12_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
215setCombatArea(combat12_Brush_2,createCombatArea({{1},
216{2}}))
217function getDmg_Brush_2(cid, level, maglevel)
218
219 return -min, -max
220end
221setCombatCallback(combat12_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
222
223-- Areas/Combat for 1300ms
224local combat13_Brush = createCombatObject()
225setCombatParam(combat13_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
226setCombatParam(combat13_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
227setCombatArea(combat13_Brush,createCombatArea({{1, 0},
228{0, 2}}))
229function getDmg_Brush(cid, level, maglevel)
230
231 return -min, -max
232end
233setCombatCallback(combat13_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
234
235-- Areas/Combat for 1400ms
236local combat14_Brush = createCombatObject()
237setCombatParam(combat14_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
238setCombatParam(combat14_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
239setCombatArea(combat14_Brush,createCombatArea({{1, 0, 2}}))
240function getDmg_Brush(cid, level, maglevel)
241
242 return -min, -max
243end
244setCombatCallback(combat14_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat14_Brush_2 = createCombatObject()
245setCombatParam(combat14_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
246setCombatParam(combat14_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
247setCombatArea(combat14_Brush_2,createCombatArea({{1, 2}}))
248function getDmg_Brush_2(cid, level, maglevel)
249
250 return -min, -max
251end
252setCombatCallback(combat14_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
253
254-- Areas/Combat for 1500ms
255local combat15_Brush = createCombatObject()
256setCombatParam(combat15_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
257setCombatParam(combat15_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
258setCombatArea(combat15_Brush,createCombatArea({{0, 2},
259{1, 0}}))
260function getDmg_Brush(cid, level, maglevel)
261
262 return -min, -max
263end
264setCombatCallback(combat15_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
265
266-- Areas/Combat for 1600ms
267local combat16_Brush = createCombatObject()
268setCombatParam(combat16_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
269setCombatParam(combat16_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
270setCombatArea(combat16_Brush,createCombatArea({{2},
271{0},
272{1}}))
273function getDmg_Brush(cid, level, maglevel)
274
275 return -min, -max
276end
277setCombatCallback(combat16_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat16_Brush_2 = createCombatObject()
278setCombatParam(combat16_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
279setCombatParam(combat16_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
280setCombatArea(combat16_Brush_2,createCombatArea({{2},
281{1}}))
282function getDmg_Brush_2(cid, level, maglevel)
283
284 return -min, -max
285end
286setCombatCallback(combat16_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
287
288-- Areas/Combat for 1700ms
289local combat17_Brush = createCombatObject()
290setCombatParam(combat17_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
291setCombatParam(combat17_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
292setCombatArea(combat17_Brush,createCombatArea({{2, 0},
293{0, 1}}))
294function getDmg_Brush(cid, level, maglevel)
295
296 return -min, -max
297end
298setCombatCallback(combat17_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
299
300-- Areas/Combat for 1800ms
301local combat18_Brush = createCombatObject()
302setCombatParam(combat18_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
303setCombatParam(combat18_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
304setCombatArea(combat18_Brush,createCombatArea({{2, 0, 1}}))
305function getDmg_Brush(cid, level, maglevel)
306
307 return -min, -max
308end
309setCombatCallback(combat18_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat18_Brush_2 = createCombatObject()
310setCombatParam(combat18_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
311setCombatParam(combat18_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
312setCombatArea(combat18_Brush_2,createCombatArea({{2, 1}}))
313function getDmg_Brush_2(cid, level, maglevel)
314
315 return -min, -max
316end
317setCombatCallback(combat18_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
318
319-- Areas/Combat for 1900ms
320local combat19_Brush = createCombatObject()
321setCombatParam(combat19_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
322setCombatParam(combat19_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
323setCombatArea(combat19_Brush,createCombatArea({{0, 1},
324{2, 0}}))
325function getDmg_Brush(cid, level, maglevel)
326
327 return -min, -max
328end
329setCombatCallback(combat19_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
330
331-- Areas/Combat for 2000ms
332local combat20_Brush = createCombatObject()
333setCombatParam(combat20_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
334setCombatParam(combat20_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
335setCombatArea(combat20_Brush,createCombatArea({{1},
336{0},
337{2}}))
338function getDmg_Brush(cid, level, maglevel)
339
340 return -min, -max
341end
342setCombatCallback(combat20_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat20_Brush_2 = createCombatObject()
343setCombatParam(combat20_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
344setCombatParam(combat20_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
345setCombatArea(combat20_Brush_2,createCombatArea({{1},
346{2}}))
347function getDmg_Brush_2(cid, level, maglevel)
348
349 return -min, -max
350end
351setCombatCallback(combat20_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
352
353-- Areas/Combat for 2100ms
354local combat21_Brush = createCombatObject()
355setCombatParam(combat21_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
356setCombatParam(combat21_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
357setCombatArea(combat21_Brush,createCombatArea({{1, 0},
358{0, 2}}))
359function getDmg_Brush(cid, level, maglevel)
360
361 return -min, -max
362end
363setCombatCallback(combat21_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
364
365-- Areas/Combat for 2200ms
366local combat22_Brush = createCombatObject()
367setCombatParam(combat22_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
368setCombatParam(combat22_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
369setCombatArea(combat22_Brush,createCombatArea({{1, 0, 2}}))
370function getDmg_Brush(cid, level, maglevel)
371
372 return -min, -max
373end
374setCombatCallback(combat22_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat22_Brush_2 = createCombatObject()
375setCombatParam(combat22_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
376setCombatParam(combat22_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
377setCombatArea(combat22_Brush_2,createCombatArea({{1, 2}}))
378function getDmg_Brush_2(cid, level, maglevel)
379
380 return -min, -max
381end
382setCombatCallback(combat22_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
383
384-- Areas/Combat for 2300ms
385local combat23_Brush = createCombatObject()
386setCombatParam(combat23_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
387setCombatParam(combat23_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
388setCombatArea(combat23_Brush,createCombatArea({{0, 2},
389{1, 0}}))
390function getDmg_Brush(cid, level, maglevel)
391
392 return -min, -max
393end
394setCombatCallback(combat23_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")
395
396-- Areas/Combat for 2400ms
397local combat24_Brush = createCombatObject()
398setCombatParam(combat24_Brush, COMBAT_PARAM_EFFECT, CONST_ME_GREEN_RINGS)
399setCombatParam(combat24_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
400setCombatArea(combat24_Brush,createCombatArea({{2},
401{0},
402{1}}))
403function getDmg_Brush(cid, level, maglevel)
404
405 return -min, -max
406end
407setCombatCallback(combat24_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush")local combat24_Brush_2 = createCombatObject()
408setCombatParam(combat24_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
409setCombatParam(combat24_Brush_2, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
410setCombatArea(combat24_Brush_2,createCombatArea({{2},
411{1}}))
412function getDmg_Brush_2(cid, level, maglevel)
413
414 return -min, -max
415end
416setCombatCallback(combat24_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2")
417
418-- =============== CORE FUNCTIONS ===============
419local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
420 if (isCreature(cid)) then
421 doCombat(cid, c, var)
422 if (dirList ~= nil) then -- Emit distance effects
423 local i = 2;
424 while (i < #dirList) do
425 doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList[i],y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
426 i = i + 2
427 end
428 end
429 end
430end
431function checkSpell56(cid)
432 local GUN_ID = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_01)
433 local CHECK_SLOT_01 = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_04)
434 local CHECK_SLOT_02 = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_05)
435 local CHECK_SLOT_03 = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_06)
436 SPELL_ID = 56
437
438 if GUN_ID > 0 then
439 if CHECK_SLOT_01 == SPELL_ID then
440 cid:sendCancelMessage("@SpellCooldown 01")
441 return true
442 elseif CHECK_SLOT_02 == SPELL_ID then
443 cid:sendCancelMessage("@SpellCooldown 02")
444 return true
445 elseif CHECK_SLOT_03 == SPELL_ID then
446 cid:sendCancelMessage("@SpellCooldown 03")
447 return true
448 else
449 return false
450 end
451 else
452 return false
453 end
454end
455function onCastSpell(cid, var)
456 if checkSpell56(cid) or cid:getGroup():getAccess() then
457 local startPos = getCreaturePosition(cid)
458 local GUN_ID = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_01)
459 local starGun = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_03)
460 local levelGun = cid:getStorageValue(_SYSTEM.INVENTARIO[04].UID_07)
461 min = onDamage(cid, GUN_ID, levelGun, starGun, "SKILL_MIN", SPELL_ID)
462 max = min
463 addEvent(RunPart,100,combat1_Brush,cid.uid,var)
464 RunPart(combat0_Brush,cid,var)
465 RunPart(combat0_Brush_2,cid,var)
466 addEvent(RunPart,200,combat2_Brush,cid.uid,var)
467 addEvent(RunPart,200,combat2_Brush_2,cid.uid,var)
468 addEvent(RunPart,300,combat3_Brush,cid.uid,var)
469 addEvent(RunPart,400,combat4_Brush,cid.uid,var)
470 addEvent(RunPart,400,combat4_Brush_2,cid.uid,var)
471 addEvent(RunPart,500,combat5_Brush,cid.uid,var)
472 addEvent(RunPart,600,combat6_Brush,cid.uid,var)
473 addEvent(RunPart,600,combat6_Brush_2,cid.uid,var)
474 addEvent(RunPart,700,combat7_Brush,cid.uid,var)
475 addEvent(RunPart,800,combat8_Brush,cid.uid,var)
476 addEvent(RunPart,800,combat8_Brush_2,cid.uid,var)
477 addEvent(RunPart,900,combat9_Brush,cid.uid,var)
478 addEvent(RunPart,1000,combat10_Brush,cid.uid,var)
479 addEvent(RunPart,1000,combat10_Brush_2,cid.uid,var)
480 addEvent(RunPart,1100,combat11_Brush,cid.uid,var)
481 addEvent(RunPart,1200,combat12_Brush,cid.uid,var)
482 addEvent(RunPart,1200,combat12_Brush_2,cid.uid,var)
483 addEvent(RunPart,1300,combat13_Brush,cid.uid,var)
484 addEvent(RunPart,1400,combat14_Brush,cid.uid,var)
485 addEvent(RunPart,1400,combat14_Brush_2,cid.uid,var)
486 addEvent(RunPart,1500,combat15_Brush,cid.uid,var)
487 addEvent(RunPart,1600,combat16_Brush,cid.uid,var)
488 addEvent(RunPart,1600,combat16_Brush_2,cid.uid,var)
489 addEvent(RunPart,1700,combat17_Brush,cid.uid,var)
490 addEvent(RunPart,1800,combat18_Brush,cid.uid,var)
491 addEvent(RunPart,1800,combat18_Brush_2,cid.uid,var)
492 addEvent(RunPart,1900,combat19_Brush,cid.uid,var)
493 addEvent(RunPart,2000,combat20_Brush,cid.uid,var)
494 addEvent(RunPart,2000,combat20_Brush_2,cid.uid,var)
495 addEvent(RunPart,2100,combat21_Brush,cid.uid,var)
496 addEvent(RunPart,2200,combat22_Brush,cid.uid,var)
497 addEvent(RunPart,2200,combat22_Brush_2,cid.uid,var)
498 addEvent(RunPart,2300,combat23_Brush,cid.uid,var)
499 addEvent(RunPart,2400,combat24_Brush,cid.uid,var)
500 addEvent(RunPart,2400,combat24_Brush_2,cid.uid,var)
501 return true
502 else
503 cid:getPosition():sendMagicEffect(03)
504 return false
505 end
506end
Top