compiler_options _max_process=10000; PROGRAM m7bug; GLOBAL ground_map; file1; map; ground_wide = 512; ground_high = 512; modex=800; modey=600; //------------------------------------------------------------------------------------- private i; BEGIN x=ground_wide/2; y=ground_high-32; mouse.x=100; mouse.y=100; map=makemap(); set_fps(60,0); //write_int(0,10,10,0,&fps); set_mode(800600); define_region(1,0,0,400,300); define_region(2,0,300,400,300); define_region(3,400,0,400,300); define_region(4,400,300,400,300); from i=1 to 4; start_mode7(i, file1, ground_map,0, i, 128+i*16); end m7[1].height = 3210; m7[1].distance = 1144; m7[1].color = 210; m7[1].camera = map; m7[1].horizon =-200; m7[1].focus = 500; m7[1].z = 0; from i=2 to 4; m7[i].height = m7[1].height; m7[i].distance =m7[1].distance ; m7[i].color = m7[1].color; m7[i].camera = m7[1].camera ; m7[i].horizon =m7[1].horizon; m7[i].focus = m7[1].focus; m7[i].z = m7[1].z; end marker(); END //---------------------------------------------- process marker(); begin graph=new_map(100,100,50,50,rand(0,255)); x=0; y=0; ctype=c_m7; loop frame; end end //--------------------------------------------------------------------------- PROCESS makemap() PRIVATE i; j; BEGIN ctype = c_m7; x=ground_wide/2; y=ground_high/2; //graph=3; angle=90000; ground_map =new_map(ground_wide,ground_high,ground_wide/2,ground_high/2,16*rand(0,14)); loop if(key(_a)) angle+=3000; end if(key(_d)) angle-=3000; end frame; end END //---------------------------------------------------------------------------