source: ttyvaders/trunk/src/main.c @ 194

Last change on this file since 194 was 194, checked in by Sam Hocevar, 16 years ago
  • BUGS TODO: + Removed libcaca stuff.
  • data/bongem.txt: + Fixed sprite syntax.
  • src/: + Set framerate to 25fps instead of 10fps. + Updated code to latest libcaca changes.
  • Property svn:keywords set to Id
File size: 7.6 KB
Line 
1/*
2 *   ttyvaders     Textmode shoot'em up
3 *   Copyright (c) 2002 Sam Hocevar <sam@zoy.org>
4 *                 All Rights Reserved
5 *
6 *   $Id: main.c 194 2003-11-16 15:31:14Z sam $
7 *
8 *   This program is free software; you can redistribute it and/or modify
9 *   it under the terms of the GNU General Public License as published by
10 *   the Free Software Foundation; either version 2 of the License, or
11 *   (at your option) any later version.
12 *
13 *   This program is distributed in the hope that it will be useful,
14 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
15 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 *   GNU General Public License for more details.
17 *
18 *   You should have received a copy of the GNU General Public License
19 *   along with this program; if not, write to the Free Software
20 *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23#include "config.h"
24
25#include <stdio.h>
26#include <stdlib.h>
27
28#include <string.h>
29
30#include <time.h>
31
32#include "common.h"
33
34static void start_game (game *);
35
36int main (int argc, char **argv)
37{
38    game *g = malloc(sizeof(game));
39    if(g == NULL)
40        exit(1);
41
42    srand(time(NULL));
43
44    if(caca_init())
45    {
46        return 1;
47    }
48
49    caca_set_delay(40000);
50
51    /* Initialize our program */
52    g->w = caca_get_width();
53    g->h = caca_get_height();
54
55intro();
56
57    /* Go ! */
58    start_game(g);
59
60    /* Clean up */
61    caca_end();
62
63    return 0;
64}
65
66static void start_game (game *g)
67{
68    int quit = 0;
69    int poz = 0;
70    int skip = 0;
71    int purcompteur = 0;
72
73    box *pausebox = NULL;
74
75    g->sf = create_starfield(g);
76    g->wp = malloc(sizeof(weapons));
77    if(g->wp == NULL)
78        exit(1);
79    g->ex = malloc(sizeof(explosions));
80    if(g->ex == NULL)
81        exit(1);
82    g->bo = malloc(sizeof(bonus));
83    if(g->bo == NULL)
84        exit(1);
85    g->t = create_tunnel(g, g->w, g->h);
86    g->p = create_player(g);
87    g->al = malloc(sizeof(aliens));
88    if(g->al == NULL)
89        exit(1);
90
91    init_bonus(g, g->bo);
92    init_weapons(g, g->wp);
93    init_explosions(g, g->ex);
94    init_aliens(g, g->al);
95
96    /* Temporary stuff */
97    g->t->w = 25;
98
99    while(!quit)
100    {
101        char key;
102
103        while((key = caca_get_key()))
104        {
105            switch(key)
106            {
107            case 'q':
108                quit = 1;
109                break;
110            case 'p':
111                poz = !poz;
112                if(poz)
113                {
114                    pausebox = create_box(g, g->w / 2, g->h / 2,
115                                              g->w - 16, 8);
116                }
117                else
118                {
119                    free_box(pausebox);
120                }
121                break;
122            case '\t':
123                ceo_alert(g);
124                poz = 1;
125                break;
126            case 's':
127                skip = 1;
128                break;
129            default:
130                if(g->p->dead)
131                {
132                    break;
133                }
134
135                switch(key)
136                {
137                case 'h':
138                    g->p->vx = -2;
139                    break;
140                case 'j':
141                    if(g->p->y < g->h - 3) g->p->y += 1;
142                    break;
143                case 'k':
144                    if(g->p->y > 2) g->p->y -= 1;
145                    break;
146                case 'l':
147                    g->p->vx = 2;
148                    break;
149                case 'n':
150                    if(g->p->special >= COST_NUKE)
151                    {
152                        g->p->special -= COST_NUKE;
153                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, 0, WEAPON_NUKE);
154                    }
155                    break;
156                case 'f':
157                    if(g->p->special >= COST_FRAGBOMB)
158                    {
159                        g->p->special -= COST_FRAGBOMB;
160                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, -16, WEAPON_FRAGBOMB);
161                    }
162                    break;
163                case 'b':
164                    if(g->p->special >= COST_BEAM)
165                    {
166                        g->p->special -= COST_BEAM;
167                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, 0, WEAPON_BEAM);
168                    }
169                    break;
170                case ' ':
171                    if(g->p->weapon == 0)
172                    {
173                        g->p->weapon = 4;
174                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, 0, -32, WEAPON_LASER);
175                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 0, -32, WEAPON_LASER);
176                        /* Extra schtuph */
177                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, -24, -16, WEAPON_SEEKER);
178                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 24, -16, WEAPON_SEEKER);
179                        /* More schtuph */
180                        add_weapon(g, g->wp, (g->p->x - 1) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
181                        add_weapon(g, g->wp, (g->p->x + 2) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
182                        /* Even more schtuph */
183                        add_weapon(g, g->wp, g->p->x << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
184                        add_weapon(g, g->wp, (g->p->x + 1) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
185                        /* Extra schtuph */
186                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, -32, 0, WEAPON_SEEKER);
187                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 32, 0, WEAPON_SEEKER);
188                        /* MORE SCHTUPH! */
189                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, -16, WEAPON_BOMB);
190                    }
191                    break;
192                }
193            }
194        }
195
196        if(!poz || skip)
197        {
198            skip = 0;
199
200            /* XXX: to be removed */
201            if(caca_rand(0, 9) == 0)
202            {
203                int list[3] = { ALIEN_FOO, ALIEN_BAR, ALIEN_BAZ };
204
205                add_alien(g, g->al, 0, rand() % g->h / 2, list[caca_rand(0,2)]);
206            }
207
208            /* Update game rules */
209            if(g->t->right[1] - g->t->left[1] == g->t->w)
210            {
211                g->t->w = 85 - g->t->w;
212            }
213
214            /* Scroll and update positions */
215            collide_player_tunnel(g, g->p, g->t, g->ex);
216            update_player(g, g->p);
217            collide_player_tunnel(g, g->p, g->t, g->ex);
218
219            update_starfield(g, g->sf);
220            update_bonus(g, g->bo);
221            update_aliens(g, g->al);
222
223            collide_weapons_tunnel(g, g->wp, g->t, g->ex);
224            collide_weapons_aliens(g, g->wp, g->al, g->ex);
225            update_weapons(g, g->wp);
226            collide_weapons_tunnel(g, g->wp, g->t, g->ex);
227            collide_weapons_aliens(g, g->wp, g->al, g->ex);
228
229            update_explosions(g, g->ex);
230            update_tunnel(g, g->t);
231        }
232
233        /* Clear screen */
234        caca_clear();
235
236        /* Print starfield, tunnel, aliens, player and explosions */
237        draw_starfield(g, g->sf);
238        draw_aliens(g, g->al);
239        draw_tunnel(g, g->t);
240        draw_bonus(g, g->bo);
241        draw_explosions(g, g->ex);
242        draw_weapons(g, g->wp);
243        draw_player(g, g->p);
244        draw_status(g);
245
246        /* Print pause box if needed */
247        if(poz)
248        {
249            pausebox->frame++;
250            draw_box(g, pausebox);
251        }
252
253        /* Refresh */
254        caca_refresh();
255
256        purcompteur++;
257    }
258
259    if(pausebox)
260    {
261        free_box(pausebox);
262    }
263
264    free_starfield(g, g->sf);
265    free_tunnel(g->t);
266    free_player(g->p);
267}
268
Note: See TracBrowser for help on using the repository browser.