randomize
	screen 0,320,240,0
	cls 4
	buffer 3,320,240,0
	cls 4
	font "�l�r �S�V�b�N",40,1
	buffer 4,,,0
	cls 0
*main
	gsel 3
	gmode 0,320,240
	pos 5,5:gzoom 310,230,0
	gmode 6,320,240,2
	pos 0,0:gcopy 4,0,0
	rnd x,320:x-=20:rnd y,240:y-=20
	rnd r,256:rnd g,256:rnd b,256
	color r,g,b:pos x,y:mes "��"

	gsel 0
	gmode 3,320,240,64
	pos 0,0:gcopy 3,0,0
	await 20
	goto *main

	stop