Added Project Files

Added all files from the project and edited the readme.md
2025-09-18 00:51:59 +01:00
parent afd7535bf3
commit 63f78c2b8e
17 changed files with 531 additions and 2 deletions
--- a/Corpses/media/lua/shared/ScatteredTrashes.lua
+++ b/Corpses/media/lua/shared/ScatteredTrashes.lua
@@ -0,0 +1,145 @@
+-- local function hasWaterObject(square)	
+	-- for i=0, square:getObjects():size()-1 do
+		-- local v = square:getObjects():get(i);
+		-- if instanceof(v, "IsoObject") and v:getSprite() and v:getSprite():getProperties() and v:getSprite():getProperties():Is(IsoFlagType.water) then
+			-- --print("Water Tile")
+			-- return true;
+		-- end
+	-- end
+-- end
+ 
+function trashSquare(square)
+	-- print("SQUARE 1")
+	local mData = square:getModData()	
+    if mData.trashSquare then return end
+    if mData.specialSquare then return end
+    mData.trashSquare = true
+	square:transmitModdata()
+    --if mData.trashSquare then return end
+	if ZombRand(0,5) ~= 0 then return end
+    if not square then return end
+	if checkBlockedSquare(square) == false then return false end
+    if mData.stashSquare then return end
+	if not square:getZone() then return end
+	--if square:hasFloor(false) then return end
+	if not square:getZone():getType() then return end
+	--if square:isVehicleIntersecting() then return end
+	--if not square:isNotBlocked(true) then return end
+	local zoneType = square:getZone():getType()
+	local vehicleZone = nil
+	if getVehicleZoneAt and getVehicleZoneAt(square:getX(), square:getY(), square:getZ()) then
+		vehicleZone = getVehicleZoneAt(square:getX(), square:getY(), square:getZ())
+	end
+	-- print("SQUARE 2")
+	local cell = getCell()
+	
+	--if hasWaterObject(square) then return false end
+	
+	if not square:isOutside() then
+
+		if square:getZ() > 0 and not square:hasFloor(true) then return end
+
+		--if ZombRand(0,49)== 0 then
+		if ZombRand(0,10)== 0 then
+			local body = createRandomDeadBody(square, 200 )
+			
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their backs
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end	
+		 return
+	end
+	if square:getZ() > 0 and not square:hasFloor(true) then return end
+	local vehicleZoneType = nil
+	if vehicleZone and vehicleZone:getType() then vehicleZoneType = vehicleZone:getType() end
+	--if  vehicleZone and vehicleZone:getName():contains("trafficjam") then
+	if  vehicleZoneType and vehicleZoneType:contains("trafficjam") then
+		--if ZombRand(0,99)== 0 then
+		if ZombRand(0,20)== 0 then
+			--print("Crash Corpse")
+		    local body = createRandomDeadBody(square, 200 )
+			--if body then body:setSkeleton(true) end
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end
+	elseif  vehicleZone then
+
+		--if ZombRand(0,199)== 0 then
+		if ZombRand(0,40)== 0 then
+			--print("Car Corpse")
+		    local body = createRandomDeadBody(square, 200 )
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end		
+	elseif zoneType =="Nav" then
+
+		--if ZombRand(0,1999)== 0 then	
+		if ZombRand(0,400)== 0 then
+			--print("Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end		
+	elseif zoneType == "TownZone" or zoneType == "ZoneStory" or  zoneType == "TrailerPark"  then
+
+		--if square:getZ() > 0 and ZombRand(0,3999)== 0 then
+		if square:getZ() > 0 and ZombRand(0,800)== 0 then
+			--print("Roof Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			--if body then body:setSkeleton(true) end
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		-- end		
+		--elseif square:getZ()==0 and ZombRand(0,399)== 0 then
+		elseif square:getZ()==0 and ZombRand(0,80)== 0 then
+			--print("Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			--if body then body:setSkeleton(true) end
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end
+			
+	elseif zoneType == "Vegitation"   or zoneType == "Farm" then
+	
+		--if ZombRand(0,1999)== 0 then
+		if ZombRand(0,400)== 0 then
+			--print("Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end				
+	elseif zoneType == "Forest" then	
+		--if ZombRand(0,99999)== 0 then
+		if ZombRand(0,2000)== 0 then
+			--print("Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end				
+	elseif zoneType == "DeepForest" then
+		if ZombRand(0,20000)== 0 then
+			--print("Corpse Spawn")
+		    local body = createRandomDeadBody(square, 200 )
+			if body and ZombRand(0,3) == 0 then -- used so that all spawned bodies are not on their rbacks
+				body:setFallOnFront(true)
+			end
+			mData.specialSquare = true
+		end	
+	end
+	square:transmitModdata()
+end