1 /* Variations on RockDodger
2 * Space Rocks copyright (C) 2001 Paul Holt <pad@pcholt.com>
4 * Project fork 2004, Jason Woofenden and Joshua Grams.
5 * (a whole bunch of modifications and project rename)
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.
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.
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
24 #include <SDL_image.h>
36 #include "vorconfig.h"
46 #include "autopilot.h"
48 // ************************************* VARS
49 // SDL_Surface global variables
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
68 float mass; // in DOT_MASS_UNITs
69 float decay; // rate at which to reduce mass.
70 int heat; // heat multiplier (color).
75 struct dot edot[MAXENGINEDOTS], *dotptr = edot;
76 struct dot bdot[MAXBANGDOTS];
78 // Other global variables
81 int screenshot_number = 0;
83 struct ship ship = { SHIP, 0, NULL, XSIZE/2, YSIZE/2, BARRIER_SPEED, 0.0 };
85 float screendx = BARRIER_SPEED, screendy = 0.0;
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)
94 float gamespeed = 1.00;
102 // bangdot start (bd1) and end (bd2) position:
103 int bd1 = 0, bd2 = 0;
113 enum states state = TITLE_PAGE;
114 float state_timeout = 600.0;
119 "Press SPACE for normal game",
120 "Press '1' for easy game",
121 "http://jasonwoof.org/vor"
124 "Press SPACE for easy game",
125 "Press '2' for normal game",
126 "http://jasonwoof.org/vor"
130 int bangdotlife, nbangdots;
131 Uint16 heatcolor[W*3];
135 extern int optind, opterr, optopt;
137 #define TO_TICKS(seconds) ((seconds)*20*gamespeed)
139 // ************************************* FUNCS
141 #ifdef HAVE_NANOSLEEP
156 for(i = 0; i<MAXENGINEDOTS; i++) {
163 new_engine_dots(void) {
165 int n = t_frame * ENGINE_DOTS_PER_TIC;
166 float a, r; // angle, random length
168 float hx, hy; // half ship width/height.
169 static const int s[4] = { 2, 1, 0, 1 };
171 float accelh, accelv, past_ship_dx, past_ship_dy;
173 hx = ship.image->w / 2;
174 hy = ship.image->h / 2;
176 for(dir=0; dir<4; dir++) {
177 if(!(ship.jets & 1<<dir)) continue;
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);
184 dy = r * -sin(a); // screen y is "backwards".
189 // dot was created at a random time during the time span
190 time = frnd() * t_frame; // this is how long ago
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
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;
203 // the starting position (not speed) of the dot is calculated as
204 // though the ship were traveling at a constant speed for this
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;
209 dotptr->dx = past_ship_dx + 2*dx;
210 dotptr->dy = past_ship_dy + 20*dy;
211 dotptr->mass = 60 * fabs(dy);
213 dotptr->dx = past_ship_dx + 20*dx;
214 dotptr->dy = past_ship_dy + 2*dy;
215 dotptr->mass = 60 * fabs(dx);
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;
222 if(!fclip(dotptr->x, XSIZE) && !fclip(dotptr->y, YSIZE)) {
224 if(dotptr - edot < MAXENGINEDOTS-1) {
237 new_bang_dots(struct sprite *s)
244 SDL_Surface *img = s->image;
248 row_inc = img->pitch/sizeof(uint16_t) - img->w;
249 colorkey = img->format->colorkey;
251 if(SDL_MUSTLOCK(img)) { SDL_LockSurface(img); }
255 for(y=0; y<img->h; y++) {
256 for(x = 0; x<img->w; x++) {
258 if(c && c != colorkey) {
259 theta = frnd()*M_PI*2;
260 r = frnd(); r = 1 - r*r;
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;
269 bdot[bd2].active = 1;
271 bd2 = (bd2+1) % MAXBANGDOTS;
278 if(SDL_MUSTLOCK(img)) { SDL_UnlockSurface(img); }
283 move_dot(struct dot *d)
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))
295 hit = pixel_collides(d->x, d->y);
296 if(hit) if(hit->type != SHIP) {
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;
311 for(i=0; i<MAXBANGDOTS; i++) move_dot(&bdot[i]);
312 for(i=0; i<MAXENGINEDOTS; i++) move_dot(&edot[i]);
317 draw_dot(struct dot *d)
319 uint16_t *pixels, *pixel;
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))];
334 if(SDL_MUSTLOCK(surf_screen)) { SDL_LockSurface(surf_screen); }
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); }
342 _load_image(char *filename, int alpha) {
343 SDL_Surface *tmp, *img = NULL;
344 char *s = add_data_path(filename);
350 img = SDL_DisplayFormatAlpha(tmp);
352 img = SDL_DisplayFormat(tmp);
354 SDL_FreeSurface(tmp);
361 load_image(char *filename) {
362 return _load_image(filename, 0);
366 load_image_alpha(char *filename) {
367 return _load_image(filename, 1);
374 load_sprite(SPRITE(&ship), "ship.png");
377 void font_cleanup() {
385 // Attempt to get the required video size
386 flag = SDL_DOUBLEBUF | SDL_HWSURFACE;
387 if(opt_fullscreen) flag |= SDL_FULLSCREEN;
388 surf_screen = SDL_SetVideoMode(XSIZE,YSIZE,16,flag);
392 toggle_fullscreen() {
393 opt_fullscreen = 1 - opt_fullscreen;
407 // Where are our data files?
408 if(!find_files()) exit(1);
409 read_high_score_table();
412 // Initialize SDL with audio and video
413 if(SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO) != 0) {
415 fputs("Can't open sound, starting without it\n", stderr);
419 atexit(SDL_CloseAudio);
420 opt_sound = init_sound();
423 // Initialize with video only
424 CONDERROR(SDL_Init(SDL_INIT_VIDEO) != 0);
428 play_tune(TUNE_TITLE_PAGE);
431 // Attempt to get the required video size
434 // Set the title bar text
435 SDL_WM_SetCaption("Variations on Rockdodger", "VoR");
437 NULLERROR(surf_screen);
439 // Set the heat color from the range 0 (cold) to 300 (blue-white)
440 for(i = 0; i<W*3; i++) {
441 heatcolor[i] = SDL_MapRGB(
443 (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?
448 NULLERROR(surf_b_variations = load_image_alpha("b_variations.png"));
449 NULLERROR(surf_b_on = load_image_alpha("b_on.png"));
450 NULLERROR(surf_b_rockdodger = load_image_alpha("b_rockdodger.png"));
452 NULLERROR(surf_b_game = load_image_alpha("b_game.png"));
453 NULLERROR(surf_b_over = load_image_alpha("b_over.png"));
455 // Load the life indicator (small ship) graphic.
456 NULLERROR(surf_life = load_image("life.png"));
458 // Load the font image
459 s = add_data_path("font.png");
461 g_font = font_load(s);
462 atexit(&font_cleanup);
464 fprintf(stderr, "could create path to font\n");
472 add_sprite(SPRITE(&ship));
474 // Remove the mouse cursor
476 SDL_ShowCursor(SDL_DISABLE);
488 for(i=0; i<ship.lives-1; i++) {
489 dest.x = (i + 1)*(surf_life->w + 10);
491 SDL_BlitSurface(surf_life, NULL, surf_screen, &dest);
502 fadetimer += t_frame;
504 dest.x = (XSIZE-surf_b_game->w)/2;
505 dest.y = (YSIZE-surf_b_game->h)/2-40;
506 SDL_BlitSurface(surf_b_game,NULL,surf_screen,&dest);
508 dest.x = (XSIZE-surf_b_over->w)/2;
509 dest.y = (YSIZE-surf_b_over->h)/2 + 40;
510 SDL_BlitSurface(surf_b_over,NULL,surf_screen,&dest);
512 if(new_high_score(score)) {
513 text0 = "New High Score!";
514 text1 = "Press SPACE to continue";
516 text0 = msgs[g_easy][0];
517 text1 = msgs[g_easy][1];
520 x = (XSIZE-font_width(text0))/2 + cos(fadetimer/9)*10;
521 font_write(x,YSIZE-100 + cos(fadetimer/6)*5,text0);
523 x = (XSIZE-font_width(text1))/2 + sin(fadetimer/9)*10;
524 font_write(x,YSIZE-50 + sin(fadetimer/4)*5,text1);
528 draw_title_page(void)
534 fadetimer += t_frame/2.0;
536 dest.x = (XSIZE-surf_b_variations->w)/2 + cos(fadetimer/6.5)*10;
537 dest.y = (YSIZE/2-surf_b_variations->h)/2 + sin(fadetimer/5.0)*10;
538 SDL_BlitSurface(surf_b_variations,NULL,surf_screen,&dest);
540 dest.x = (XSIZE-surf_b_on->w)/2 + cos((fadetimer + 1.0)/6.5)*10;
541 dest.y = (YSIZE/2-surf_b_on->h)/2 + surf_b_variations->h + 20 + sin((fadetimer + 1.0)/5.0)*10;
542 SDL_BlitSurface(surf_b_on,NULL,surf_screen,&dest);
544 dest.x = (XSIZE-surf_b_rockdodger->w)/2 + cos((fadetimer + 2.0)/6.5)*10;
545 dest.y = (YSIZE/2-surf_b_rockdodger->h)/2 + surf_b_variations->h + surf_b_on->h + 40 + sin((fadetimer + 2.0)/5)*10;
546 SDL_BlitSurface(surf_b_rockdodger,NULL,surf_screen,&dest);
548 text = msgs[g_easy][(int)(fadetimer/35)%NSEQUENCE];
549 x = (XSIZE-font_width(text))/2 + cos(fadetimer/4.5)*10;
550 font_write(x,YSIZE-100 + cos(fadetimer/3)*5,text);
552 text = "Version " PACKAGE_VERSION;
553 x = (XSIZE-font_width(text))/2 + sin(fadetimer/4.5)*10;
554 font_write(x,YSIZE-50 + sin(fadetimer/2)*5,text);
560 SDL_FillRect(surf_screen,NULL,0); // black background
561 draw_dots(); // background dots
562 draw_sprite(SPRITE(&ship));
577 case HIGH_SCORE_ENTRY:
578 case HIGH_SCORE_DISPLAY:
579 display_scores(150,50);
584 ; // no action necessary
587 // Update the surface
588 SDL_Flip(surf_screen);
592 kill_ship(struct ship *ship)
594 play_sound(SOUND_BANG);
595 new_bang_dots(SPRITE(ship));
598 state_timeout = DEAD_PAUSE_LENGTH;
599 // want ship to be invisible, but keep drifting at sqrt(speed)
600 // to leave it in the middle of the space from the explosion.
602 ship->dx = (ship->dx < 0) ? -sqrt(-ship->dx) : sqrt(ship->dx);
603 ship->dy = (ship->dy < 0) ? -sqrt(-ship->dy) : sqrt(ship->dy);
604 if(ship->dx < BARRIER_SPEED) ship->dx = BARRIER_SPEED;
607 play_tune(TUNE_TITLE_PAGE);
608 state_timeout = 200.0;
611 // scrolling is based on the ship speed, so we need to reset it.
612 ship->dx = BARRIER_SPEED; ship->dy = 0;
617 do_collision(Sprite *a, Sprite *b)
619 if(a->type == SHIP) kill_ship((struct ship *)a);
620 else if(b->type == SHIP) kill_ship((struct ship *)b);
625 init_score_entry(void)
628 state = HIGH_SCORE_ENTRY;
629 state_timeout = 5.0e6;
630 SDL_EnableUNICODE(1);
631 while(SDL_PollEvent(&e))
636 // Count down the state timer, and change state when it gets to zero or less;
640 state_timeout -= t_frame*3;
641 if(state_timeout > 0) return;
644 case GAMEPLAY: break; // no action necessary
646 // Restore the ship and continue playing
647 ship.flags = DRAW|MOVE|COLLIDE;
651 if(new_high_score(score)) init_score_entry();
653 state = HIGH_SCORE_DISPLAY;
657 case HIGH_SCORE_DISPLAY:
659 state_timeout = 600.0;
662 case HIGH_SCORE_ENTRY:
665 state = HIGH_SCORE_DISPLAY;
666 state_timeout = 200.0;
678 ms_frame = SDL_GetTicks() - ms_end;
683 t_frame = gamespeed * ms_frame / 50;
690 while(paused ? SDL_WaitEvent(&e) : SDL_PollEvent(&e)) {
692 case SDL_QUIT: return;
694 // even during high-score entry
695 if(e.key.keysym.sym == SDLK_ESCAPE) {
699 if(state == HIGH_SCORE_ENTRY) {
700 if(!process_score_input(&e.key.keysym)) {
701 // Write the high score table to the file
702 write_high_score_table();
703 // continue to display the scores briefly
704 state = HIGH_SCORE_DISPLAY;
708 switch(e.key.keysym.sym) {
716 char *screenshot_filename = &(tmp[0]);
718 snprintf(screenshot_filename, 30, "vor-screenshot-%02i.bmp", screenshot_number++);
719 screenshot_fp = fopen(screenshot_filename, "r");
721 fclose(screenshot_fp);
726 SDL_SaveBMP(surf_screen, screenshot_filename);
736 ms_end = SDL_GetTicks();
744 // other keys are handled by checking keystate each frame
751 keystate = SDL_GetKeyState(NULL);
753 autopilot_fix_keystates(keystate);
756 if(state == GAMEPLAY) {
760 if(keystate[SDLK_LEFT] || keystate[SDLK_KP4]) {
761 ship.dx -= THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<0;
763 if(keystate[SDLK_DOWN] || keystate[SDLK_KP5] || keystate[SDLK_KP2]) {
764 ship.dy += THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<1;
766 if(keystate[SDLK_RIGHT] || keystate[SDLK_KP6]) {
767 ship.dx += THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<2;
769 if(keystate[SDLK_UP] || keystate[SDLK_KP8]) {
770 ship.dy -= THRUSTER_STRENGTH*t_frame; ship.jets |= 1<<3;
773 ship.dx = fconstrain2(ship.dx, -50, 50);
774 ship.dy = fconstrain2(ship.dy, -50, 50);
784 tmp = (ship.y+ship.h/2 + ship.dy*t_frame - YSCROLLTO)/25 + (ship.dy-screendy);
785 screendy += tmp * t_frame/12;
786 tmp = (ship.x+ship.w/2 + ship.dx*t_frame - XSCROLLTO)/25 + (ship.dx-screendx);
787 screendx += tmp * t_frame/12;
788 // taper off so we don't hit the barrier abruptly.
789 // (if we would hit in < 2 seconds, adjust to 2 seconds).
790 if(dist_ahead + (screendx - BARRIER_SPEED)*TO_TICKS(2) < 0)
791 screendx = BARRIER_SPEED - (dist_ahead/TO_TICKS(2));
792 dist_ahead += (screendx - BARRIER_SPEED)*t_frame;
793 if(MAX_DIST_AHEAD >= 0) dist_ahead = min(dist_ahead, MAX_DIST_AHEAD);
801 // BOUNCE off left or right edge of screen
802 if(ship.x < 0 || ship.x+ship.w > XSIZE) {
803 ship.x -= (ship.dx-screendx)*t_frame;
804 ship.dx = screendx - (ship.dx-screendx)*BOUNCINESS;
805 ship.x = fconstrain(ship.x, XSIZE - ship.w);
808 // BOUNCE off top or bottom of screen
809 if(ship.y < 0 || ship.y+ship.h > YSIZE) {
810 ship.y -= (ship.dy-screendy)*t_frame;
811 ship.dy = screendy - (ship.dy-screendy)*BOUNCINESS;
812 ship.y = fconstrain(ship.y, YSIZE - ship.h);
817 collisions(); // must happen after ship bouncing because it puts pixels where the ship is (thus the ship must be on the screen)
823 if((keystate[SDLK_SPACE] || keystate[SDLK_1] || keystate[SDLK_2])
824 && (state == HIGH_SCORE_DISPLAY
825 || state == TITLE_PAGE
826 || state == GAME_OVER)) {
827 if(state == GAME_OVER && new_high_score(score))
830 if((keystate[SDLK_SPACE] && !initial_rocks) || keystate[SDLK_2]) {
832 initial_rocks = NORMAL_I_ROCKS;
833 final_rocks = NORMAL_F_ROCKS;
834 if(gamespeed == EASY_GAMESPEED)
835 gamespeed = NORMAL_GAMESPEED;
836 } else if(keystate[SDLK_1]) {
838 initial_rocks = EASY_I_ROCKS;
839 final_rocks = EASY_F_ROCKS;
840 gamespeed = EASY_GAMESPEED;
844 screendx = BARRIER_SPEED; screendy = 0;
846 ship.x = XSIZE/2.2; ship.y = YSIZE/2 - ship.w/2;
847 ship.dx = screendx; ship.dy = screendy;
849 ship.flags = MOVE|DRAW|COLLIDE;
850 add_sprite(SPRITE(&ship));
855 play_tune(TUNE_GAMEPLAY);
862 if(state == TITLE_PAGE && keystate[SDLK_h]) {
863 state = HIGH_SCORE_DISPLAY;
872 main(int argc, char **argv) {
873 if(!parse_opts(argc, argv)) return 1;
876 printf ("vor: SDL error: '%s'\n",initerror);
880 start = SDL_GetTicks();
883 end = SDL_GetTicks();
884 // printf("%ld frames in %ld ms, %.2f fps.\n", frames, end-start, frames * 1000.0 / (end-start));