Advertisement
Guest User

Untitled

a guest
Aug 20th, 2019
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.14 KB | None | 0 0
  1. function lam.queueForm(form)
  2.   if lam.tryingCrunch then
  3.     lam.echo("Trying to <orange_red>CRUNCH<light_yellow>, hold on!")
  4.     return
  5.   end
  6.   if not form then
  7.     form = lam.nextForm
  8.   end
  9.   if not lam.forms[form] then
  10.     lam.echo("Bad argument given to lam.queueForm", "red")
  11.     return
  12.   end
  13.   form = lam.forms[form]
  14.   if target.shielded and stance ~= ("sl" or "sh") then
  15.     form = lam.forms[form.raze]
  16.   end
  17.   local formString = form.short
  18.   local targ = target.name .. " "
  19.   local stance = lam.getStance()
  20.   local actionTable = {"sm clear"}
  21.   if not lam.wieldingRight or not lam.wieldingLeft then
  22.     table.insert(actionTable, "sm add free wield shofa|wield shofa")
  23.   end
  24.   if target.grappled then
  25.     table.insert(actionTable, "sm add free ka release " .. target.name)
  26.   end
  27.   -- do poison stuff
  28.   if form.isRaze then
  29.     table.insert(actionTable, "sm add free wipe right|envenom right with " .. form.poison)
  30.   else
  31.     if form[stance] then
  32.       table.insert(
  33.         actionTable,
  34.         "sm add free wipe left|wipe right|envenom left with " ..
  35.         form[stance][1] ..
  36.         "|envenom right with " ..
  37.         form[stance][2]
  38.       )
  39.     end
  40.   end
  41.   -- beast poison spit too
  42.   if lam.beastBal then
  43.     table.insert(actionTable, "sm add free beast order spit " .. target.name)
  44.   end
  45.   -- instakill stuff
  46.   if stance == "c" and target.hemo > 770 and tonumber(gmcp.Char.Vitals.pow) > 4 then
  47.     formString = formString .. " burst"
  48.     if lam.lowNext then
  49.       formString = formString .. " low"
  50.       lam.lowNext = false
  51.     end
  52.     table.insert(actionTable, "sm add kata perform " .. targ .. formString)
  53.     lam.warning(
  54.       targ:upper() .. "IS PREPPED FOR INSTAKILL, TRYING CRUNCH DON'T TOUCH ANYTHING", "orange_red"
  55.     )
  56.     lam.warning(
  57.       targ:upper() .. "IS PREPPED FOR INSTAKILL, TRYING CRUNCH DON'T TOUCH ANYTHING", "orange_red"
  58.     )
  59.     if lam.cc then
  60.       mm.cc("Bursting hemorrhaging on " .. target.name .. ", HINDER THEM!")
  61.     end
  62.     if lam.loop then
  63.       lam.loop = false
  64.       lam.echo("DISABLING LOOP", "red")
  65.     end
  66.     lam.tryingCrunch = true
  67.     lamCrunchTimer = tempTimer(7, [[ if lam.tryingCrunch then lam.tryingCrunch = false end ]])
  68.     lam.sendTable(actionTable)
  69.     return
  70.   end
  71.   -- prep for usual form stuff
  72.   if lam.boostNext and tonumber(gmcp.Char.Vitals.pow) > 1 then
  73.     formString = formString .. "+"
  74.     lam.boostNext = false
  75.   end
  76.   if lam.regressNext and tonumber(gmcp.Char.Vitals.pow) > 2 then
  77.     formString = formString .. " shotah"
  78.     lam.regressNext = false
  79.   end
  80.   -- add low if we should
  81.   if lam.lowNext then
  82.     formString = formString .. " low"
  83.     lam.lowNext = false
  84.   end
  85.   -- headbutt first if we should
  86.   --if (stance == "c" and tonumber(gmcp.Char.Vitals.pow) > 7 and lam.doHeadbutts) or lam.headbuttNext then
  87.   if lam.headbuttNext then
  88.     table.insert(actionTable, "sm add free ka headbutt " .. target.name)
  89.     lam.headbuttNext = false
  90.   end
  91.   -- finish up
  92.   table.insert(actionTable, "sm add kata perform " .. targ .. formString)
  93.   lam.echo("Attempting form: " .. formString)
  94.   lam.sendTable(actionTable)
  95.   lam.nextForm = form.short
  96.   return
  97. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement