Implement fading in ogl_urect()
[btb/d2x.git] / 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 }