main.c

   1 /* Variations on RockDodger
   2  * Space Rocks copyright (C) 2001 Paul Holt <pad@pcholt.com>
   3  *
   4  * Project fork 2004, Jason Woofenden and Joshua Grams.
   5  * (a whole bunch of modifications and project rename)
   6
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the
   9  * Free Software Foundation; either version 2 of the License, or (at your
  10  * option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  20  */
  21
  22 #include <math.h>
  23 #include <SDL.h>
  24 #include <SDL_image.h>
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <time.h>
  30
  31 #include "font.h"
  32
  33 #include "args.h"
  34 #include "common.h"
  35 #include <config.h>
  36 #include "vorconfig.h"
  37 #include "dust.h"
  38 #include "file.h"
  39 #include "float.h"
  40 #include "globals.h"
  41 #include "mt.h"
  42 #include "rocks.h"
  43 #include "score.h"
  44 #include "sprite.h"
  45 #include "sound.h"
  46 #include "autopilot.h"
  47
  48 // ************************************* VARS
  49 // SDL_Surface global variables
  50 SDL_Surface
  51         *surf_screen,   // Screen
  52         *surf_b_variations, // "variations" banner
  53         *surf_b_on, // "on" banner
  54         *surf_b_rockdodger, // "rockdodger" banner
  55         *surf_b_game,   // Title element "game"
  56         *surf_b_over,   // Title element "over"
  57         *surf_life,     // Indicator of number of ships remaining
  58         *surf_rock[NROCKS],     // THE ROCKS
  59         *surf_font_big; // The big font
  60
  61
  62 font *g_font;
  63
  64 struct dot {
  65         int active;
  66         float x, y;
  67         float dx, dy;
  68         float mass;   // in DOT_MASS_UNITs
  69         float decay;  // rate at which to reduce mass.
  70         int heat;     // heat multiplier (color).
  71 };
  72
  73 void draw(void);
  74
  75 struct dot edot[MAXENGINEDOTS], *dotptr = edot;
  76 struct dot bdot[MAXBANGDOTS];
  77
  78 // Other global variables
  79 char topline[1024];
  80 char *initerror = "";
  81 int screenshot_number = 0;
  82
  83 struct ship ship = { SHIP, 0, NULL, XSIZE/2, YSIZE/2, BARRIER_SPEED, 0.0 };
  84
  85 float screendx = BARRIER_SPEED, screendy = 0.0;
  86 float dist_ahead;
  87
  88 // all movement is based on t_frame.
  89 unsigned long frames, start, end;
  90 float t_frame;  // length of this frame (in ticks = 1/20th second)  adjusted for gamespeed
  91 int ms_frame;   // length of this frame (milliseconds)
  92 int ms_end;     // end of this frame (milliseconds)
  93
  94 float gamespeed = 1.00;
  95
  96 int score;
  97
  98 float fadetimer = 0;
  99
 100 int paused = 0;
 101
 102 // bangdot start (bd1) and end (bd2) position:
 103 int bd1 = 0, bd2 = 0;
 104
 105 enum states {
 106         TITLE_PAGE,
 107         GAMEPLAY,
 108         DEAD_PAUSE,
 109         GAME_OVER,
 110         HIGH_SCORE_ENTRY,
 111         HIGH_SCORE_DISPLAY
 112 };
 113 enum states state = TITLE_PAGE;
 114 float state_timeout = 600.0;
 115
 116 #define NSEQUENCE 3
 117 char *msgs[2][3] = {
 118         {
 119                 "Press SPACE for normal game",
 120                 "Press '1' for easy game",
 121                 "http://jasonwoof.org/vor"
 122         },
 123         {
 124                 "Press SPACE for easy game",
 125                 "Press '2' for normal game",
 126                 "http://jasonwoof.org/vor"
 127         }
 128 };
 129
 130 int bangdotlife, nbangdots;
 131 Uint16 heatcolor[W*3];
 132
 133 char *data_dir;
 134 extern char *optarg;
 135 extern int optind, opterr, optopt;
 136
 137 #define TO_TICKS(seconds) ((seconds)*20*gamespeed)
 138
 139 // ************************************* FUNCS
 140
 141 #ifdef nanosleep
 142 void
 143 tiny_sleep() {
 144         struct timespec t;
 145         t.tv_sec = 0;
 146         t.tv_nsec = 1;
 147         nanosleep(&t, 0);
 148 }
 149 #else
 150 #define tiny_sleep()
 151 #endif
 152
 153 void
 154 init_engine_dots() {
 155         int i;
 156         for(i = 0; i<MAXENGINEDOTS; i++) {
 157                 edot[i].active = 0;
 158         }
 159 }
 160
 161
 162 void
 163 new_engine_dots(void) {
 164         int dir, i;
 165         int n = t_frame * ENGINE_DOTS_PER_TIC;
 166         float a, r;  // angle, random length
 167         float dx, dy;
 168         float hx, hy; // half ship width/height.
 169         static const int s[4] = { 2, 1, 0, 1 };
 170         float time;
 171         float accelh, accelv, past_ship_dx, past_ship_dy;
 172
 173         hx = ship.image->w / 2;
 174         hy = ship.image->h / 2;
 175
 176         for(dir=0; dir<4; dir++) {
 177                 if(!(ship.jets & 1<<dir)) continue;
 178
 179                 for(i = 0; i<n; i++) {
 180                         if(dotptr->active == 0) {
 181                                 a = frnd()*M_PI + (dir-1)*M_PI_2;
 182                                 r = sin(frnd()*M_PI);
 183                                 dx = r * cos(a);
 184                                 dy = r * -sin(a);  // screen y is "backwards".
 185
 186                                 dotptr->decay = 3;
 187                                 dotptr->heat = 6;
 188
 189                                 // dot was created at a random time during the time span
 190                                 time = frnd() * t_frame; // this is how long ago
 191
 192                                 // calculate how fast the ship was going when this engine dot was
 193                                 // created (as if it had a smooth acceleration). This is used in
 194                                 // determining the velocity of the dots, but not their starting
 195                                 // location.
 196                                 accelh = ((ship.jets >> 2) & 1) - (ship.jets & 1);
 197                                 accelh *= THRUSTER_STRENGTH * time;
 198                                 past_ship_dx = ship.dx - accelh;
 199                                 accelv = ((ship.jets >> 1) & 1) - ((ship.jets >> 3) & 1);
 200                                 accelv *= THRUSTER_STRENGTH * time;
 201                                 past_ship_dy = ship.dy - accelv;
 202
 203                                 // the starting position (not speed) of the dot is calculated as
 204                                 // though the ship were traveling at a constant speed for this
 205                                 // t_frame.
 206                                 dotptr->x = (ship.x - (ship.dx - screendx) * time) + s[dir]*hx;
 207                                 dotptr->y = (ship.y - (ship.dy - screendy) * time) + s[(dir+1)&3]*hy;
 208                                 if(dir&1) {
 209                                         dotptr->dx = past_ship_dx + 2*dx;
 210                                         dotptr->dy = past_ship_dy + 20*dy;
 211                                         dotptr->mass = 60 * fabs(dy);
 212                                 } else {
 213                                         dotptr->dx = past_ship_dx + 20*dx;
 214                                         dotptr->dy = past_ship_dy + 2*dy;
 215                                         dotptr->mass = 60 * fabs(dx);
 216                                 }
 217
 218                                 // move the dot as though it were created in the past
 219                                 dotptr->x += (dotptr->dx - screendx) * time;
 220                                 dotptr->y += (dotptr->dy - screendy) * time;
 221
 222                                 if(!fclip(dotptr->x, XSIZE) && !fclip(dotptr->y, YSIZE)) {
 223                                         dotptr->active = 1;
 224                                         if(dotptr - edot < MAXENGINEDOTS-1) {
 225                                                 dotptr++;
 226                                         } else {
 227                                                 dotptr = edot;
 228                                         }
 229                                 }
 230                         }
 231                 }
 232         }
 233 }
 234
 235
 236 void
 237 new_bang_dots(struct sprite *s)
 238 {
 239         int i, n, x, y;
 240         uint16_t *pixel, c;
 241         uint32_t colorkey;
 242         int row_inc;
 243         double theta, r;
 244         SDL_Surface *img = s->image;
 245
 246         n = 20;
 247         pixel = img->pixels;
 248         row_inc = img->pitch/sizeof(uint16_t) - img->w;
 249         colorkey = img->format->colorkey;
 250
 251         if(SDL_MUSTLOCK(img)) { SDL_LockSurface(img); }
 252
 253         for(i=0; i<n; i++) {
 254                 pixel = img->pixels;
 255                 for(y=0; y<img->h; y++) {
 256                         for(x = 0; x<img->w; x++) {
 257                                 c = *pixel++;
 258                                 if(c && c != colorkey) {
 259                                         theta = frnd()*M_PI*2;
 260                                         r = frnd(); r = 1 - r*r;
 261
 262                                         bdot[bd2].dx = 45*r*cos(theta) + s->dx;
 263                                         bdot[bd2].dy = 45*r*sin(theta) + s->dy;
 264                                         bdot[bd2].x = x + s->x;
 265                                         bdot[bd2].y = y + s->y;
 266                                         bdot[bd2].mass = frnd() * 99;
 267                                         bdot[bd2].decay = frnd()*1.5 + 0.5;
 268                                         bdot[bd2].heat = 3;
 269                                         bdot[bd2].active = 1;
 270
 271                                         bd2 = (bd2+1) % MAXBANGDOTS;
 272                                 }
 273                                 pixel += row_inc;
 274                         }
 275                 }
 276         }
 277
 278         if(SDL_MUSTLOCK(img)) { SDL_UnlockSurface(img); }
 279 }
 280
 281
 282 void
 283 move_dot(struct dot *d)
 284 {
 285         Sprite *hit;
 286         float mass;
 287
 288         if(d->active) {
 289                 d->x += (d->dx - screendx) * t_frame;
 290                 d->y += (d->dy - screendy) * t_frame;
 291                 d->mass -= t_frame * d->decay;
 292                 if(d->mass < 0 || fclip(d->x, XSIZE) || fclip(d->y, YSIZE))
 293                         d->active = 0;
 294                 else {
 295                         hit = pixel_collides(d->x, d->y);
 296                         if(hit) if(hit->type != SHIP) {
 297                                 d->active = 0;
 298                                 mass = sprite_mass(hit);
 299                                 hit->dx += DOT_MASS_UNIT * d->mass * (d->dx - hit->dx) / mass;
 300                                 hit->dy += DOT_MASS_UNIT * d->mass * (d->dy - hit->dy) / mass;
 301                         }
 302                 }
 303         }
 304 }
 305
 306 void
 307 move_dots(void)
 308 {
 309         int i;
 310
 311         for(i=0; i<MAXBANGDOTS; i++) move_dot(&bdot[i]);
 312         for(i=0; i<MAXENGINEDOTS; i++) move_dot(&edot[i]);
 313 }
 314
 315
 316 void
 317 draw_dot(struct dot *d)
 318 {
 319         uint16_t *pixels, *pixel;
 320         int row_inc;
 321
 322         if(d->active) {
 323                 pixels = (uint16_t *) surf_screen->pixels;
 324                 row_inc = surf_screen->pitch / sizeof(uint16_t);
 325                 pixel = pixels + (int)d->y * row_inc + (int)d->x;
 326                 *pixel = heatcolor[min(3*W-1, (int)(d->mass * d->heat))];
 327         }
 328 }
 329
 330 void
 331 draw_dots(void) {
 332         int i;
 333
 334         if(SDL_MUSTLOCK(surf_screen)) { SDL_LockSurface(surf_screen); }
 335         draw_dust();
 336         for(i=0; i<MAXBANGDOTS; i++) draw_dot(&bdot[i]);
 337         for(i=0; i<MAXENGINEDOTS; i++) draw_dot(&edot[i]);
 338         if(SDL_MUSTLOCK(surf_screen)) { SDL_UnlockSurface(surf_screen); }
 339 }
 340
 341 SDL_Surface *
 342 load_image_alpha(char *filename)
 343 {
 344         SDL_Surface *tmp, *img = NULL;
 345         char *s = add_data_path(filename);
 346         if(s) {
 347                 tmp = IMG_Load(s);
 348                 free(s);
 349                 if(tmp) {
 350                         img = SDL_DisplayFormatAlpha(tmp);
 351                         SDL_FreeSurface(tmp);
 352                 }
 353         }
 354         return img;
 355 }
 356
 357 SDL_Surface *
 358 load_image(char *filename)
 359 {
 360         SDL_Surface *tmp, *img = NULL;
 361         char *s = add_data_path(filename);
 362         if(s) {
 363                 tmp = IMG_Load(s);
 364                 free(s);
 365                 if(tmp) {
 366                         img = SDL_DisplayFormat(tmp);
 367                         SDL_FreeSurface(tmp);
 368                 }
 369         }
 370         return img;
 371 }
 372
 373 void
 374 load_ship(void)
 375 {
 376         load_sprite(SPRITE(&ship), "ship.png");
 377 }
 378
 379 void font_cleanup() {
 380         font_free(g_font);
 381 }
 382
 383 void
 384 set_video_mode() {
 385         Uint32 flag;
 386
 387         // Attempt to get the required video size
 388         flag = SDL_DOUBLEBUF | SDL_HWSURFACE;
 389         if(opt_fullscreen) flag |= SDL_FULLSCREEN;
 390         surf_screen = SDL_SetVideoMode(XSIZE,YSIZE,16,flag);
 391 }
 392
 393 void
 394 toggle_fullscreen() {
 395         opt_fullscreen = 1 - opt_fullscreen;
 396         set_video_mode();
 397         if(paused) {
 398                 draw();
 399         }
 400 }
 401
 402
 403 int
 404 init(void) {
 405
 406         int i;
 407         char *s;
 408
 409         // Where are our data files?
 410         if(!find_files()) exit(1);
 411         read_high_score_table();
 412
 413         if(opt_sound) {
 414                 // Initialize SDL with audio and video
 415                 if(SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO) != 0) {
 416                         opt_sound = 0;
 417                         fputs("Can't open sound, starting without it\n", stderr);
 418                         atexit(SDL_Quit);
 419                 } else {
 420                         atexit(SDL_Quit);
 421                         atexit(SDL_CloseAudio);
 422                         opt_sound = init_sound();
 423                 }
 424         } else {
 425                 // Initialize with video only
 426                 CONDERROR(SDL_Init(SDL_INIT_VIDEO) != 0);
 427                 atexit(SDL_Quit);
 428         }
 429
 430         play_tune(TUNE_TITLE_PAGE);
 431
 432
 433         // Attempt to get the required video size
 434         set_video_mode();
 435
 436         // Set the title bar text
 437         SDL_WM_SetCaption("Variations on Rockdodger", "VoR");
 438
 439         NULLERROR(surf_screen);
 440
 441         // Set the heat color from the range 0 (cold) to 300 (blue-white)
 442         for(i = 0; i<W*3; i++) {
 443                 heatcolor[i] = SDL_MapRGB(
 444                         surf_screen->format,
 445                         (i<W)?(i*M/W):(M),(i<W)?0:(i<2*W)?((i-W)*M/W):M,(i<2*W)?0:((i-W)*M/W) // Got that?
 446                 );
 447         }
 448
 449         // Load the banners
 450         NULLERROR(surf_b_variations = load_image_alpha("b_variations.png"));
 451         NULLERROR(surf_b_on = load_image_alpha("b_on.png"));
 452         NULLERROR(surf_b_rockdodger = load_image_alpha("b_rockdodger.png"));
 453
 454         NULLERROR(surf_b_game = load_image_alpha("b_game.png"));
 455         NULLERROR(surf_b_over = load_image_alpha("b_over.png"));
 456
 457         // Load the life indicator (small ship) graphic.
 458         NULLERROR(surf_life = load_image("life.png"));
 459
 460         // Load the font image
 461         s = add_data_path("font.png");
 462         if(s) {
 463                 g_font = font_load(s);
 464                 atexit(&font_cleanup);
 465         } else {
 466                 fprintf(stderr, "could create path to font\n");
 467                 exit(1);
 468         }
 469
 470         init_engine_dots();
 471         init_dust();
 472
 473         init_sprites();
 474         add_sprite(SPRITE(&ship));
 475
 476         // Remove the mouse cursor
 477 #ifdef SDL_DISABLE
 478         SDL_ShowCursor(SDL_DISABLE);
 479 #endif
 480
 481         return 0;
 482 }
 483
 484 void
 485 show_lives(void)
 486 {
 487         int i;
 488         SDL_Rect dest;
 489
 490         for(i=0; i<ship.lives-1; i++) {
 491                 dest.x = (i + 1)*(surf_life->w + 10);
 492                 dest.y = 20;
 493                 SDL_BlitSurface(surf_life, NULL, surf_screen, &dest);
 494         }
 495 }
 496
 497 void
 498 draw_game_over(void)
 499 {
 500         int x;
 501         char *text0, *text1;
 502         SDL_Rect dest;
 503
 504         fadetimer += t_frame;
 505
 506         dest.x = (XSIZE-surf_b_game->w)/2;
 507         dest.y = (YSIZE-surf_b_game->h)/2-40;
 508         SDL_BlitSurface(surf_b_game,NULL,surf_screen,&dest);
 509
 510         dest.x = (XSIZE-surf_b_over->w)/2;
 511         dest.y = (YSIZE-surf_b_over->h)/2 + 40;
 512         SDL_BlitSurface(surf_b_over,NULL,surf_screen,&dest);
 513
 514         if(new_high_score(score)) {
 515                 text0 = "New High Score!";
 516                 text1 = "Press SPACE to continue";
 517         } else {
 518                 text0 = msgs[g_easy][0];
 519                 text1 = msgs[g_easy][1];
 520         }
 521
 522         x = (XSIZE-font_width(text0))/2 + cos(fadetimer/9)*10;
 523         font_write(x,YSIZE-100 + cos(fadetimer/6)*5,text0);
 524
 525         x = (XSIZE-font_width(text1))/2 + sin(fadetimer/9)*10;
 526         font_write(x,YSIZE-50 + sin(fadetimer/4)*5,text1);
 527 }
 528
 529 void
 530 draw_title_page(void)
 531 {
 532         int x;
 533         char *text;
 534         SDL_Rect dest;
 535
 536         fadetimer += t_frame/2.0;
 537
 538         dest.x = (XSIZE-surf_b_variations->w)/2 + cos(fadetimer/6.5)*10;
 539         dest.y = (YSIZE/2-surf_b_variations->h)/2 + sin(fadetimer/5.0)*10;
 540         SDL_BlitSurface(surf_b_variations,NULL,surf_screen,&dest);
 541
 542         dest.x = (XSIZE-surf_b_on->w)/2 + cos((fadetimer + 1.0)/6.5)*10;
 543         dest.y = (YSIZE/2-surf_b_on->h)/2 + surf_b_variations->h + 20 + sin((fadetimer + 1.0)/5.0)*10;
 544         SDL_BlitSurface(surf_b_on,NULL,surf_screen,&dest);
 545
 546         dest.x = (XSIZE-surf_b_rockdodger->w)/2 + cos((fadetimer + 2.0)/6.5)*10;
 547         dest.y = (YSIZE/2-surf_b_rockdodger->h)/2 + surf_b_variations->h + surf_b_on->h + 40 + sin((fadetimer + 2.0)/5)*10;
 548         SDL_BlitSurface(surf_b_rockdodger,NULL,surf_screen,&dest);
 549
 550         text = msgs[g_easy][(int)(fadetimer/35)%NSEQUENCE];
 551         x = (XSIZE-font_width(text))/2 + cos(fadetimer/4.5)*10;
 552         font_write(x,YSIZE-100 + cos(fadetimer/3)*5,text);
 553
 554         text = "Version " PACKAGE_VERSION;
 555         x = (XSIZE-font_width(text))/2 + sin(fadetimer/4.5)*10;
 556         font_write(x,YSIZE-50 + sin(fadetimer/2)*5,text);
 557 }
 558
 559 void
 560 draw(void)
 561 {
 562         SDL_FillRect(surf_screen,NULL,0);  // black background
 563         draw_dots();            // background dots
 564         draw_sprite(SPRITE(&ship));
 565         draw_rocks();
 566
 567         show_lives();
 568         show_score();
 569
 570         switch (state) {
 571                 case GAME_OVER:
 572                         draw_game_over();
 573                         break;
 574
 575                 case TITLE_PAGE:
 576                         draw_title_page();
 577                         break;
 578
 579                 case HIGH_SCORE_ENTRY:
 580                 case HIGH_SCORE_DISPLAY:
 581                         display_scores(150,50);
 582                         break;
 583
 584                 case GAMEPLAY:
 585                 case DEAD_PAUSE:
 586                         ; // no action necessary
 587         }
 588
 589         // Update the surface
 590         SDL_Flip(surf_screen);
 591 }
 592
 593 static inline void
 594 kill_ship(struct ship *ship)
 595 {
 596         play_sound(SOUND_BANG);
 597         new_bang_dots(SPRITE(ship));
 598         if(--ship->lives) {
 599                 state = DEAD_PAUSE;
 600                 state_timeout = DEAD_PAUSE_LENGTH;
 601                 // want ship to be invisible, but keep drifting at sqrt(speed)
 602                 // to leave it in the middle of the space from the explosion.
 603                 ship->flags = MOVE;
 604                 ship->dx = (ship->dx < 0) ? -sqrt(-ship->dx) : sqrt(ship->dx);
 605                 ship->dy = (ship->dy < 0) ? -sqrt(-ship->dy) : sqrt(ship->dy);
 606                 if(ship->dx < BARRIER_SPEED) ship->dx = BARRIER_SPEED;
 607         } else {
 608                 state = GAME_OVER;
 609                 play_tune(TUNE_TITLE_PAGE);
 610                 state_timeout = 200.0;
 611                 fadetimer = 0.0;
 612                 ship->flags = 0;
 613                 // scrolling is based on the ship speed, so we need to reset it.
 614                 ship->dx = BARRIER_SPEED; ship->dy = 0;
 615         }
 616 }
 617
 618 void
 619 do_collision(Sprite *a, Sprite *b)
 620 {
 621         if(a->type == SHIP) kill_ship((struct ship *)a);
 622         else if(b->type == SHIP) kill_ship((struct ship *)b);
 623         else bounce(a, b);
 624 }
 625
 626 void
 627 init_score_entry(void)
 628 {
 629         SDL_Event e;
 630         state = HIGH_SCORE_ENTRY;
 631         state_timeout = 5.0e6;
 632         SDL_EnableUNICODE(1);
 633         while(SDL_PollEvent(&e))
 634                 ;
 635         insert_score(score);
 636 }
 637
 638 // Count down the state timer, and change state when it gets to zero or less;
 639 void
 640 update_state(void)
 641 {
 642         state_timeout -= t_frame*3;
 643         if(state_timeout > 0) return;
 644
 645         switch(state) {
 646                 case GAMEPLAY: break;  // no action necessary
 647                 case DEAD_PAUSE:
 648                         // Restore the ship and continue playing
 649                         ship.flags = DRAW|MOVE|COLLIDE;
 650                         state = GAMEPLAY;
 651                         break;
 652                 case GAME_OVER:
 653                         if(new_high_score(score)) init_score_entry();
 654                         else {
 655                                 state = HIGH_SCORE_DISPLAY;
 656                                 state_timeout = 400;
 657                         }
 658                         break;
 659                 case HIGH_SCORE_DISPLAY:
 660                         state = TITLE_PAGE;
 661                         state_timeout = 600.0;
 662                         fadetimer = 0.0;
 663                         break;
 664                 case HIGH_SCORE_ENTRY:
 665                         break;
 666                 case TITLE_PAGE:
 667                         state = HIGH_SCORE_DISPLAY;
 668                         state_timeout = 200.0;
 669                         break;
 670         }
 671 }
 672
 673 void
 674 gameloop() {
 675         SDL_Event e;
 676         Uint8 *keystate;
 677         float tmp;
 678
 679         for(;;) {
 680                 ms_frame = SDL_GetTicks() - ms_end;
 681                 ms_end += ms_frame;
 682                 if(ms_frame > 50) {
 683                         ms_frame = 50;
 684                 }
 685                 t_frame = gamespeed * ms_frame / 50;
 686                 frames++;
 687
 688                 if(opt_autopilot) {
 689                         autopilot(t_frame);
 690                 }
 691
 692                 while(paused ? SDL_WaitEvent(&e) : SDL_PollEvent(&e)) {
 693                         switch(e.type) {
 694                                 case SDL_QUIT: return;
 695                                 case SDL_KEYDOWN:
 696                                         // even during high-score entry
 697                                         if(e.key.keysym.sym == SDLK_ESCAPE) {
 698                                                 return;
 699                                         }
 700
 701                                         if(state == HIGH_SCORE_ENTRY) {
 702                                                 if(!process_score_input(&e.key.keysym)) {
 703                                                         // Write the high score table to the file
 704                                                         write_high_score_table();
 705                                                         // continue to display the scores briefly
 706                                                         state = HIGH_SCORE_DISPLAY;
 707                                                         state_timeout = 200;
 708                                                 }
 709                                         } else {
 710                                                 switch(e.key.keysym.sym) {
 711                                                         case SDLK_q:
 712                                                                 return;
 713                                                         case SDLK_3:
 714                                                         case SDLK_PRINT:
 715                                                                 {
 716                                                                         FILE *screenshot_fp;
 717                                                                         char tmp[30];
 718                                                                         char *screenshot_filename = &(tmp[0]);
 719                                                                         for(;;) {
 720                                                                                 snprintf(screenshot_filename, 30, "vor-screenshot-%02i.bmp", screenshot_number++);
 721                                                                                 screenshot_fp = fopen(screenshot_filename, "r");
 722                                                                                 if(screenshot_fp) {
 723                                                                                         fclose(screenshot_fp);
 724                                                                                 } else {
 725                                                                                         break;
 726                                                                                 }
 727                                                                         }
 728                                                                         SDL_SaveBMP(surf_screen, screenshot_filename);
 729                                                                 }
 730                                                                 break;
 731                                                         case SDLK_p:
 732                                                         case SDLK_PAUSE:
 733                                                                 paused = !paused;
 734                                                                 if(paused) {
 735                                                                         pause_tune();
 736                                                                 } else {
 737                                                                         resume_tune();
 738                                                                         ms_end = SDL_GetTicks();
 739                                                                 }
 740                                                                 break;
 741                                                         case SDLK_f:
 742                                                         case SDLK_F11:
 743                                                                 toggle_fullscreen();
 744                                                                 break;
 745                                                         default:
 746                                                                 // other keys are handled by checking keystate each frame
 747                                                                 break;
 748                                                 }
 749                                         }
 750                                         break;
 751                         }
 752                 }
 753                 keystate = SDL_GetKeyState(NULL);
 754                 if(opt_autopilot) {
 755                         autopilot_fix_keystates(keystate);
 756                 }
 757
 758                 if(state == GAMEPLAY) {
 759                         if(!paused) {
 760                                 score += ms_frame;
 761
 762                                 if(keystate[SDLK_LEFT]  || keystate[SDLK_KP4]) {
 763                                         ship.dx -= THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<0;
 764                                 }
 765                                 if(keystate[SDLK_DOWN]  || keystate[SDLK_KP5] || keystate[SDLK_KP2]) {
 766                                         ship.dy += THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<1;
 767                                 }
 768                                 if(keystate[SDLK_RIGHT] || keystate[SDLK_KP6]) {
 769                                         ship.dx += THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<2;
 770                                 }
 771                                 if(keystate[SDLK_UP]    || keystate[SDLK_KP8]) {
 772                                         ship.dy -= THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<3;
 773                                 }
 774                                 if(ship.jets) {
 775                                         ship.dx = fconstrain2(ship.dx, -50, 50);
 776                                         ship.dy = fconstrain2(ship.dy, -50, 50);
 777                                 }
 778                         }
 779
 780                 }
 781
 782                 if(!paused) {
 783                         update_state();
 784
 785                         // SCROLLING
 786                         tmp = (ship.y+ship.h/2 + ship.dy*t_frame - YSCROLLTO)/25 + (ship.dy-screendy);
 787                         screendy += tmp * t_frame/12;
 788                         tmp = (ship.x+ship.w/2 + ship.dx*t_frame - XSCROLLTO)/25 + (ship.dx-screendx);
 789                         screendx += tmp * t_frame/12;
 790                         // taper off so we don't hit the barrier abruptly.
 791                         // (if we would hit in < 2 seconds, adjust to 2 seconds).
 792                         if(dist_ahead + (screendx - BARRIER_SPEED)*TO_TICKS(2) < 0)
 793                                 screendx = BARRIER_SPEED - (dist_ahead/TO_TICKS(2));
 794                         dist_ahead += (screendx - BARRIER_SPEED)*t_frame;
 795                         if(MAX_DIST_AHEAD >= 0) dist_ahead = min(dist_ahead, MAX_DIST_AHEAD);
 796
 797                         move_sprites();
 798                         move_dots();
 799                         move_dust();
 800
 801                         new_rocks();
 802
 803                         // BOUNCE off left or right edge of screen
 804                         if(ship.x < 0 || ship.x+ship.w > XSIZE) {
 805                                 ship.x -= (ship.dx-screendx)*t_frame;
 806                                 ship.dx = screendx - (ship.dx-screendx)*BOUNCINESS;
 807                                 ship.x = fconstrain(ship.x, XSIZE - ship.w);
 808                         }
 809
 810                         // BOUNCE off top or bottom of screen
 811                         if(ship.y < 0 || ship.y+ship.h > YSIZE) {
 812                                 ship.y -= (ship.dy-screendy)*t_frame;
 813                                 ship.dy = screendy - (ship.dy-screendy)*BOUNCINESS;
 814                                 ship.y = fconstrain(ship.y, YSIZE - ship.h);
 815                         }
 816
 817                         new_engine_dots();
 818
 819                         collisions(); // must happen after ship bouncing because it puts pixels where the ship is (thus the ship must be on the screen)
 820
 821
 822                         draw();
 823
 824                         // new game
 825                         if((keystate[SDLK_SPACE] || keystate[SDLK_1] || keystate[SDLK_2])
 826                            && (state == HIGH_SCORE_DISPLAY
 827                                || state == TITLE_PAGE
 828                                || state == GAME_OVER)) {
 829                                 if(state == GAME_OVER && new_high_score(score))
 830                                         init_score_entry();
 831                                 else {
 832                                         if((keystate[SDLK_SPACE] && !initial_rocks) || keystate[SDLK_2]) {
 833                                                 g_easy = 0;
 834                                                 initial_rocks = NORMAL_I_ROCKS;
 835                                                 final_rocks = NORMAL_F_ROCKS;
 836                                                 if(gamespeed == EASY_GAMESPEED)
 837                                                         gamespeed = NORMAL_GAMESPEED;
 838                                         } else if(keystate[SDLK_1]) {
 839                                                 g_easy = 1;
 840                                                 initial_rocks = EASY_I_ROCKS;
 841                                                 final_rocks = EASY_F_ROCKS;
 842                                                 gamespeed = EASY_GAMESPEED;
 843                                         }
 844                                         reset_sprites();
 845                                         reset_rocks();
 846                                         screendx = BARRIER_SPEED; screendy = 0;
 847
 848                                         ship.x = XSIZE/2.2; ship.y = YSIZE/2 - ship.w/2;
 849                                         ship.dx = screendx; ship.dy = screendy;
 850                                         ship.lives = 4;
 851                                         ship.flags = MOVE|DRAW|COLLIDE;
 852                                         add_sprite(SPRITE(&ship));
 853
 854                                         score = 0;
 855
 856                                         state = GAMEPLAY;
 857                                         play_tune(TUNE_GAMEPLAY);
 858                                 }
 859                         }
 860
 861                         ship.jets = 0;
 862                 }
 863
 864                 if(state == TITLE_PAGE && keystate[SDLK_h]) {
 865                         state = HIGH_SCORE_DISPLAY;
 866                         state_timeout = 400;
 867                 }
 868
 869                 tiny_sleep();
 870         }
 871 }
 872
 873 int
 874 main(int argc, char **argv) {
 875         if(!parse_opts(argc, argv)) return 1;
 876
 877         if(init()) {
 878                 printf ("vor: SDL error: '%s'\n",initerror);
 879                 return 1;
 880         }
 881
 882         start = SDL_GetTicks();
 883         frames = 0;
 884         gameloop();
 885         end = SDL_GetTicks();
 886         // printf("%ld frames in %ld ms, %.2f fps.\n", frames, end-start, frames * 1000.0 / (end-start));
 887
 888         return 0;
 889 }