Delay spell cast, help 50$ to a paypal for working fix

[Quesadilla]

Hello, i need to add a delay before a spell is cast, lets say 0.5 secs for Cleanse and hand of freedom

Will pay 50$ to the paypal of the person who finishes my request first..

Cleanse:

for i=1,#members do 
    if (HaveDebuff(members[i].Unit,dMagicCC(),3)
     or (HaveDebuff(members[i].Unit,122,3) and cdRemains(1044) > 0 )) --Dispel Nova when HoF CD
    and not LineOfSight(members[i].Unit)
    and rangeCheck(4987,members[i].Unit)
   
    and not HaveDebuff(members[i].Unit,30108,0) --UA, silenced when dispelled
    then
      PQR_CustomTarget = members[i].Unit
       return true 
       end
    end

Hand of freedom:

 for i=1,#members do 
    if rangeCheck(1044,members[i].Unit)
    and not LineOfSight(members[i].Unit)
    and not UnitBuffID(members[i].Unit,1044)
    and HaveDebuff(members[i].Unit,aSRS(),3) 
    and cdRemains(1044) == 0
    then
      PQR_CustomTarget = members[i].Unit  
    if (UnitBuffID(members[i].Unit,23335)  -- Holding Alliance Flag
    	or UnitBuffID(members[i].Unit,23333) -- Holding Horde Flag
    	or UnitBuffID(members[i].Unit,34976) -- Holding Netherstorm Flag
        and	rangeCheck(1044,members[i].Unit)
    	and not LineOfSight(members[i].Unit)
    	and HaveDebuff(members[i].Unit,aSRS(),3) 
  	    and cdRemains(1044) == 0 )
  	 then
  	 PQR_CustomTarget = members[i].Unit
  	 end
       return true
       end
    end

The entire profile: Paladin PQR.rar - Speedy Share - upload your files here

[Jadd]

Lol, $50 for something as simple as this?

I doubt it.

[Quesadilla]

For you simple, for me impossible
and you can choose to not belive me, but im a grown man and i pay when someone helps me out.

I have offerd other people money for the same task and they have failed, so im done using my time on this issue.

i also payed 40$(?) to Replikator on this forum even tho he did not want them for changing the number 1 to 3

[Quesadilla]

Offer still open, Help a mororn with no code experience please!

[Gabbz]

Sitting at work so cant test but.

for i=1,#members do  
        if     HaveDebuff(members[i].Unit,dMagicCC(),3) 
            or (HaveDebuff(members[i].Unit,122,3) and cdRemains(1044) > 0 )) --Dispel Nova when HoF CD 
            and not LineOfSight(members[i].Unit) 
            and rangeCheck(4987,members[i].Unit) 
            and not HaveDebuff(members[i].Unit,30108,0) --UA, silenced when dispelled 
                then 
                    if CLEANSENOW == 0 then CLEANSENOW = GetTime() 
                    elseif GetTime() > CLEANSENOW + 0.5 then  
                        CLEANSENOW = 0 
                        PQR_CustomTarget = members[i].Unit return true  
                    end 
        end             
end  

Make sure you set CLEANSENOW = 0 somewhere at start that just load one time. Guess you have a profile you using and somewhere at start should say like this.

if PQR_RotationStarted then 
 
    DebugMode = 0 
    lastspell = 0 
        CLEANSENOW = 0  
         
    PQR_RotationStarted = false 
end  

[Quesadilla]

Will test and report back soon, Thank you sir!

[Quesadilla]

Just a bunch of lua errors and nothing else, might ve something i did wrong :\
data files are in first post

[Gabbz]

Just a bunch of lua errors and nothing else, might ve something i did wrong :\
data files are in first post

can you post the lua errors ?

[Quesadilla]

<string>:"if PQR_Addon_Loaded == nil then...":742: attempt to call field "?" (a nil value)
<string>:"if PQR_Addon_Loaded == nil then...":742: in function "PQR_NextAbility"
<string>:"if PQR_Addon_Loaded == nil then...":534: in function "PQR_ExecuteRotation"
<string>:"if PQR_Addon_Loaded == nil then...":287: in function <string>:"if PQR_Addon_Loaded == nil then...":214
rotationNumber = 0
inCombat = 1
requireCombat = true

I hate my life, why was i born so stupid lol

[Gabbz]

I hate my life, why was i born so stupid lol

Seems you put it wrong in the file.
Did you reload WoW and PQR ?

[Quesadilla]

Yes i did restart and restart several times,

if i run your lua at Ideone.com | Online IDE & Debugging Tool >> C/C++, Java, PHP, Python, Perl and 40+ compilers and interpreters i get " luac: prog.lua:3: 'then' expected near ') "

here is "CLEANSENOW = 0 "

if PQR_RotationStarted then
CLEANSENOW = 0


if not PQR_LoadLua("PQR_Replikator_PVP_DATA.lua") then
PQR_WriteToChat("You are missing a key file: !", "Error")
PQR_RotationStop()
return true
end


PQR_RotationStarted = false
end

[Quesadilla]

Fixed it, by removing a " ) " in line 3.

Set delay to 3 for testing.
first dispell it waited 3 secs before dispell
second dispel was instant and so on.
need it to reset delay for every dispell

[Gabbz]

They only place you can change the delay is here:

 elseif GetTime() > CLEANSENOW + 0.5 then  

this sets the cleanse to 0.5 secs after . If you want to haver it bigger change 0.5 to 3.0 or something
You cant change the

CLEANSENOW = 0  

[Quesadilla]

Yes, thats what i did.

but, when i test it with " elseif GetTime() > CLEANSENOW + 3 then "

It dispells the first spell after 3 seconds.
second time it dispells it is instant and does not use the delay, and so on for 3,4,5,6,7th time
Only way to get it to delay again is to turn PQR on and off again.

i need it to delay every dispel not just the first

[Quesadilla]

function RaidDispelDelay(t,buff,d) --t: dispel spell id, d: delay seconds
for i=1, #members do
for j=1, #buff do
local RDDname, RDDrank, RDDicon, RDDcount, RDDdebuffType, RDDduration, RDDexpirationTime, RDDunitCaster, RDDisStealable, RDDshouldConsolidate, RDDspellId = UnitDebuffID(members[i].Unit, buff[j])
if RDDname then
if IsSpellInRange(GetSpellInfo(t),members[i].Unit) == 1
and not PQR_IsOutOfSight(members[i].Unit)
and PQR_SpellAvailable(t)
and ValidDispel(members[i].Unit)
and select(2,GetSpellCooldown(t)) < 2
and ((RDDduration - (RDDexpirationTime - GetTime())) >= d) --debuff time left
--and CanHeal(members[i].Unit)
and IsUsableSpell(t) then
CastSpellByName(tostring(GetSpellInfo(t)),members[i].Unit)
--return true --Silent cast
end
end
end
end
end
---------
Example: RaidDispelDelay(1044,122,0.2)

looks intresting, but un sure how to use, and not lose the way its setup now