void error_out (char * text) { set_video_mode (3); dos_print (text); exit (EXIT_SUCCESS); }
void dos_printf( const char *format, ... ) { static char dbg_buf[256]; va_list args; va_start( args, format ); vsnprintf( dbg_buf, sizeof( dbg_buf ), format, args ); // Convert to DOS string dbg_buf[ strlen( dbg_buf ) ] = '\$'; dos_print( dbg_buf ); va_end( args ); }
trap_version TRAPENTRY TrapInit( char *parm, char *err, bool remote ) /*******************************************************************/ { trap_version ver; char ver_msg[] = "CauseWay API version = 0.00\r\n$"; err[0] = '\0'; /* all ok */ ver.major = TRAP_MAJOR_VERSION; ver.minor = TRAP_MINOR_VERSION; ver.remote = FALSE; RedirectInit(); RealNPXType = NPXType(); HBRKInit(); WatchCount = 0; FakeBreak = FALSE; XVersion = GrabVectors(); ver_msg[23] = XVersion / 256 + '0'; ver_msg[25] = ( XVersion % 256 ) / 10 + '0'; ver_msg[26] = XVersion % 256 % 10 + '0'; dos_print( ver_msg ); return( ver ); }
int main(int argc, char *argv[]) { /* if (argc > 0) { while (argc > 0) { dos_print ("Unknown Argument: "); dos_print (makefp argv[argc]); argc--; } return (0); } */ init_random (); load_shapes (); demo_res ( Mode_320x200, 320, 200 ); demo_res ( Mode_320x400, 320, 400 ); demo_res ( Mode_360x200, 360, 200 ); demo_res ( Mode_360x400, 360, 400 ); demo_res ( Mode_320x240, 320, 240 ); demo_res ( Mode_320x480, 320, 480 ); demo_res ( Mode_360x240, 360, 240 ); demo_res ( Mode_360x480, 360, 480 ); page_demo (); set_video_mode (3); dos_print ("This Mode X Demo is Finished"); return (0); }
void page_demo () { char *Error1 = "Failure during SET_VGA_MODEX (0, 320, 200, 2) call"; int Last_Objects[2], Visible_Objects; int Screen_X = 384; int Screen_Y = 224; int x, y, z; int c, dc; int x1, y1, x2, y2; int Sprite_X, Sprite_Y; int Current_Page; int New_X, New_Y; int View_X, View_Y, View_Max, View_Cnt, View_XD, View_YD; int Set_Color, Prev_Color, S_Dir, P_Dir; int Demo_Running = True; int redo, code; int pee; pee = set_vga_modex(Mode_320x200, Screen_X, Screen_Y, 3); if ( pee > 0) { set_video_mode (3); dos_print (Error1); fprintf(stdout, "return value is %d\n", pee); //error_out (Error1); exit (EXIT_SUCCESS); } set_active_page (0); clear_vga_screen (c_BLACK); print_str ("This is a Test of the Following Functions:", 99, 10, 9, c_bWHITE, c_BLACK); draw_line (10, 18, 350, 18, c_YELLOW); print_str ("SET_ACTIVE_PAGE", 99, 10, 20, c_bBLUE, c_BLACK); print_str ("SET_DISPLAY_PAGE", 99, 10, 30, c_GREEN, c_BLACK); print_str ("SET_DAC_REGISTER", 99, 10, 40, c_RED, c_BLACK); print_str ("CLEAR_VGA_SCREEN", 99, 10, 50, c_CYAN, c_BLACK); print_str ("TDRAW_BITMAP", 99, 10, 60, c_PURPLE, c_BLACK); print_str ("COPY_PAGE", 99, 10, 70, c_GREEN, c_BLACK); print_str ("COPY_BITMAP", 99, 10, 80, c_CYAN, c_BLACK); print_str ("GPRINTC", 99, 10, 90, c_BLUE, c_BLACK); print_str ("TGPRINTC", 99, 10, 100, c_GREEN, c_BLACK); print_str ("SET_WINDOW", 99, 10, 110, c_RED, c_BLACK); print_str ("VIRTUAL SCREEN SIZES", 20, 190, 20, c_bBLUE, c_BLACK); print_str (" SMOOTH SCROLLING", 20, 190, 30, c_GREEN, c_BLACK); print_str (" SPRITE ANIMATION", 20, 190, 40, c_CYAN, c_BLACK); print_str (" PAGE FLIPPING", 20, 190, 50, c_RED, c_BLACK); print_str (" COLOR CYCLING", 20, 190, 60, c_PURPLE, c_BLACK); for (x = 0; x <=60; x++) { set_dac_register (50 + x, 3 + x, 0, 60 - x); set_dac_register (150 + x, 3 + x, 0, 60 - x); } c = 0; dc = 1; for (x = 0; x <= (Screen_X / 2); x++) { draw_line (Screen_X / 2 - 1, Screen_Y / 4, x, Screen_Y - 1, c + 50); draw_line (Screen_X / 2, Screen_Y / 4, Screen_X - x - 1, Screen_Y - 1, c + 50); c+= dc; if ((c == 0) || (c == 60) ) { dc = -dc;} } tprint_str ("Press <ANY KEY> to Continue", 99, 72, 190, c_bWHITE); tprint_str ("< > = Faster < > = Slower", 99, 72, 204, c_bGREEN); tprint_str ("< > = Fewer Shapes < > = More Shapes", 99, 32, 218, c_bCYAN); tgprintc (43, 80, 204, c_YELLOW); tgprintc (45, 200, 204, c_YELLOW); tgprintc (25, 40, 218, c_YELLOW); tgprintc (24, 200, 218, c_YELLOW); copy_page (0, 1); copy_page (0, 2); for (x = 0; x < MAX_SPRITES; x++) { do { Obj[x].X_Dir = random_int(7) - 3; Obj[x].Y_Dir = random_int(7) - 3; } while ( (Obj[x].X_Dir == 0) && (Obj[x].Y_Dir == 0) ); Obj[x].Shape = x % MAX_SHAPES; Sprite_X = Img[Obj[x].Shape].X_Width; Sprite_Y = Img[Obj[x].Shape].Y_Width; Obj[x].X_pos = 1 + random_int(Screen_X - Sprite_X - 2); Obj[x].Y_pos = 1 + random_int(Screen_Y - Sprite_Y - 2); Obj[x].Last_X[0] = Obj[x].X_pos; Obj[x].Last_X[1] = Obj[x].X_pos; Obj[x].Last_Y[0] = Obj[x].Y_pos; Obj[x].Last_Y[1] = Obj[x].Y_pos; } Current_Page = 0; View_X = 0; View_Y = 0; View_Max = 3; View_Cnt = 0; View_XD = 1; View_YD = 1; Set_Color = 3; S_Dir = 1; Prev_Color = 0; P_Dir = 1; Visible_Objects = MAX_SPRITES / 2; Last_Objects[0] = 0; Last_Objects[1] = 0; while (Demo_Running) { set_active_page (Current_Page); /* Erase Old Images */ for (x = 0; x <= Last_Objects[Current_Page]; x++) { z = 2; y = Obj[x].Shape; x1 = Obj[x].Last_X[Current_Page]; y1 = Obj[x].Last_Y[Current_Page]; x2 = x1 + Img[y].X_Width -1; y2 = y1 + Img[y].Y_Width -1; x1 = x1 & 0xfffc; x2 = x2 | 0x0003; copy_bitmap (z, x1, y1, x2, y2, Current_Page, x1, y1); } /* Draw new images */ for (x = 0; x <= Visible_Objects; x++) { Sprite_X = Img[Obj[x].Shape].X_Width; Sprite_Y = Img[Obj[x].Shape].Y_Width; /* Move Sprite */ do { redo = False; New_X = Obj[x].X_pos + Obj[x].X_Dir; if (( New_X < 0 ) || (New_X + Sprite_X > Screen_X) ) { Obj[x].X_Dir = -Obj[x].X_Dir; if (random_int(20) == 1) { do { Obj[x].X_Dir = random_int(7) - 3; Obj[x].Y_Dir = random_int(7) - 3; } while ( (Obj[x].X_Dir == 0) && (Obj[x].Y_Dir == 0) ); redo = True; } } } while (redo); Obj[x].X_pos = Obj[x].X_pos + Obj[x].X_Dir; do { redo = False; New_Y = Obj[x].Y_pos + Obj[x].Y_Dir; if ( (New_Y < 0) || (New_Y + Sprite_Y > Screen_Y) ) { Obj[x].Y_Dir = -Obj[x].Y_Dir; if (random_int(20) == 1) { do { Obj[x].X_Dir = random_int(7) - 3; Obj[x].Y_Dir = random_int(7) - 3; } while ( (Obj[x].X_Dir == 0) && (Obj[x].Y_Dir == 0) ); redo = True; } } } while (redo); Obj[x].Y_pos = Obj[x].Y_pos + Obj[x].Y_Dir; /* Draw Sprite */ tdraw_bitmap ((char far*) &Img[Obj[x].Shape], Obj[x].X_pos, Obj[x].Y_pos, Sprite_X, Sprite_Y); Obj[x].Last_X[Current_Page] = Obj[x].X_pos; Obj[x].Last_Y[Current_Page] = Obj[x].Y_pos; } Last_Objects[Current_Page] = Visible_Objects; /* Pan Screen Back & Forth */ View_Cnt++; if (View_Cnt >= View_Max) { View_X+= View_XD; if ( (View_X == 0) || (View_X == 39) ) {View_XD = -View_XD;} if (View_XD < 0) { View_Y+= View_YD; if ( (View_Y == 0) || (View_Y == 39) ) {View_YD = -View_YD;} } set_window (Current_Page, View_X, View_Y); View_Cnt = 0; } else { set_display_page (Current_Page); } /* Cycle Colors */ set_dac_register (50 + Prev_Color, 3 + Prev_Color, 0, 60 - Prev_Color); set_dac_register (50 + Set_Color, Set_Color, 10, 63 - Set_Color); set_dac_register (150 + Prev_Color, 3 + Prev_Color, 0, 60 - Prev_Color); set_dac_register (150 + Set_Color, 63, 63, Set_Color); Set_Color+= S_Dir; if ( (Set_Color == 60) || (Set_Color == 0) ) {S_Dir = -S_Dir;} Prev_Color+= P_Dir; if ( (Prev_Color == 60) || (Prev_Color == 0) ) {P_Dir = -P_Dir;} /* Check for Keystroke */ Current_Page = Current_Page ^ 0x01; code = scan_keyboard (); if (code == Ky_ESC) {Demo_Running = False;} if (code == Ky_Plus) { if (View_Max < 12) {View_Max++;} } if (code == Ky_Minus) { if (View_Max > 1) {View_Max--;} if (View_Cnt >= View_Max) {View_Cnt = 0;} } if (code == Ky_Up) { if (Visible_Objects < MAX_SPRITES-1) {Visible_Objects++;} } if (code == Ky_Down) { if (Visible_Objects > 0) {Visible_Objects--;} } } }