Grimrock

Code: Select all

function snailDie() 
_restoreProj()
end


function projHit(proj) -- trig by snail_king onProjectileHit hook
  pr.nt("snail king hit by "..proj.name)
  local p = {"cold_arrow",  "fire_arrow",  "poison_arrow",  "shock_arrow",  "arrow"}
  local q = {"cold_quarrel","fire_quarrel","poison_quarrel","shock_quarrel","quarrel"}
  local r = {"throwing_knife","shuriken","throwing_axe"}
  for i=1,5 do
    if proj.name == p[i] then snailArrows = snailArrows + 1 end
    if proj.name == q[i] then snailQurrls = snailQurrls + 1 end
  end
  if proj.name == r[1] then snailKnives = snailKnives +1 end
  if proj.name == r[2] then snailShrkns = snailShrkns +1 end
  if proj.name == r[3] then snailAxes   = snailAxes   +1 end
end

snailArrows = 0
snailQurrls = 0
snailKnives = 0
snailShrkns = 0
snailAxes   = 0

function _restoreProj() -- trig by snailDie()
  local cArws = 0
  local cQrls = 0
  local cKnvs = 0
  local cShks = 0
  local cAxes = 0
  for i in entitiesAt(7,10,31) do
    if       i.name == "arrow"          then cArws = cArws + 1
      elseif i.name == "quarrel"        then cQrls = cQrls + 1
      elseif i.name == "throwing_knife" then cKnvs = cKnvs + 1
      elseif i.name == "shuriken"       then cShks = cShks + 1
      elseif i.name == "throwing_axe"   then cAxes = cAxes + 1
    end
  end
  local a = snailArrows - cArws
  local b = snailQurrls - cQrls
  local c = snailKnives - cKnvs
  local d = snailShrkns - cShks
  local e = snailAxes   - cAxes
  local t1 = {"arrow","quarrel","throwing_knife","shuriken","throwing_axe"}
  local t2 = {a,b,c,d,e}
  for h=1,5 do
    if t2[h] > 0 then for i = 1,t2[h] do
       local c=math.random(1,2) local d=1 if c==1 then d=-1 end
       local e=math.random(1,2) local f=1 if e==1 then f=-1 end
       local g=math.random(1,2) local z=1 if g==1 then z= 3 end
       spawn(t1[h],7,10,31,z)
        :setSubtileOffset(math.random()*d,math.random()*f)
    end end
  end
end

Code: Select all

	onDie = function(self)
	   snailWallScript.snailDie()
	   return false
	end,
	onProjectileHit = function(self,proj,amt,type)
	   snailWallScript.projHit(proj)
	end,