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

Last change on this file since 365 was 365, checked in by Sam Hocevar, 16 years ago
  • configure.ac: + No longer check for ncurses etc., we use caca-config.
  • src/*: + Updated to new libcaca API, mainly caca_get_event() and caca_set_color()

calls.

  • 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 365 2004-02-17 13:53: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        int event, key;
102
103        while((event = caca_get_event(CACA_EVENT_KEY_PRESS)))
104        {
105            key = event & 0xffffff;
106
107            switch(key)
108            {
109            case 'q':
110                quit = 1;
111                break;
112            case 'p':
113                poz = !poz;
114                if(poz)
115                {
116                    pausebox = create_box(g, g->w / 2, g->h / 2,
117                                              g->w - 16, 8);
118                }
119                else
120                {
121                    free_box(pausebox);
122                }
123                break;
124            case '\t':
125                ceo_alert(g);
126                poz = 1;
127                break;
128            case 's':
129                skip = 1;
130                break;
131            default:
132                if(g->p->dead)
133                {
134                    break;
135                }
136
137                switch(key)
138                {
139                case 'h':
140                    g->p->vx = -2;
141                    break;
142                case 'j':
143                    if(g->p->y < g->h - 3) g->p->y += 1;
144                    break;
145                case 'k':
146                    if(g->p->y > 2) g->p->y -= 1;
147                    break;
148                case 'l':
149                    g->p->vx = 2;
150                    break;
151                case 'n':
152                    if(g->p->special >= COST_NUKE)
153                    {
154                        g->p->special -= COST_NUKE;
155                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, 0, WEAPON_NUKE);
156                    }
157                    break;
158                case 'f':
159                    if(g->p->special >= COST_FRAGBOMB)
160                    {
161                        g->p->special -= COST_FRAGBOMB;
162                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, -16, WEAPON_FRAGBOMB);
163                    }
164                    break;
165                case 'b':
166                    if(g->p->special >= COST_BEAM)
167                    {
168                        g->p->special -= COST_BEAM;
169                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, 0, WEAPON_BEAM);
170                    }
171                    break;
172                case ' ':
173                    if(g->p->weapon == 0)
174                    {
175                        g->p->weapon = 4;
176                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, 0, -32, WEAPON_LASER);
177                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 0, -32, WEAPON_LASER);
178                        /* Extra schtuph */
179                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, -24, -16, WEAPON_SEEKER);
180                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 24, -16, WEAPON_SEEKER);
181                        /* More schtuph */
182                        add_weapon(g, g->wp, (g->p->x - 1) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
183                        add_weapon(g, g->wp, (g->p->x + 2) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
184                        /* Even more schtuph */
185                        add_weapon(g, g->wp, g->p->x << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
186                        add_weapon(g, g->wp, (g->p->x + 1) << 4, (g->p->y - 1) << 4, 0, -32, WEAPON_LASER);
187                        /* Extra schtuph */
188                        add_weapon(g, g->wp, (g->p->x - 2) << 4, g->p->y << 4, -32, 0, WEAPON_SEEKER);
189                        add_weapon(g, g->wp, (g->p->x + 3) << 4, g->p->y << 4, 32, 0, WEAPON_SEEKER);
190                        /* MORE SCHTUPH! */
191                        add_weapon(g, g->wp, g->p->x << 4, g->p->y << 4, 0, -16, WEAPON_BOMB);
192                    }
193                    break;
194                }
195            }
196        }
197
198        if(!poz || skip)
199        {
200            skip = 0;
201
202            /* XXX: to be removed */
203            if(caca_rand(0, 9) == 0)
204            {
205                int list[3] = { ALIEN_FOO, ALIEN_BAR, ALIEN_BAZ };
206
207                add_alien(g, g->al, 0, rand() % g->h / 2, list[caca_rand(0,2)]);
208            }
209
210            /* Update game rules */
211            if(g->t->right[1] - g->t->left[1] == g->t->w)
212            {
213                g->t->w = 85 - g->t->w;
214            }
215
216            /* Scroll and update positions */
217            collide_player_tunnel(g, g->p, g->t, g->ex);
218            update_player(g, g->p);
219            collide_player_tunnel(g, g->p, g->t, g->ex);
220
221            update_starfield(g, g->sf);
222            update_bonus(g, g->bo);
223            update_aliens(g, g->al);
224
225            collide_weapons_tunnel(g, g->wp, g->t, g->ex);
226            collide_weapons_aliens(g, g->wp, g->al, g->ex);
227            update_weapons(g, g->wp);
228            collide_weapons_tunnel(g, g->wp, g->t, g->ex);
229            collide_weapons_aliens(g, g->wp, g->al, g->ex);
230
231            update_explosions(g, g->ex);
232            update_tunnel(g, g->t);
233        }
234
235        /* Clear screen */
236        caca_clear();
237
238        /* Print starfield, tunnel, aliens, player and explosions */
239        draw_starfield(g, g->sf);
240        draw_aliens(g, g->al);
241        draw_tunnel(g, g->t);
242        draw_bonus(g, g->bo);
243        draw_explosions(g, g->ex);
244        draw_weapons(g, g->wp);
245        draw_player(g, g->p);
246        draw_status(g);
247
248        /* Print pause box if needed */
249        if(poz)
250        {
251            pausebox->frame++;
252            draw_box(g, pausebox);
253        }
254
255        /* Refresh */
256        caca_refresh();
257
258        purcompteur++;
259    }
260
261    if(pausebox)
262    {
263        free_box(pausebox);
264    }
265
266    free_starfield(g, g->sf);
267    free_tunnel(g->t);
268    free_player(g->p);
269}
270
Note: See TracBrowser for help on using the repository browser.