[Release] LuaNinja - Run protected Lua code

[Arleer157]

I lol'd. You acknowledge the existence of a stereotype, and then you fall right into it.

xD
Dunno whether to apologize or laugh with you.

To be honest I've been mozing around this site for a while, I had just never posted...

[jackus]

I cant get it to work, running vista, and i open all with admin rights.

1. I run Window
2. I run Pid, (why do i need to change --pid="1234" ?)
3. I run Launch (edited "C:\programfiles\World of Warcraft\WoW.exe")


But when i try to run this: /dump loadstring("DevTools_DumpCommand = (function(msg) loadstring(msg)() end)")()


/dump c=CastSpellByName;if not UnitDebuff("target", "Living Bomb") then c("Living Bomb") elseif UnitBuff("player", "Hot Streak") then c("Pyroblast") elseif not UnitDebuff("target", "Improved Scorch") then c("Scorch") else c("Fireball") end

I still get the *** TaintForced *** has been Blocked from an action only available to the Blizzars UI. You can disable this addon and reload the UI

[Negator]

I cant get it to work, running vista, and i open all with admin rights.

1. I run Window
2. I run Pid, (why do i need to change --pid="1234" ?)
3. I run Launch (edited "C:\programfiles\World of Warcraft\WoW.exe")


But when i try to run this: /dump loadstring("DevTools_DumpCommand = (function(msg) loadstring(msg)() end)")()


/dump c=CastSpellByName;if not UnitDebuff("target", "Living Bomb") then c("Living Bomb") elseif UnitBuff("player", "Hot Streak") then c("Pyroblast") elseif not UnitDebuff("target", "Improved Scorch") then c("Scorch") else c("Fireball") end

I still get the *** TaintForced *** has been Blocked from an action only available to the Blizzars UI. You can disable this addon and reload the UI

It's been stated many times before, you don't use /dump.
You use /run.

So it'd be:

/run c=CastSpellByName;if not UnitDebuff("target", "Living Bomb") then c("Living Bomb") elseif UnitBuff("player", "Hot Streak") then c("Pyroblast") elseif not UnitDebuff("target", "Improved Scorch") then c("Scorch") else c("Fireball") end

[deadca7]

Got a little quick question here.
If I multibox and run 5 wow at the same time, do I have to use the PID way. Or can I just use the window way, and it will apply on all 5 ?

Thanks

[Baelzebub]

Got a little quick question here.
If I multibox and run 5 wow at the same time, do I have to use the PID way. Or can I just use the window way, and it will apply on all 5 ?

Thanks

I use launch for 2 accounts and works fine so would think 5 works also.

[jackus]

[QUOTE=Negator;1724890]It's been stated many times before, you don't use /dump.
You use /run.

Sorry did not see

But now i get
A macro script has been blocked from an action only available to the Blizzars UI.

[Cypher]

In the PID one you need to change the PID to the process ID of the WoW instance you want to inject into.

When you run the batch scripts, does the command window stay open?

If so, there should be an error message, please post it.

If the command window closes on its own, that means that it should have worked...

[jackus]

In the PID one you need to change the PID to the process ID of the WoW instance you want to inject into.

When you run the batch scripts, does the command window stay open?

If so, there should be an error message, please post it.

If the command window closes on its own, that means that it should have worked...

Sorry for being such a huge nub!

But what is the process ID of the WoW instance I want to inject into??

What is a batch script?

If i just run the Widow i get an error but if i run it as Admin i open fast and closes even faster.

I get this error: Error! Injector: Could not get handle to process.

Probably the PID i don't understand

[Tracerv0]

Lol. That is all lol.

[Cypher]

Okay.

If you want to inject into only a single WoW instance then you probably want to use "Window.bat" as that will automatically resolve the PID.

However, if you have multiple WoW instances running the Window.bat script will only inject the DLL into ONE instance. And there's no guarantee as to which instance it will be.

How do we solve that? Via explicit PID specification.

Every running process on the system is designated a unique PID. To find out the PID of a given process run Task Manager and look at the number in the PID column for the given WoW instance you want to inject into.

Replace the pid in the PID.bat script with the new number you have, save the script, and run it.

Sorry it's so complex but the loader is built for my own personal use and need to be highly generic so it can support all the different uses I put it to.

