' test module trace
' 1234 +++ 

?angle = 0
?offset = 0
?loop = 0
' stats
?last_timer = timer
?last_loop = 0
?fps = 0
?move = 0

'select screen front
scale screen 0, 0 to 640, 360
'screen size 640,360

do
	?loop + 1
	?angle + 1 / 15
	?offset + 0.1 / 14
	
	?width = 180 * (sin ?angle * .3)
	?size = 7 * (sin ?angle - ?offset / 3)
	?x = 400 + ?width * (sin ?angle)
	?y = 180 + 140 * (sin ?angle + ?offset)
	
	'set trace scale 1.01' +.5*(sin ?angle)
	?move + .1
	?second = 50 + 50 * (sin ?move)
	
	color #1243
	trace circle ?size to ?x, ?y
	trace fill
	
	color #3213
	trace circle ?size / 2 to ?x - ?second / 2, (?y / 2) + ?second
	trace fill
	
	if (mod ?loop, 21) = 0
		
		'trace scroll x -1 y 0
		update
		scroll screen -1, 0
		
		
		
		if (mod ?loop, 21 * 4) = 0
			mix trace "default"
			'trace opacity 0.10
			'trace color #123
			'trace rectangle 0,0 to 640,360
			'trace fill
			color #11223310
			fill screen
		end
		
		cls
		print "loop=?loop  fps=" + (fps)
		
		mix trace "lighter"
		'set trace pen "124"
	end
	
loop