unused/bios/testm.c

   1 /*
   2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   3 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   6 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   8 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
   9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  12 */
  13
  14 #include "key.h"
  15 #include "joy.h"
  16 #include "mouse.h"
  17 #include "mono.h"
  18
  19 void main (void)
  20 {
  21         int i,c, j, j1;
  22
  23         short jx, jy, jb;
  24
  25         key_init();
  26         keyd_buffer_type = 1;
  27
  28         if (! minit()) {printf("No mono card\n"); exit(5);}
  29
  30         mopen( 1,1,1,37,10,  "Keyboard" );
  31         mopen( 2,1,41,37,10, "Joystick");
  32         mopen( 3,13,1,37,10, "Mouse" );
  33         mopen( 4,13,41,37,10,"Instructions" );
  34
  35         mprintf( 4, "F1 - turn off buffering.\n" );
  36         mprintf( 4, "F2 - turn on ASCII buffering.\n" );
  37         mprintf( 4, "F3 - turn on scan code buffering.\n" );
  38         mprintf( 4, "F4 - flush keyboard.\n" );
  39         mprintf( 4, "F5 - turn repeat off.\n");
  40         mprintf( 4, "F6 - turn repeat on.\n");
  41         mprintf( 4, "F7 - do an INT 3.\n" );
  42         mprintf( 4, "F10 - to display some boxes.\n" );
  43         //mprintf( 4, "Arrows - example unbuffered.\n");
  44         //mprintf( 4, "ESC - exit program.\n" );
  45
  46         if ( (j1=joy_init())==0 )   {
  47                 mprintf( 2, "Not installed.\n" );
  48         }
  49
  50
  51         while( !keyd_pressed[KEY_ESC]  ) {
  52
  53                 if (j1) {
  54                         joy_get_pos( &jx, &jy );
  55                         jb = joy_get_btns();
  56                         mprintf( 2,"(%d,%d)\tB1:%d\tB2:%d\n", jx, jy, jb&1, jb&2 );
  57                 }
  58
  59                 //ms_read();
  60                 //mprintf( 3, "(%d,%d)\tB1:%d\tB2:%d\tB3:%d\n", (int)msd_deltax, (int)msd_deltay, 1&msd_button_status, 2&msd_button_status, 4&msd_button_status);
  61
  62                 if (keyd_pressed[KEY_C])
  63                         mclose(1);
  64
  65                 if (keyd_pressed[KEY_O])
  66                         mopen( 1,1,1,37,10,  "Keyboard" );
  67
  68
  69                 if (keyd_pressed[KEY_F1])
  70                         keyd_buffer_type = 0;
  71
  72                 if (keyd_pressed[KEY_F2])
  73                         keyd_buffer_type = 1;
  74
  75                 if (keyd_pressed[KEY_F3])
  76                         keyd_buffer_type = 2;
  77
  78                 if (keyd_pressed[KEY_F4])
  79                         key_flush();
  80
  81                 if (keyd_pressed[KEY_F5])
  82                         keyd_repeat = 0;
  83
  84                 if (keyd_pressed[KEY_F6])
  85                         keyd_repeat = 1;
  86
  87                 if (keyd_pressed[KEY_F7] )
  88                         key_debug();
  89
  90                 if (keyd_pressed[KEY_UP])
  91                         mputc( 1, 24 );
  92
  93                 if (keyd_pressed[KEY_DOWN])
  94                         mputc( 1, 25 );
  95
  96                 if (keyd_pressed[KEY_LEFT])
  97                         mputc( 1, 27 );
  98
  99                 if (keyd_pressed[KEY_RIGHT])
 100                         mputc( 1, 26 );
 101
 102                 if (keyd_pressed[KEY_F10])
 103                         mputc( 1, 254 );
 104
 105                 if (key_checkch())   {
 106                         c = key_getch();
 107                         if (keyd_buffer_type==1) {
 108                                 mputc( 1, c );
 109                         }
 110                         else
 111                         {
 112                                 mprintf( 1, "[%2X]\n", c );
 113
 114                         }
 115                 }
 116         }
 117
 118         key_close();
 119
 120         mclose(0);
 121
 122 }