#include <acknex.h>
BMAP *bmpRT;
function Render_to_bmap ()
{
bmap_rendertarget ( bmpRT, 0, 0 );
draw_quad ( NULL, vector(random(224),random(224),0), NULL, vector(32,32,0), NULL, vector(random(255),random(255),random(255)), 100, 0 );
bmap_rendertarget ( NULL, 0, 0 );
}
function main()
{
video_set ( 256, 256, 32, 2 );
wait(3);
bmpRT = bmap_createblack ( 256, 256, 32 );
PANEL *panRT = pan_create ( "", 1 );
panRT.bmap = bmpRT;
panRT.flags |= SHOW;
on_space = Render_to_bmap;
while ( !key_esc ) wait(1);
sys_exit(NULL);
}