git.mutantstargoat.com Git - dosdemo/blob - src/demo.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <math.h>
   5 #include <ctype.h>
   6 #include <errno.h>
   7 #include <limits.h>
   8 #include "demo.h"
   9 #include "screen.h"
  10 #include "3dgfx.h"
  11 #include "music.h"
  12 #include "cfgopt.h"
  13 #include "tinyfps.h"
  14 #include "util.h"
  15
  16 #define FB_WIDTH        320
  17 #define FB_HEIGHT       240
  18
  19 int fb_width = FB_WIDTH;
  20 int fb_height = FB_HEIGHT;
  21 int fb_bpp = 16;
  22 uint16_t *fb_pixels, *vmem_back, *vmem_front;
  23 unsigned long time_msec;
  24 int mouse_x, mouse_y;
  25 unsigned int mouse_bmask;
  26
  27 float sball_matrix[] = {1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1};
  28
  29 static unsigned long nframes;
  30 static int console_active;
  31
  32 int demo_init(int argc, char **argv)
  33 {
  34         struct screen *scr;
  35         char *env;
  36
  37         if(load_config("demo.cfg") == -1) {
  38                 return -1;
  39         }
  40         if((env = getenv("START_SCR"))) {
  41                 opt.start_scr = env;
  42         }
  43         if(parse_args(argc, argv) == -1) {
  44                 return -1;
  45         }
  46
  47         initFpsFonts();
  48
  49         if(g3d_init() == -1) {
  50                 return -1;
  51         }
  52         g3d_framebuffer(fb_width, fb_height, fb_pixels);
  53
  54         if(opt.music) {
  55                 if(music_open("data/test.mod") == -1) {
  56                         return -1;
  57                 }
  58         }
  59
  60         if(scr_init() == -1) {
  61                 return -1;
  62         }
  63         if(opt.start_scr) {
  64                 scr = scr_lookup(opt.start_scr);
  65         } else {
  66                 scr = scr_screen(0);
  67         }
  68
  69         if(!scr || scr_change(scr, 4000) == -1) {
  70                 fprintf(stderr, "screen %s not found\n", opt.start_scr ? opt.start_scr : "0");
  71                 return -1;
  72         }
  73
  74         /* clear the framebuffer at least once */
  75         memset(fb_pixels, 0, fb_width * fb_height * fb_bpp / CHAR_BIT);
  76
  77         if(opt.music) {
  78                 music_play();
  79         }
  80         return 0;
  81 }
  82
  83 void demo_cleanup(void)
  84 {
  85         if(opt.music) {
  86                 music_close();
  87         }
  88         scr_shutdown();
  89         g3d_destroy();
  90
  91         if(time_msec) {
  92                 float fps = (float)nframes / ((float)time_msec / 1000.0f);
  93                 printf("average framerate: %.1f\n", fps);
  94         }
  95 }
  96
  97 void demo_draw(void)
  98 {
  99         if(opt.music) {
 100                 music_update();
 101         }
 102         scr_update();
 103         scr_draw();
 104
 105         draw_mouse_pointer(vmem_front);
 106
 107         ++nframes;
 108 }
 109
 110
 111
 112 #define DEST(x, y)      dest[(y) * FB_WIDTH + (x)]
 113 void draw_mouse_pointer(uint16_t *fb)
 114 {
 115         uint16_t *dest = fb + mouse_y * FB_WIDTH + mouse_x;
 116         int ylines = FB_HEIGHT - mouse_y;
 117
 118         switch(ylines) {
 119         default:
 120         case 10:
 121                 DEST(0, 9) = 0xffff;
 122         case 9:
 123                 DEST(0, 8) = 0xffff;
 124                 DEST(1, 8) = 0xffff;
 125         case 8:
 126                 DEST(0, 7) = 0xffff;
 127                 DEST(2, 7) = 0xffff;
 128                 DEST(1, 7) = 0;
 129         case 7:
 130                 DEST(6, 6) = 0xffff;
 131                 DEST(0, 6) = 0xffff;
 132                 DEST(3, 6) = 0xffff;
 133                 DEST(4, 6) = 0xffff;
 134                 DEST(5, 6) = 0xffff;
 135                 DEST(1, 6) = 0;
 136                 DEST(2, 6) = 0;
 137         case 6:
 138                 DEST(5, 5) = 0xffff;
 139                 DEST(0, 5) = 0xffff;
 140                 DEST(1, 5) = 0;
 141                 DEST(2, 5) = 0;
 142                 DEST(3, 5) = 0;
 143                 DEST(4, 5) = 0;
 144         case 5:
 145                 DEST(4, 4) = 0xffff;
 146                 DEST(0, 4) = 0xffff;
 147                 DEST(1, 4) = 0;
 148                 DEST(2, 4) = 0;
 149                 DEST(3, 4) = 0;
 150         case 4:
 151                 DEST(3, 3) = 0xffff;
 152                 DEST(0, 3) = 0xffff;
 153                 DEST(1, 3) = 0;
 154                 DEST(2, 3) = 0;
 155         case 3:
 156                 DEST(2, 2) = 0xffff;
 157                 DEST(0, 2) = 0xffff;
 158                 DEST(1, 2) = 0;
 159         case 2:
 160                 DEST(1, 1) = 0xffff;
 161                 DEST(0, 1) = 0xffff;
 162         case 1:
 163                 DEST(0, 0) = 0xffff;
 164         }
 165 }
 166
 167 static void change_screen(int idx)
 168 {
 169         printf("change screen %d\n", idx);
 170         scr_change(scr_screen(idx), 4000);
 171 }
 172
 173 #define CBUF_SIZE       64
 174 #define CBUF_MASK       (CBUF_SIZE - 1)
 175 void demo_keyboard(int key, int press)
 176 {
 177         static char cbuf[CBUF_SIZE];
 178         static int rd, wr;
 179         char inp[CBUF_SIZE + 1], *dptr;
 180         int i, nscr;
 181
 182         if(press) {
 183                 switch(key) {
 184                 case 27:
 185                         demo_quit();
 186                         return;
 187
 188                 case 127:
 189                         debug_break();
 190                         return;
 191
 192                 case '`':
 193                         console_active = !console_active;
 194                         if(console_active) {
 195                                 printf("> ");
 196                                 fflush(stdout);
 197                         } else {
 198                                 putchar('\n');
 199                         }
 200                         return;
 201
 202                 case '\b':
 203                         if(console_active) {
 204                                 if(wr != rd) {
 205                                         printf("\b \b");
 206                                         fflush(stdout);
 207                                         wr = (wr + CBUF_SIZE - 1) & CBUF_MASK;
 208                                 }
 209                                 return;
 210                         }
 211                         break;
 212
 213                 case '\n':
 214                 case '\r':
 215                         if(console_active) {
 216                                 dptr = inp;
 217                                 while(rd != wr) {
 218                                         *dptr++ = cbuf[rd];
 219                                         rd = (rd + 1) & CBUF_MASK;
 220                                 }
 221                                 *dptr = 0;
 222                                 if(inp[0]) {
 223                                         printf("\ntrying to match: %s\n", inp);
 224                                         nscr = scr_num_screens();
 225                                         for(i=0; i<nscr; i++) {
 226                                                 if(strstr(scr_screen(i)->name, inp)) {
 227                                                         change_screen(i);
 228                                                         break;
 229                                                 }
 230                                         }
 231                                 }
 232                                 console_active = 0;
 233                                 return;
 234                         }
 235                         break;
 236
 237                 default:
 238                         if(key >= '1' && key <= '9' && key <= '1' + scr_num_screens()) {
 239                                 change_screen(key - '1');
 240                         } else if(key == '0' && scr_num_screens() >= 10) {
 241                                 change_screen(9);
 242                         }
 243
 244                         if(console_active) {
 245                                 if(key < 256 && isprint(key)) {
 246                                         putchar(key);
 247                                         fflush(stdout);
 248
 249                                         cbuf[wr] = key;
 250                                         wr = (wr + 1) & CBUF_MASK;
 251                                         if(wr == rd) { /* overflow */
 252                                                 rd = (rd + 1) & CBUF_MASK;
 253                                         }
 254                                 }
 255                                 return;
 256                         }
 257                         break;
 258                 }
 259
 260                 scr_keypress(key);
 261         }
 262 }
 263
 264
 265 void mouse_orbit_update(float *theta, float *phi, float *dist)
 266 {
 267         static int prev_mx, prev_my;
 268         static unsigned int prev_bmask;
 269
 270         if(mouse_bmask) {
 271                 if((mouse_bmask ^ prev_bmask) == 0) {
 272                         int dx = mouse_x - prev_mx;
 273                         int dy = mouse_y - prev_my;
 274
 275                         if(dx || dy) {
 276                                 if(mouse_bmask & MOUSE_BN_LEFT) {
 277                                         float p = *phi;
 278                                         *theta += dx * 1.0;
 279                                         p += dy * 1.0;
 280
 281                                         if(p < -90) p = -90;
 282                                         if(p > 90) p = 90;
 283                                         *phi = p;
 284                                 }
 285                                 if(mouse_bmask & MOUSE_BN_RIGHT) {
 286                                         *dist += dy * 0.5;
 287
 288                                         if(*dist < 0) *dist = 0;
 289                                 }
 290                         }
 291                 }
 292         }
 293
 294         prev_mx = mouse_x;
 295         prev_my = mouse_y;
 296         prev_bmask = mouse_bmask;
 297 }