Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local t = string.trim(matches[2])
- local exits = table.keys(gmcp.Room.Info.exits)
- local lightwalldir = exits[math.random(#exits)]
- --LIGHTWALL
- local function isLightWall()
- for id, item in pairs(api.room.items) do
- if item.name == "a lightwall" then return true end
- end
- end
- --DISABLE AUTOASSIST
- local function autoassistDisable()
- if auto_assist == true then
- auto_assist = false
- tempTimer(2, [[auto_assist = true]])
- end
- end
- --BETTER RANDOM
- local function betterRand()
- randomtable = {}
- for i = 1, 97 do
- randomtable[i] = math.random()
- end
- local x = math.random()
- local i = 1 + math.floor(97*x)
- x, randomtable[i] = randomtable[i], x
- return x
- end
- --SNAP FAKEOUT
- local function falseSnap()
- if mesmer.status ~= "sealed" and fake_snap == true then
- randonumber = betterRand()
- if (randonumber <= 0.2 and fsnap_cd ~= true) then
- send("snap "..target)
- end
- end
- end
- --MESMER HYPNOSIS
- function mesmer_push()
- if (no_hyp == true or hyp_delay == true or svo.inslowcuringmode()) then
- elseif mesmer.status == "none" then
- mesmer.reset()
- expandAlias(hypnoout)
- mesmer.suggest()
- falseSnap()
- elseif mesmer.status == "in progress" then
- falseSnap()
- elseif mesmer.status == "hypnotised" then
- mesmer.suggest()
- elseif mesmer.status == "snapped" then
- mesmer.reset()
- expandAlias(hypnoout)
- mesmer.suggest()
- falseSnap()
- elseif mesmer.status == "sealed" then
- end
- end
- --ILLUSION HEALS
- local function illusionHeals()
- randonumber = betterRand()
- if randonumber <= 0.25 then
- return("conjure illusion "..mySelf.." eats a piece of kelp.")
- elseif randonumber <= 0.5 then
- return("conjure illusion "..mySelf.." hunches "..myPronoun.." shoulders and lets out a soft hiss.")
- elseif randonumber <= 0.75 then
- return("conjure illusion "..mySelf.." takes a long drag off "..myPronoun.." pipe.")
- elseif randonumber > 0.75 then
- return("conjure illusion "..mySelf.." touches a tree of life tattoo.")
- else
- return("conjure illusion "..mySelf.." eats a bloodroot leaf.")
- end
- end
- --ILLUSION SHIELDS
- local function illusionShield()
- randonumber = betterRand()
- if randonumber <= 0.5 then
- return("A nearly invisible magical shield forms around "..mySelf..".")
- elseif randonumber > 0.5 then
- return("A nearly invisible magical shield forms around "..mySelf..".")
- else
- return("A nearly invisible magical shield forms around "..mySelf..".")
- end
- end
- --PREFIX
- local function prefix()
- local pref = {"concentrate","stand","purge","wear "..myArmor,"drop "..mySnake,"order "..mySnake.." attack "..target,"dispel "..target}
- if viperFollow then
- table.insert(pref , 5 ,"order "..mySnake.." follow "..target)
- else
- table.insert(pref , 5 ,"order "..mySnake.." follow "..mySelf)
- end
- if tar_class == "airelemental" or isFlying then
- table.insert(pref , 1 ,"land")
- end
- pf = table.concat(pref, "/")
- return pf
- end
- if t ~= nil then
- if isLightWall() and auto_illusion then
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..t.."/"..illusionHeals().."\\n"..illusionShield(),"queue add eqbal qpshot")
- elseif isLightWall() then
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..t,"queue add eqbal qpshot")
- else
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..t.."/conjure lightwall "..lightwalldir,"queue add eqbal qpshot")
- end
- elseif PinshotTimer then
- ak.serpent.Lockstack.main()
- send("queue addclear eqbal oattack")
- cecho("<orange>\n[PINSHOT]: <yellow>pinshot still active on <red>"..target.." <yellow>for <white>"..remainingTime(PinshotTimer).." seconds...\n")
- return
- elseif svo.inslowcuringmode() then
- sendAll("cq all","setalias qpshot pinshot "..target,"queue add eqbal qpshot")
- elseif isLightWall() then
- mesmer_push()
- autoassistDisable()
- if auto_illusion then
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..target.."/"..illusionHeals().."\\n"..illusionShield(),"queue add eqbal qpshot")
- else
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..target,"queue add eqbal qpshot")
- end
- else
- mesmer_push()
- autoassistDisable()
- sendAll("cq all","setalias qpshot "..prefix().."/block "..lightwalldir.."/remove "..myBow.."/wield "..myBow.."/pinshot "..target.."/conjure lightwall "..lightwalldir,"queue add eqbal qpshot")
- end
- --DEV NOTES
- --### removed because pinshot bypasses rebounding
- --elseif (ak.defs.shield or ak.defs.rebounding) and auto_flay then
- --ak.serpent.Lockstack.main()
- --send("queue addclear eqbal oattack")
- --return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement