File: spacers.c

package info (click to toggle)
xinvaders 2.0-12
  • links: PTS
  • area: non-free
  • in suites: potato
  • size: 312 kB
  • ctags: 443
  • sloc: ansic: 2,364; makefile: 256; sh: 6
file content (166 lines) | stat: -rw-r--r-- 3,471 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
/* 
Copyright notice:

This is mine.  I'm only letting you use it.  Period.  Feel free to rip off
any of the code you see fit, but have the courtesy to give me credit.
Otherwise great hairy beasties will rip your eyes out and eat your flesh
when you least expect it.

Jonny Goldman <jonathan@think.com>

Wed May  8 1991
*/

/* spacers.c - handle movement, etc. of the little space ships. */

#include "vaders.h"

Boolean spacer_shown;

#define SPACERY 0
#define SPACERV 2*scale

typedef struct _SpacerRec {
  int x;			/* Location. */
  int width, height;		/* box of this rock. */
  int score;			/* value of this guy */
  XImage *shape_image;		/* an XImage for the spaceship */
} SpacerRec, *Spacer;

SpacerRec spacerrec;

Spacer spacer = &spacerrec;

#define SpacerNearPoint(spacer, x, y)	\
  ((spacer)->x <= (x) && (x) < (spacer)->x + (spacer)->width  && \
   y <= SPACERY + (spacer)->height && y > SPACERY)

int spacer_counter;		/* number of steps to wait for new spacer */

int showing_sexplosion = FALSE;

/* now the code */

void PaintSpacer(gc)
     GC gc;
{
    XPutImage(dpy, gamewindow, gc, spacer->shape_image,
	      0, 0, spacer->x, SPACERY, spacer->width, spacer->height);
}


void ShowSexplosion(gc)
GC gc;
{
  char score[5];

  sprintf(score,"%3d", spacer->score);
  XDrawString(dpy, gamewindow, gc, spacer->x, SPACERY+spacer->height, score, 3);

}

/*
 * Destroy the Spacer, much like the ship.
 */

static void DestroySpacer()
{
  score += spacer->score;
  PaintScore();

  if(!paused) {
    PaintSpacer(backgc);
    ShowSexplosion(spacergc);
    if (spacertimerid)
      XtRemoveTimeOut(spacertimerid);
    XtAddTimeOut(1000, MoveSpacer, (Opaque) MoveSpacer);
    showing_sexplosion = TRUE;
    spacer_shown = FALSE;
  }
}

Boolean ShotHitsSpacer(x, y)
     int x, y;
{
  if(spacer_shown) {
    if (SpacerNearPoint(spacer, x, y)) {
      DestroySpacer();
      return TRUE;
    }
  }
  return FALSE;
}



void MakeSpacer()
{
  spacer_shown = TRUE;

  spacer->x=0;
  spacer->score = 50*(random()%6+1);
  PaintSpacer(spacergc);
}
  
/*ARGSUSED*/
void MoveSpacer(closure, id)
     Opaque closure;
     XtIntervalId id;
{
  if (closure != (Opaque) MoveSpacer) return;
  spacertimerid = XtAddTimeOut(spacerwait, MoveSpacer, (Opaque) MoveSpacer);
  if (!paused) {
    if (showing_sexplosion) {
      showing_sexplosion = FALSE;
      ShowSexplosion(backgc);
      spacer_shown = FALSE;
      spacer_counter = 1000;
      return;
    }
    if (spacer_shown) {
      PaintSpacer(backgc);
      spacer->x += SPACERV;
      if (spacer->x < gamewidth-spacer->width) {
	PaintSpacer(spacergc);
      } else {
	spacer_shown = FALSE;
	spacer_counter = 1000;
      }
    } else
      if (spacer_counter-- == 0) MakeSpacer();
  }
}


#include "spacer1.bit"
#include "spacer2.bit"

int ReadSpacerImages()
{
  spacer->width = (scale == 1) ? spacer1_width : spacer2_width;
  spacer->height = (scale == 1) ? spacer1_height : spacer2_height;

  spacer->shape_image = XCreateImage(dpy,
				     DefaultVisual(dpy, DefaultScreen(dpy)),
				     1,
				     XYBitmap,
				     0,
				     (scale == 1) ? spacer1_bits : spacer2_bits,
				     spacer->width, spacer->height,
				     8, 0);

  spacer->shape_image->bitmap_bit_order = LSBFirst;
  spacer->shape_image->byte_order = LSBFirst;

  return BitmapSuccess;
}

void InitSpacers()
{
  if(ReadSpacerImages()!= BitmapSuccess) {
    fprintf(stderr, _("Error reading Spacer image\n"));
    exit(10);
  }

  spacertimerid = 0;
}