Commodore 64= : Depacking colors anyone

' c64 random color loading demo

Strict

Graphics 640,480,0,SOFTSYNC

Repeat
	C64Loading
	Flip
	FlushMem
Until KeyHit(KEY_ESCAPE)

End

Function C64Loading()
	Local y=0,h
	Repeat
		h=Rand(5,60)
		SetColor Rand(255),Rand(255),Rand(255)
		DrawRect 0,y,GraphicsWidth(),h
		y:+h
	Until y>=GraphicsHeight()
End Function

Well, since we are in C64 mode here is something which may interest you. I created program (for fun) which displays images using C64 graphics. Just choose a directory which contains a bunch of images (png/jpg/bmp/tga).




Download View64