//:::: RESULTS (FPS) ::::
//Celeron D 2500:
//  (-Os) 170
//  (-O3) 220
//iPAQ 3850 200 mHz, 8bit color:
//  (-Os) 8
//  (-O3) 10
//iPAQ 3850 200 mHz, 16bit color:
//  (-Os) 6
//  (-O3) 9
//Palm TungstenT 140 mHz, 8bit color:
//  (-Os) 6 
//  (-O3) 7
//Palm TungstenT 140 mHz, 16bit color:
//  (-Os) 5
//  (-O3) 6

resize_pixi( 0, 240, 160 )

load_music( "test_music.sunvox" )
music_volume( 256 )
play_music

//by Alex Zolotov (NightRadio). nightradio@gmail.com

start_timer(0)
l:
transp(16)
clear(BLACK)
t=get_timer(0)
t_reset
t_rotate_z( t/28 )
c = rand&255
transp(256)
dot(,,get_color(c+128,c+64,c))
transp(128)
pixi(0,0,1,2) pixi(0,-1,0) pixi(0,0,-1)
transp( 256 )
t_reset
f = fps
print( "fps: $f", -78, -78, #FFFFFF )
frame(0)
go l