CP - Alien Breed Remake - 5

Miscellaneous Forums/Blitz Showcase/CP - Alien Breed Remake - 5

Rob Farley
 #1
Really really simple map thing... Totally unoptimised in that is used plot! (gasp!) but this is the sort of thing I think the map should be.

Function ShowMap(i)
	Cls
	Color 255,255,255
	For x=0 To 255
	For y=0 To 255
	If map(x,y,LayerCollision)>0 Then Color 0,0,0 Else Color 100,100,100
	If map(x,y,layer_visible)=0 Then Color 100,0,0
	Plot x,y
	Next
	Next
		
	Flip
		
	Repeat:Until KeyHit(1)
	
	FlushKeys	
End Function