Taser script

x={}
y={}
lastlife={}
startx={}
starty={}
startx = 242
starty = 252
x = startx
y = starty

function die()
	if tpt.get_property("type",x-2,y)==53 then
		tpt.unregister_step(leave)
		if tpt.get_property("life",x-2,y)~=0 then
			lastlife = tpt.get_property("life",x-2,y)
			tpt.set_property("life",lastlife-1,x-2,y)
			tpt.drawline(startx,starty,x-3,y,90,90,90)
		else
			tpt.delete(x-2,y)
			tpt.register_step(leave)
			x = startx
			y = starty
		end
	end
end

function leave()
	if tpt.get_property("type",222,258)==15 then
		if tpt.get_property("life",222,258)==1 then
			while tpt.get_property("type",x+1,y)==0 and x~=600 do
				x = x+1
			end
			tpt.create(x-2,y,53)
			tpt.create(x-1,y,14)
			tpt.create(x,y,88)
			tpt.create(x,y+1,88)
			tpt.create(x,y-1,88)
			tpt.create(x-1,y+1,88)
			tpt.create(x-1,y-1,88)
			tpt.create(x-2,y+1,88)
			tpt.create(x-2,y-1,88)
			tpt.set_property("tmp",7,x,y)
			tpt.set_property("tmp",7,x,y+1)
			tpt.set_property("tmp",7,x,y-1)
			tpt.set_property("tmp",7,x-1,y+1)
			tpt.set_property("tmp",7,x-1,y-1)
			tpt.set_property("tmp",7,x-2,y+1)
			tpt.set_property("tmp",7,x-2,y-1)
			tpt.set_property("life",500,x-2,y)
		end
	end
end

tpt.set_pause(0)
tpt.set_console(0)

tpt.register_step(leave)
tpt.register_step(die)