If I get time I'll write a proper wrapper so you can choose the WoW instances with a nice GUI and w/e.

[deadca7]

I don't think that PID id is shown in the Task Manager by default, so if you guys don't see PID. Do this

1. Go into Processes
2. Click View
3. Click Select Columns
4. Check the "PID (Process Identifier)" and press ze OK button

Enjoy

[~OddBall~]

you are right deadca.

Will be interesting to see if the new warden is directed at this in anyway, doubtful but still kinda exciting xD

[spawnfestis]

Nice.
(message too short)

[iq.kerberos]

Hey guys, I am hoping someone could shed some light on what is preventing this set of macros from executing:

Macro 1: "1"
/run loadstring("local _,_,_,_,_,_,dur,_,_=UnitBuff("player","Slice and Dice")
_,_,_,_,_,_,_,c,_=UnitDebuff("target", "Rupture")
p=GetComboPoints("player", "target");
if(p==3 and dur>=9 and c=="player") then CastSpellByName("Eviscerate")
else
RunMacro(2)
end

Macro 2: "2":
/run loadstring("local _,_,_,_,_,_,dur,_,_=UnitBuff("player","Slice and Dice")
_,_,_,_,_,_,_,c,_=UnitDebuff("target", "Rupture")
p=GetComboPoints("player", "target")
if(p==5 and dur>=9 and c~="player") then
CastSpellByName("Rupture")
else
RunMacro(3)
end

Macro 3: "3":
/run loadstring("local _,_,_,_,_,_,dur,_,_=UnitBuff("player","Slice and Dice")
p=GetComboPoints("player", "target")
if(p==3 and dur<9) then
CastSpellByName("Slice and Dice")
else
CastSpellByName("Mutilate")
end

I had no problem converting this macro (Mutilate spam) from the August /dump posts however:

Macro:
#show Mutilate
/run RunMacro(1)
/run RunMacro(2)
/run RunMacro(3)
/run RunMacro(4)
/startattack
/cast Mutilate

Macro 1: "1":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitCastingInfo(\"target\"); if UnitCastingInfo(\"target\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\") end")()

Macro 2: "2":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitChannelInfo(\"target\"); if UnitChannelInfo(\"target\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\") end")()

Macro 3: "3":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitCastingInfo(\"focus\"); if UnitCastingInfo(\"focus\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\",\"focus\") end")()

Macro 4: "4":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitChannelInfo(\"focus\"); if UnitChannelInfo(\"focus\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\",\"focus\") end")()

Thanks in advance!

Quite honestly, I don't think that code ever worked. Aside from the fact that some of the text is greater than 255 characters, the syntax is wrong and it will always throw you an error. Here is what I worked out. I already tested it and validated it:

My main macro. I just call the "smart" macro from here along with all of my other abilities.

#show Sinister Strike
/run RunMacro(1)
/run RunMacro(17)
/use 10 #hyperspeed accelerators
/use Saronite Bomb

Macro #1 is the interrupt casting macro. I won't cover that. For my macro that's #17, I have:

/run loadstring("local n,_,_,_,_,dur,x,_,_=UnitBuff(\"player\",\"Slice and Dice\");if not n and GetComboPoints(\"player\", \"target\") >= 3 then RunMacroText(\"/cast Slice and Dice\") else RunMacro(18) end")()

Explanation: If the Slice and Dice buff is not on the player and Combo Points are greater than or equal to 3, then cast Slice and Dice, else, go to Macro 18.

Macro #18:

/run loadstring("local n,_,_,_,_,dur,x,_,_=UnitBuff(\"player\",\"Slice and Dice\");if n and (GetTime()-x) > -9 and GetComboPoints(\"player\", \"target\") >= 3 then RunMacroText(\"/cast Slice and Dice\") else RunMacro(19) end")()

Explanation: If the Slice and Dice buff is on the player and the duration is greater than -9 and Combo Points greater than or equal to 3, then cast Slice and Dice, else, go to Macro 19.

Macro #19:

/run loadstring("if (not UnitDebuff(\"target\", \"Expose Armor\") and not UnitDebuff(\"target\", \"Sunder Armor\") and GetComboPoints(\"player\", \"target\") >= 4) then CastSpellByName(\"Expose Armor\") else RunMacro(20) end")()

Explanation: If target does not have Expose Armor or Sunder Armor on it and Combo Points greater than or equal to 4, then cast Expose Armor, else, go to Macro 20.

Macro #20:

/run loadstring("local n,_,_,_,_,dur,x,_,_=UnitBuff(\"player\",\"Slice and Dice\");if n and (GetTime()-x) < -9 and GetComboPoints(\"player\", \"target\") == 5 then RunMacroText(\"/cast Eviscerate\")  else RunMacroText(\"/cast Sinister Strike\")end")()

Explanation: If the Slice and Dice buff is on the player and the duration is less than -9 and Combo Points equal 5, then cast Eviscerate, else, cast Sinister Strike.

Macro #19 is not necessary. Since I have a full ArP build, it just adds a boost to my dps. This script is mainly for boss fights. If you want to make it more robust, check the target's health and have it to determine whether you want it to cast Expose Armor or even Slice and Dice.

Note: This is a Ruptureless Combat rotation and it's only purpose is to make sure Slice and Dice stays up, to cast Expose Armor and spam Sinister Strike otherwise.

[armen]

iq.kerberos, thank you for taking the time and responding to my thread.

I actually gave up on getting help so I took the time and learned Lua basics and WOW APIs and fixed up my Mutilation rotation. Since we are all in a sharing mood, here are my snippets:

The 'Spam Until Your Pinky Hurts Macro'

#show Mutilate
/run RunMacro(1)
/run RunMacro(2)
/run RunMacro(3)
/run RunMacro(4)
/startattack
/run RunMacro("a")
/run RunMacro("b")
/run RunMacro("e")
/run RunMacro("c")
/run RunMacro("g")
/run RunMacro("f")
/run RunMacro("d"))

These are the first four macros that I just recycled; these are very good at interrupting casters/channelers:

Macro 1: "1":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitCastingInfo(\"target\"); if UnitCastingInfo(\"target\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\") end")()

Macro 2: "2":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitChannelInfo(\"target\"); if UnitChannelInfo(\"target\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\") end")()

Macro 3: "3":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitCastingInfo(\"focus\"); if UnitCastingInfo(\"focus\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\",\"focus\") end")()

Macro 4: "4":
/run loadstring("local _, _, _, _, _, _, _, _, interruptAble = UnitChannelInfo(\"focus\"); if UnitChannelInfo(\"focus\") and not interruptAble then SpellStopCasting() CastSpellByName(\"Kick\",\"focus\") end")()

Here is my creation, please be kind, I cry easily when my Lua code is critiqued! (jk, I love being mocked for craptastic code):

a
/run p=GetComboPoints("player","target");n,_,_,s,_,_,_,_,_=UnitDebuff("target","Deadly Poison VI");if n=="Deadly Poison VI" and s>3 and p>3 then RunMacroText("/cast Envenom")end

b
/run p=GetComboPoints("player","target");n,_,_,s,_,_,_,_,_=UnitDebuff("target","Deadly Poison VI");if ((n=="Deadly Poison VI" and s<4) or n~="Deadly Poison VI") and p>3 then RunMacroText("/cast Eviscerate")end


e
/run r=RunMacroText;ud=UnitDebuff;if (not UnitBuff("player", "Hunger For Blood") and (ud("target","Rupture") or ud("target","Garrote"))) then r("/cast Hunger For Blood") end

c
/run p=GetComboPoints("player","target");n,_,_,_,_,_,x,_,_=UnitBuff("player", "Slice and Dice");if (n~="Slice and Dice" or (x-GetTime())<4) and (p<4 and p>0) then RunMacroText("/cast Slice and Dice")end

g
/run if GetComboPoints("player","target") < 1 then RunMacroText("/cast Mutilate")end

f
/run p=GetComboPoints("player","target");r=RunMacroText;if not UnitBuff("player", "Hunger For Blood") and not UnitDebuff("target","Rupture") then r("/cast Rupture")end

d
/run ub=UnitBuff;r=RunMacroText;if ub("player", "Hunger For Blood") and ub("player","Slice and Dice") then r("/cast Mutilate")end

Now I am just waiting for Cypher to confirm LuaNinja is safe from the Warden update <nudge nudge Cypher>

Thanks to all for this great thread!

-armen