Home » Archimedes archive » Acorn User » AU 1997-01 B.adf » Features » Arcade/!Hive/h/game
Arcade/!Hive/h/game
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Archimedes archive » Acorn User » AU 1997-01 B.adf » Features |
| Filename: | Arcade/!Hive/h/game |
| Read OK: | ✔ |
| File size: | 0271 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
extern struct object_table *ship_table, *missile_table, *alien_table,
*fx_table, *alien_swoop_table,
*alien_missile_table, *token_table;
extern void **ship_sprite[9], **alphabet_sprite[57];
extern void *backdrop;
extern BOOL quit, dirty_rotten_cheat, hit_bottom;
extern int fired, max_fired;
extern int wave, aliens_left, last_killed_at;
extern int ship_pos, fire_freq, fire_again, special,
ship_x;
extern int score, hi_score, lives, next_life_time, invulnerable;
void game_finish(void);
void make_explosion(int x, int y);
void make_lots_of_particles_everywhere(int x, int y, int number);
00000000 65 78 74 65 72 6e 20 73 74 72 75 63 74 20 6f 62 |extern struct ob| 00000010 6a 65 63 74 5f 74 61 62 6c 65 09 2a 73 68 69 70 |ject_table.*ship| 00000020 5f 74 61 62 6c 65 2c 20 2a 6d 69 73 73 69 6c 65 |_table, *missile| 00000030 5f 74 61 62 6c 65 2c 20 2a 61 6c 69 65 6e 5f 74 |_table, *alien_t| 00000040 61 62 6c 65 2c 0a 09 09 09 09 2a 66 78 5f 74 61 |able,.....*fx_ta| 00000050 62 6c 65 2c 20 2a 61 6c 69 65 6e 5f 73 77 6f 6f |ble, *alien_swoo| 00000060 70 5f 74 61 62 6c 65 2c 0a 09 09 09 09 2a 61 6c |p_table,.....*al| 00000070 69 65 6e 5f 6d 69 73 73 69 6c 65 5f 74 61 62 6c |ien_missile_tabl| 00000080 65 2c 20 2a 74 6f 6b 65 6e 5f 74 61 62 6c 65 3b |e, *token_table;| 00000090 0a 65 78 74 65 72 6e 20 76 6f 69 64 09 09 09 2a |.extern void...*| 000000a0 2a 73 68 69 70 5f 73 70 72 69 74 65 5b 39 5d 2c |*ship_sprite[9],| 000000b0 20 2a 2a 61 6c 70 68 61 62 65 74 5f 73 70 72 69 | **alphabet_spri| 000000c0 74 65 5b 35 37 5d 3b 0a 65 78 74 65 72 6e 20 76 |te[57];.extern v| 000000d0 6f 69 64 09 09 09 2a 62 61 63 6b 64 72 6f 70 3b |oid...*backdrop;| 000000e0 0a 65 78 74 65 72 6e 20 42 4f 4f 4c 09 09 09 71 |.extern BOOL...q| 000000f0 75 69 74 2c 20 64 69 72 74 79 5f 72 6f 74 74 65 |uit, dirty_rotte| 00000100 6e 5f 63 68 65 61 74 2c 20 68 69 74 5f 62 6f 74 |n_cheat, hit_bot| 00000110 74 6f 6d 3b 0a 65 78 74 65 72 6e 20 69 6e 74 09 |tom;.extern int.| 00000120 09 09 66 69 72 65 64 2c 20 6d 61 78 5f 66 69 72 |..fired, max_fir| 00000130 65 64 3b 0a 65 78 74 65 72 6e 20 69 6e 74 09 09 |ed;.extern int..| 00000140 09 77 61 76 65 2c 20 61 6c 69 65 6e 73 5f 6c 65 |.wave, aliens_le| 00000150 66 74 2c 20 6c 61 73 74 5f 6b 69 6c 6c 65 64 5f |ft, last_killed_| 00000160 61 74 3b 0a 65 78 74 65 72 6e 20 69 6e 74 09 09 |at;.extern int..| 00000170 09 73 68 69 70 5f 70 6f 73 2c 20 66 69 72 65 5f |.ship_pos, fire_| 00000180 66 72 65 71 2c 20 66 69 72 65 5f 61 67 61 69 6e |freq, fire_again| 00000190 2c 20 73 70 65 63 69 61 6c 2c 0a 20 20 20 20 20 |, special,. | 000001a0 20 20 09 09 09 09 73 68 69 70 5f 78 3b 0a 65 78 | ....ship_x;.ex| 000001b0 74 65 72 6e 20 69 6e 74 09 09 09 73 63 6f 72 65 |tern int...score| 000001c0 2c 20 68 69 5f 73 63 6f 72 65 2c 20 6c 69 76 65 |, hi_score, live| 000001d0 73 2c 20 6e 65 78 74 5f 6c 69 66 65 5f 74 69 6d |s, next_life_tim| 000001e0 65 2c 20 69 6e 76 75 6c 6e 65 72 61 62 6c 65 3b |e, invulnerable;| 000001f0 0a 0a 76 6f 69 64 20 67 61 6d 65 5f 66 69 6e 69 |..void game_fini| 00000200 73 68 28 76 6f 69 64 29 3b 0a 0a 76 6f 69 64 20 |sh(void);..void | 00000210 6d 61 6b 65 5f 65 78 70 6c 6f 73 69 6f 6e 28 69 |make_explosion(i| 00000220 6e 74 20 78 2c 20 69 6e 74 20 79 29 3b 0a 0a 76 |nt x, int y);..v| 00000230 6f 69 64 20 6d 61 6b 65 5f 6c 6f 74 73 5f 6f 66 |oid make_lots_of| 00000240 5f 70 61 72 74 69 63 6c 65 73 5f 65 76 65 72 79 |_particles_every| 00000250 77 68 65 72 65 28 69 6e 74 20 78 2c 20 69 6e 74 |where(int x, int| 00000260 20 79 2c 20 69 6e 74 20 6e 75 6d 62 65 72 29 3b | y, int number);| 00000270 0a |.| 00000271
.