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