park.lua

weed = {
	position={0,0},

	new=function(self, position)
		local new_weed = {position=position}
		setmetatable(new_weed, self)
		return new_weed
	end,

	draw=function(self)
		pset(self.position[1], self.position[2], 11)
	end
}


park = {
	weeds={},

	init=function(self, num_weeds)
		for i=1, 10 do
			self.weeds[i] = weed:new({5*i, 5*i})
		end	
	end,
	
	draw=function(self)
		rectfill(0,0,127,127,3)
		rect(0,0,127,127,4)
		for w in all(self.weeds) do
			-- This does not work!!
			w:draw()
			
			-- This works
			weed.draw(w)
			
		end
	end
}



function pcord(position)
	printh("{" .. position[1] .. ", " .. position[2] .. "}", "demo_log.txt")
end	

function _init()
	cls()
	park:init(1)
end

function _update()

end

function _draw()
	cls()
	park:draw()
end