?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Also allow to open help file with F1
[meritous_recharged.git] / src / demon.c
blob6210bb50ec62d5b266665647ef8754ad879f1fff
1 //
2 // demon.c
3 //
4 // Copyright 2007, 2008 Lancer-X/ASCEAI
5 //
6 // This file is part of Meritous Recharged.
7 //
8 // Meritous Recharged 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 3 of the License, or
11 // (at your option) any later version.
12 //
13 // Meritous Recharged 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 Meritous Recharged. If not, see <http://www.gnu.org/licenses/>.
20 //
21
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <math.h>
25 #include <SDL.h>
26 #include <SDL_image.h>
27 #include <assert.h>
28
29 #include "levelblit.h"
30 #include "mapgen.h"
31 #include "save.h"
32 #include "audio.h"
33 #include "boss.h"
34 #include "tiles.h"
35
36 SDL_Surface *reticle;
37 SDL_Surface *inrange;
38 SDL_Surface *invis_enemy;
39
40 int searched[3000];
41 int searchdist[3000];
42 int csearch;
43 int room_active[3000];
44
45 int fc_open = 0;
46
47 int max_activate_dist = 0;
48
49 // enemy
50
51 int sqr(int x)
52 {
53 return x*x;
54 }
55
56 struct enemy {
57 int x, y;
58 int room;
59 int lives;
60 int deaths;
61 int str;
62 int curr_follow;
63
64 int followdepth;
65
66 int enemy_type;
67
68 SDL_Surface *image;
69 int blit_pos;
70
71 int creationcost;
72
73 int teleport_v;
74 int speed;
75 int t;
76 int active;
77 int fire_rate;
78
79 int last_room;
80 int p_last_room;
81
82 float move_dir;
83
84 int min_gems;
85 int max_gems;
86
87 struct enemy *next;
88 struct enemy *next_active;
89
90 int delete_me;
91 int dying;
92
93 struct RoomConnection *m_exit;
94 };
95
96 // shot
97
98 struct bullet {
99 float x, y;
100 struct enemy *firer;
101 struct bullet *parent;
102 int room;
103 float speed;
104 float dir;
105 int img;
106 // img: 0 = bullet
107 // 1 = star
108 // 2 = laser
109 // 3 = ministar
110 // 4 = rocket
111 // 5 = replishot
112 // 6 = laserstar
113 // 7 = proxy
114 // 8 = remote laser
115 int t;
116
117 int invuln;
118 float natural_dir;
119
120 int fire_time;
121 int duration;
122 float turn;
123
124 int shield_damage;
125
126 struct bullet *next;
127
128 int dying;
129 int delete_me;
130 };
131
132 struct diamond {
133 int x, y;
134 int room;
135 int t;
136 struct diamond *next;
137 struct diamond *next_in_room;
138 struct diamond *prv_in_room;
139 int value;
140 int delete_me;
141 };
142
143 struct enemyloc {
144 struct enemy *e;
145 struct enemyloc *n;
146 };
147
148 int total_enemies = 0;
149 int killed_enemies = 0;
150 int total_bullets = 0;
151 int active_enemies = 0;
152 int total_gems = 0;
153
154 struct enemy *enemy_stack = NULL;
155 struct bullet *bullet_stack = NULL;
156 struct enemy *active_stack = NULL;
157 struct diamond *gem_stack = NULL;
158
159 struct diamond *room_gems[3000] = {NULL};
160
161 struct enemyloc *enemy_loc_stack[20][20] = {{NULL}};
162
163 struct enemy *CreateEnemy(int enemy_x, int enemy_y, int enemy_room);
164 struct enemy *CreateEnemyEx(int enemy_x, int enemy_y, int enemy_room, int enemy_type);
165 void SCreateGem(int x, int y, int r, int v);
166 void ActivateEnemies(int room);
167 void SoupUpEnemies(int boss);
168
169 void SpawnLaser(int x, int y, float dir, int fire_time, int duration, float turn, int dmg);
170
171 void DestroyThings()
172 {
173 struct enemy *ec, *ed;
174 struct bullet *bc, *bd;
175 struct diamond *dc, *dd;
176 int i;
177
178 ec = enemy_stack;
179 bc = bullet_stack;
180 dc = gem_stack;
181
182 while (ec) {
183 ed = ec;
184 ec = ec->next;
185 free(ed);
186 }
187 while (bc) {
188 bd = bc;
189 bc = bc->next;
190 free(bd);
191 }
192 while (dc) {
193 dd = dc;
194 dc = dc->next;
195 free(dd);
196 }
197
198 enemy_stack = NULL;
199 bullet_stack = NULL;
200 gem_stack = NULL;
201 active_stack = NULL;
202
203 for (i = 0; i < 3000; i++) {
204 room_gems[i] = NULL;
205 }
206 }
207
208 struct GRD_Box {
209 int d[60][60];
210 };
211 int GetRoomDist(int room1, int room2);
212 int FindRoomDist(int room1, int room2)
213 {
214 struct RoomConnection *follow;
215 int mdist = 1000000;
216 int cdist;
217
218 if (room1 == room2) return 0;
219 fc_open++;
220
221 searched[room1] = csearch;
222
223 follow = rooms[room1].con;
224 while (follow != NULL) {
225 if (searched[follow->c] != csearch) {
226 cdist = GetRoomDist(follow->c, room2);
227
228 if (cdist < mdist) {
229 mdist = cdist;
230 }
231 }
232 follow = follow->n;
233 }
234 fc_open--;
235 return mdist;
236 }
237
238 int GetRoomDist(int room1, int room2)
239 {
240 int gx, gy, dx, dy;
241 int temp;
242 int ix, iy;
243 static struct GRD_Box *g[50][50] = {{NULL}};
244
245 fc_open++;
246
247 if (room2 < room1) {
248 temp = room2;
249 room2 = room1;
250 room1 = temp;
251 }
252
253 gx = room1 / 60;
254 dx = room1 % 60;
255 gy = room2 / 60;
256 dy = room2 % 60;
257
258 if (g[gx][gy] == NULL) {
259 g[gx][gy] = malloc(sizeof(struct GRD_Box));
260 for (iy = 0; iy < 60; iy++) {
261 for (ix = 0; ix < 60; ix++) {
262 g[gx][gy]->d[ix][iy] = -1;
263 }
264 }
265 }
266
267 if (g[gx][gy]->d[dx][dy] == -1) {
268 g[gx][gy]->d[dx][dy] = FindRoomDist(room1, room2);
269 }
270 fc_open--;
271 return g[gx][gy]->d[dx][dy];
272 }
273
274 void AddEnemyLoc(struct enemy *e, int x, int y)
275 {
276 struct enemyloc *next;
277 x+=1;
278 y+=1;
279 next = enemy_loc_stack[x][y];
280 enemy_loc_stack[x][y] = malloc(sizeof(struct enemyloc));
281 enemy_loc_stack[x][y]->n = next;
282 enemy_loc_stack[x][y]->e = e;
283 }
284
285 struct enemyloc *GetEnemyLoc(int s_x, int s_y)
286 {
287 return enemy_loc_stack[s_x / 1100 + 1][s_y / 1100 + 1];
288 }
289
290 void AddEnemyPos(struct enemy *e)
291 {
292 int x_loc, y_loc, ix, iy;
293 x_loc = (e->x) / 1100;
294 y_loc = (e->y) / 1100;
295 AddEnemyLoc(e, x_loc, y_loc);
296 ix = ((e->x - screen->w) / 1100);
297 iy = ((e->y - screen->h) / 1100);
298 if (x_loc != ix) {
299 AddEnemyLoc(e, ix, y_loc);
300 }
301 if (y_loc != iy) {
302 AddEnemyLoc(e, x_loc, iy);
303 }
304 if ((x_loc != ix) && (y_loc != iy)) {
305 AddEnemyLoc(e, ix, iy);
306 }
307 }
308
309 void WriteEnemyData()
310 {
311 struct enemy *ptr;
312 int n = 0;
313 int i = 0;
314
315 ptr = enemy_stack;
316 while (ptr != NULL) {
317 if (!ptr->delete_me) n++;
318 ptr = ptr->next;
319 }
320 FWInt(n);
321 ptr = enemy_stack;
322 while (ptr != NULL) {
323 if (!ptr->delete_me) {
324 FWInt(ptr->x);
325 FWInt(ptr->y);
326 FWInt(ptr->room);
327 FWInt(ptr->enemy_type);
328 i++;
329 if (i % 100 == 99) {
330 SavingScreen(2, (float)i / (float)n);
331 }
332 }
333 ptr = ptr->next;
334 }
335 }
336
337 void WriteGemData()
338 {
339 struct diamond *ptr;
340 int n = 0;
341 int i = 0;
342
343 ptr = gem_stack;
344 while (ptr != NULL) {
345 if (!ptr->delete_me) n++;
346 ptr = ptr->next;
347 }
348 FWInt(n);
349 ptr = gem_stack;
350 while (ptr != NULL) {
351 if (!ptr->delete_me) {
352 FWInt(ptr->x);
353 FWInt(ptr->y);
354 FWInt(ptr->room);
355 FWInt(ptr->value);
356
357 i++;
358 if (i % 100 == 99) {
359 SavingScreen(3, (float)i / (float)n);
360 }
361 }
362 ptr = ptr->next;
363 }
364 }
365
366 void WriteCreatureData()
367 {
368 FWInt(total_enemies);
369 FWInt(killed_enemies);
370
371 WriteEnemyData();
372 WriteGemData();
373 }
374
375 void ReadEnemyData()
376 {
377 int i, n;
378 int x, y, room, t;
379
380 n = FRInt();
381
382 for (i = 0; i < n; i++) {
383 x = FRInt();
384 y = FRInt();
385 room = FRInt();
386 t = FRInt();
387 CreateEnemyEx(x, y, room, t);
388 total_enemies--;
389
390 if (i % 100 == 99) {
391 LoadingScreen(2, (float)i / (float)n);
392 }
393 }
394 LoadingScreen(2, 1);
395 }
396
397 void ReadGemData()
398 {
399 int i, n;
400 int x, y, room, value;
401
402 n = FRInt();
403
404 for (i = 0; i < n; i++) {
405 x = FRInt();
406 y = FRInt();
407 room = FRInt();
408 value = FRInt();
409 SCreateGem(x, y, room, value);
410
411 if (i % 100 == 99) {
412 LoadingScreen(3, (float)i / (float)n);
413 }
414 }
415 LoadingScreen(3, 1);
416 }
417
418 void ActivateVisited()
419 {
420 int i;
421
422
423 for (i = 0; i < 3000; i++) {
424 if (rooms[i].visited) {
425 ActivateEnemies(i);
426 }
427 if (i % 10 == 9) {
428 LoadingScreen(4, (float)i / 3000.0);
429 }
430 }
431 LoadingScreen(4, 1);
432 }
433
434 void ReadCreatureData()
435 {
436 total_enemies = FRInt();
437 killed_enemies = FRInt();
438
439 ReadEnemyData();
440 ReadGemData();
441 ActivateVisited();
442 }
443
444 SDL_Surface *enemy_sprites[10];
445
446 struct enemy * AllocateEnemy()
447 {
448 return malloc(sizeof(struct enemy));
449 }
450
451 struct bullet * AllocateBullet()
452 {
453 return malloc(sizeof(struct bullet));
454 }
455
456 struct diamond * AllocateGem()
457 {
458 return malloc(sizeof(struct diamond));
459 }
460
461 struct enemy *CreateEnemy(int enemy_x, int enemy_y, int enemy_room)
462 {
463 int enemy_type;
464
465 enemy_type = rand() % (rooms[enemy_room].s_dist / 5 + 1);
466 if (rooms[enemy_room].room_type == 5) enemy_type += rand()%3;
467 if (enemy_type > 8) enemy_type = rand()%3+6;
468
469 if (rooms[enemy_room].s_dist >= 15) {
470 if (rand()%64 == 0) {
471 enemy_type = 9;
472 }
473 }
474
475
476 return CreateEnemyEx(enemy_x, enemy_y, enemy_room, enemy_type);
477 }
478
479 struct enemy *CreateEnemyEx(int enemy_x, int enemy_y, int enemy_room, int enemy_type)
480 {
481 struct enemy *new_enemy;
482
483 new_enemy = AllocateEnemy();
484 new_enemy->x = enemy_x;
485 new_enemy->y = enemy_y;
486 new_enemy->room = enemy_room;
487
488 rooms[enemy_room].enemies++;
489 new_enemy->deaths = 0;
490 new_enemy->t = rand() % 65536;
491 new_enemy->active = 0;
492 new_enemy->curr_follow = -1;
493 new_enemy->teleport_v = 0;
494
495 new_enemy->m_exit = NULL;
496
497 new_enemy->dying = 0;
498 new_enemy->delete_me = 0;
499
500 new_enemy->last_room = -1;
501 new_enemy->p_last_room = -1;
502
503 new_enemy->enemy_type = enemy_type;
504
505 new_enemy->followdepth = 4;
506
507 switch (enemy_type) {
508 case 0:
509 new_enemy->image = enemy_sprites[0];
510 new_enemy->lives = 1;
511 new_enemy->str = 20;
512 new_enemy->speed = 3;
513 new_enemy->fire_rate = 20;
514 new_enemy->min_gems = 0;
515 new_enemy->max_gems = 3;
516 new_enemy->creationcost = 1;
517 break;
518 case 1:
519 new_enemy->image = enemy_sprites[1];
520 new_enemy->lives = 1;
521 new_enemy->str = 50;
522 new_enemy->speed = 4;
523 new_enemy->fire_rate = 25;
524 new_enemy->min_gems = 2;
525 new_enemy->max_gems = 6;
526 new_enemy->creationcost = 1;
527 break;
528 case 2:
529 new_enemy->image = enemy_sprites[2];
530 new_enemy->lives = 1;
531 new_enemy->str = 180;
532 new_enemy->speed = 5;
533 new_enemy->fire_rate = 40;
534 new_enemy->min_gems = 8;
535 new_enemy->max_gems = 15;
536 new_enemy->creationcost = 1;
537 break;
538 case 3:
539 new_enemy->image = enemy_sprites[3];
540 new_enemy->lives = 2;
541 new_enemy->str = 220;
542 new_enemy->speed = 3;
543 new_enemy->fire_rate = 24;
544 new_enemy->min_gems = 12;
545 new_enemy->max_gems = 20;
546 new_enemy->creationcost = 1;
547 break;
548 case 4:
549 new_enemy->image = enemy_sprites[4];
550 new_enemy->lives = 1;
551 new_enemy->str = 360;
552 new_enemy->speed = 3;
553 new_enemy->fire_rate = 32;
554 new_enemy->min_gems = 18;
555 new_enemy->max_gems = 32;
556 new_enemy->creationcost = 2;
557 break;
558 case 5:
559 new_enemy->image = enemy_sprites[5];
560 new_enemy->lives = 1;
561 new_enemy->str = 450;
562 new_enemy->speed = 3;
563 new_enemy->fire_rate = 2;
564 new_enemy->min_gems = 32;
565 new_enemy->max_gems = 64;
566 new_enemy->creationcost = 2;
567 break;
568 case 6:
569 new_enemy->image = enemy_sprites[6];
570 new_enemy->lives = 2;
571 new_enemy->str = 450;
572 new_enemy->speed = 4;
573 new_enemy->fire_rate = 10;
574 new_enemy->min_gems = 50;
575 new_enemy->max_gems = 100;
576 new_enemy->creationcost = 2;
577 break;
578 case 7:
579 new_enemy->image = enemy_sprites[7];
580 new_enemy->lives = 1;
581 new_enemy->str = 500;
582 new_enemy->speed = 4;
583 new_enemy->fire_rate = 27;
584 new_enemy->min_gems = 80;
585 new_enemy->max_gems = 160;
586 new_enemy->creationcost = 3;
587 break;
588 case 8:
589 new_enemy->image = enemy_sprites[8];
590 new_enemy->lives = 4;
591 new_enemy->str = 500;
592 new_enemy->speed = 2;
593 new_enemy->fire_rate = 8;
594 new_enemy->min_gems = 200;
595 new_enemy->max_gems = 400;
596 new_enemy->creationcost = 4;
597 break;
598 case 9:
599 new_enemy->image = enemy_sprites[0];
600 new_enemy->lives = 1;
601 new_enemy->str = rooms[enemy_room].s_dist * 20;
602 new_enemy->speed = 3;
603 new_enemy->fire_rate = 21;
604 new_enemy->min_gems = 300;
605 new_enemy->max_gems = 600;
606 new_enemy->creationcost = 3;
607 break;
608 case 10:
609 new_enemy->image = enemy_sprites[9];
610 new_enemy->lives = 8;
611 new_enemy->str = 500;
612 new_enemy->speed = 1;
613 new_enemy->fire_rate = 4;
614 new_enemy->min_gems = 5000;
615 new_enemy->max_gems = 6000;
616 new_enemy->followdepth = 8;
617 new_enemy->creationcost = 6;
618 break;
619 }
620
621 if (training) {
622 new_enemy->str = new_enemy->str * 4 / 5;
623 new_enemy->fire_rate += (new_enemy->fire_rate / 2);
624 new_enemy->speed *= 2;
625 }
626
627 if (rooms[new_enemy->room].room_type == 5) {
628 new_enemy->str = new_enemy->str * 3 / 2;
629 if (new_enemy->str > 1500) new_enemy->str = 1500;
630 new_enemy->fire_rate = new_enemy->fire_rate - 1;
631 }
632
633 new_enemy->blit_pos = (rand()%(new_enemy->image->w / (new_enemy->image->h/new_enemy->lives)))*(new_enemy->image->h/new_enemy->lives);
634 new_enemy->next_active = NULL;
635
636 new_enemy->next = enemy_stack;
637 enemy_stack = new_enemy;
638
639 AddEnemyPos(new_enemy);
640
641 total_enemies++;
642
643 return new_enemy;
644 }
645
646 void SCreateGem(int x, int y, int r, int v)
647 {
648 struct diamond *new_gem;
649
650 if (TileData[Get(x / 32, y / 32)].Is_Solid) {
651 return;
652 }
653 if (GetRoom(x / 32, y / 32) != r) {
654 return;
655 }
656 if (v == 0) {
657 return;
658 }
659
660 new_gem = AllocateGem();
661
662 new_gem->x = x;
663 new_gem->y = y;
664 new_gem->room = r;
665 new_gem->delete_me = 0;
666 new_gem->t = rand()%65536;
667 new_gem->next = gem_stack;
668 new_gem->next_in_room = room_gems[r];
669
670 if (room_gems[r] != NULL) {
671 room_gems[r]->prv_in_room = new_gem;
672 }
673
674 new_gem->value = v;
675 new_gem->prv_in_room = NULL;
676 gem_stack = new_gem;
677 room_gems[r] = new_gem;
678
679 total_gems++;
680 }
681
682 void CreateGem(int x, int y, int r, int v)
683 {
684 if (v == 0) return;
685 if ( (rand()%1000) < ((int)log(v)/4 + (player_hp == 1)*5 + 2) ) {
686 SCreateGem(x, y, r, 31337);
687 } else {
688 SCreateGem(x, y, r, v);
689 }
690 }
691
692 float PlayerDir(int x, int y)
693 {
694 float dy = player_y+12 - y;
695 float dx = player_x+8 - x;
696 return atan2(dy, dx);
697 }
698
699 int PlayerDist(int x, int y)
700 {
701 int d = sqrt(sqr(x-(player_x+8))+sqr(y-(player_y+12)));
702 return d;
703 }
704
705 struct bullet *CreateBullet(int x, int y, struct enemy *firer, int bullet_type, float dir, float spd)
706 {
707 struct bullet *new_shot;
708
709 new_shot = AllocateBullet();
710 new_shot->x = x;
711 new_shot->y = y;
712 new_shot->firer = firer;
713 if (firer != NULL) {
714 new_shot->room = firer->room;
715 } else {
716 new_shot->room = GetRoom(x / 32, y / 32);
717 }
718 new_shot->dying = 0;
719 new_shot->delete_me = 0;
720 new_shot->t = rand() % 65536;
721 new_shot->dir = dir;
722 new_shot->speed = spd;
723 new_shot->invuln = 0;
724 new_shot->parent = NULL;
725
726 switch (bullet_type) {
727 case 0:
728 new_shot->img = 0;
729 break;
730 case 1:
731 new_shot->img = 1;
732 new_shot->invuln = 1;
733 break;
734 case 2:
735 new_shot->img = 2;
736 new_shot->invuln = 1;
737 new_shot->t = 0;
738 new_shot->fire_time = 30;
739 new_shot->duration = 30;
740 new_shot->turn = 0.0;
741 new_shot->speed = 0.0;
742 break;
743 case 3:
744 new_shot->img = 3;
745 break;
746 case 4:
747 new_shot->img = 4;
748 new_shot->invuln = 1;
749 break;
750 case 5:
751 new_shot->img = 5;
752 new_shot->t = 0;
753 break;
754 case 6:
755 new_shot->img = 6;
756 new_shot->invuln = 1;
757 break;
758 case 7:
759 new_shot->img = 7;
760 new_shot->invuln = 1;
761 break;
762 case 8:
763 new_shot->img = 8;
764 new_shot->invuln = 1;
765 break;
766 }
767 if (training) {
768 new_shot->speed *= 0.8;
769 }
770 new_shot->next = bullet_stack;
771 bullet_stack = new_shot;
772
773 total_bullets++;
774 return new_shot;
775 }
776
777 struct bullet *FireLaser(int x, int y, struct enemy *firer, float dir, int fire_time, int duration, float turn, int dmg)
778 {
779 int f_total;
780 struct bullet *b;
781 b = CreateBullet(x, y, firer, 2, dir, 0);
782 b->fire_time = fire_time;
783 b->duration = duration;
784 b->turn = turn;
785 b->shield_damage = dmg;
786
787 if (training) {
788 f_total = b->fire_time + b->duration;
789 if (b->duration > 1) {
790 b->duration /= 2;
791 b->fire_time = f_total - b->duration;
792 }
793 b->shield_damage = (b->shield_damage + 1) / 2;
794 }
795 return b;
796 }
797
798 void InitEnemySprites()
799 {
800 enemy_sprites[0] = IMG_Load("dat/i/mons1.png");
801 SDL_SetColorKey(enemy_sprites[0], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
802 enemy_sprites[1] = IMG_Load("dat/i/mons2.png");
803 SDL_SetColorKey(enemy_sprites[1], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
804 enemy_sprites[2] = IMG_Load("dat/i/mons3.png");
805 SDL_SetColorKey(enemy_sprites[2], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
806 enemy_sprites[3] = IMG_Load("dat/i/mons4.png");
807 SDL_SetColorKey(enemy_sprites[3], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
808 enemy_sprites[4] = IMG_Load("dat/i/mons5.png");
809 SDL_SetColorKey(enemy_sprites[4], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
810 enemy_sprites[5] = IMG_Load("dat/i/mons6.png");
811 SDL_SetColorKey(enemy_sprites[5], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
812 enemy_sprites[6] = IMG_Load("dat/i/mons7.png");
813 SDL_SetColorKey(enemy_sprites[6], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
814 enemy_sprites[7] = IMG_Load("dat/i/mons8.png");
815 SDL_SetColorKey(enemy_sprites[7], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
816 enemy_sprites[8] = IMG_Load("dat/i/mons9.png");
817 SDL_SetColorKey(enemy_sprites[8], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
818 enemy_sprites[9] = IMG_Load("dat/i/mons10.png");
819 SDL_SetColorKey(enemy_sprites[9], SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
820
821 reticle = IMG_Load("dat/i/reticle.png");
822 SDL_SetColorKey(reticle, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
823
824 inrange = IMG_Load("dat/i/inrange.png");
825 SDL_SetColorKey(inrange, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
826
827 invis_enemy = IMG_Load("dat/i/hidden_monster.png");
828 SDL_SetColorKey(invis_enemy, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
829 }
830
831 void ActivateSingleEnemy(struct enemy *t)
832 {
833 struct enemy *new_active;
834
835 if (t->active) return;
836
837 if (t->enemy_type != 10) {
838 if (t->enemy_type == 9) {
839 if (max_activate_dist < 10) return;
840 } else {
841
842 if (t->enemy_type > (max_activate_dist / 5 + 2)) return;
843
844 }
845 }
846
847 new_active = t;
848 new_active->next_active = active_stack;
849 active_stack = new_active;
850
851 active_enemies += 1;
852 t->active = 1;
853 }
854
855 void XActivateSingleEnemy(struct enemy *t)
856 {
857 if (rooms[t->room].room_type == 2) return;
858 if (rooms[t->room].room_type == 3) return;
859
860 ActivateSingleEnemy(t);
861 }
862
863 void InitEnemies()
864 {
865 int c_room;
866 int cr_w, cr_h, cr_x, cr_y;
867 int room_size;
868 int n_enemies;
869 int i;
870 int trying;
871 int e_x, e_y;
872 int nx, ny;
873
874 max_activate_dist = 0;
875
876 InitEnemySprites();
877
878 for (ny = 0; ny < 20; ny++) {
879 for (nx = 0; nx < 20; nx++) {
880 enemy_loc_stack[nx][ny] = NULL;
881 }
882 }
883
884 total_enemies = 0;
885 killed_enemies = 0;
886 total_bullets = 0;
887 active_enemies = 0;
888 total_gems = 0;
889
890 for (i = 0; i < 3000; i++) {
891 room_active[i] = 0;
892 }
893
894 if (game_load) {
895 ReadCreatureData();
896 } else {
897 for (c_room = 1; c_room < 3000; c_room++) {
898 cr_x = rooms[c_room].x + 1;
899 cr_y = rooms[c_room].y + 1;
900 cr_w = rooms[c_room].w - 2;
901 cr_h = rooms[c_room].h - 2;
902 room_size = cr_w * cr_h;
903
904 n_enemies = rand() % ((room_size / 4) + 1);
905
906 if (rooms[c_room].room_type == 2) {
907 n_enemies = 0;
908 }
909
910 if (rooms[c_room].room_type == 3) {
911 n_enemies += (n_enemies + room_size) / 2;
912 }
913
914 if (rooms[c_room].room_type == 5) {
915 n_enemies = 50;
916 }
917
918 while (n_enemies > 0) {
919 trying = 1;
920 while (trying) {
921 e_x = cr_x * 32 + 32 + rand() % (cr_w * 32 - 64 + 1);
922 e_y = cr_y * 32 + 32 + rand() % (cr_h * 32 - 64 + 1);
923
924 if ((!IsSolid(Get( (e_x-16) /32, (e_y-16) /32)))&&(!IsSolid(Get( (e_x+16) /32, (e_y-16) /32)))) {
925 if ((!IsSolid(Get( (e_x-16) /32, (e_y+16) /32)))&&(!IsSolid(Get( (e_x+16) /32, (e_y+16) /32)))) {
926 n_enemies -= (CreateEnemy(e_x, e_y, c_room))->creationcost;
927 trying = 0;
928 }
929 }
930 }
931 }
932 if (c_room % 100 == 99) {
933 LoadingScreen(2, (float)c_room / 3000.0);
934 }
935 }
936 }
937
938
939 }
940
941 void InitEnemiesAfter()
942 {
943 if(game_load) {
944 if (current_boss > 0) {
945 int i;
946 int max = current_boss;
947 if(max > 3) {
948 max = 3;
949 }
950 for (i = 1; i <= max; i++) {
951 SoupUpEnemies(i);
952 }
953 }
954 }
955 }
956
957
958 int EnemyMovement(struct enemy *e, int move_x, int move_y)
959 {
960 if (!IsSolid(Get( (move_x - 12)/32, (move_y - 12)/32))) {
961 if (!IsSolid(Get( (move_x + 12)/32, (move_y - 12)/32))) {
962 if (!IsSolid(Get( (move_x - 12)/32, (move_y + 12)/32))) {
963 if (!IsSolid(Get( (move_x + 12)/32, (move_y + 12)/32))) {
964 e->x = move_x;
965 e->y = move_y;
966 return 1;
967 }
968 }
969 }
970 }
971 return 0;
972 }
973
974 // Only activate SOME enemies. A room can only be ZActivated once
975 void ZActivateEnemies(int room)
976 {
977 struct enemy *t;
978 struct RoomConnection *rc;
979
980 if (room_active[room]) return;
981 room_active[room] = 1;
982
983 t = enemy_stack;
984
985 while (t != NULL) {
986 // 1/4 chance of activating each enemy
987 if (rand()%4 == 0) {
988 if (t->room == room) {
989 if (t->active == 0) {
990 XActivateSingleEnemy(t);
991 }
992 }
993 }
994 t = t->next;
995 }
996
997 // 1/3 chance of activating each adjacent room
998 rc = rooms[room].con;
999 while (rc != NULL) {
1000 if (rand()%3 == 0) {
1001 ZActivateEnemies(rc->c);
1002 }
1003 rc = rc->n;
1004 }
1005 }
1006
1007 void ActivateEnemies(int room)
1008 {
1009 struct enemy *t;
1010 struct RoomConnection *rc;
1011
1012 t = enemy_stack;
1013
1014 if (rooms[room].s_dist > max_activate_dist) {
1015 max_activate_dist = rooms[room].s_dist;
1016 }
1017
1018 while (t != NULL) {
1019 if (t->room == room) {
1020 if (t->active == 0) {
1021 ActivateSingleEnemy(t);
1022
1023 if (rooms[room].room_type == 3) {
1024 t->teleport_v = (rand() % 1500) + 50;
1025 }
1026 }
1027 }
1028 t = t->next;
1029 }
1030
1031 // 1/2 chance of activating each adjacent room
1032 rc = rooms[room].con;
1033 while (rc != NULL) {
1034 if (rand()%2 == 0) {
1035 if ((rooms[rc->c].room_type != 2) && (rooms[rc->c].room_type != 3)) {
1036 ZActivateEnemies(rc->c);
1037 }
1038 }
1039 rc = rc->n;
1040 }
1041 }
1042
1043 int CanEnterRoom(int room)
1044 {
1045 if (room == 0) return 0;
1046 if (rooms[room].room_type == 2) return 0;
1047 if (rooms[room].room_type == 3) return 0;
1048 if (rooms[room].room_type == 5) return 0;
1049 if (rooms[room].room_type == 6) return 0;
1050
1051 if (artifacts[11]) {
1052 if (rooms[room].enemies > 3) {
1053 return 0;
1054 }
1055 }
1056
1057 return 1;
1058 }
1059 int CanLeaveRoom(int room)
1060 {
1061 if (room == 0) return 0;
1062 if (rooms[room].room_type == 2) return 0;
1063 if (rooms[room].room_type == 3) return 0;
1064 if (rooms[room].room_type == 5) return 0;
1065 if (rooms[room].room_type == 6) return 0;
1066
1067 return 1;
1068 }
1069
1070 int RecurseFind(struct enemy *e, int room, int depth)
1071 {
1072 struct RoomConnection *follow;
1073 int dpth;
1074 int mindpth = 1000000;
1075 follow = rooms[room].con;
1076
1077 if (CanEnterRoom(room) == 0) return 0;
1078
1079 if (room == player_room) return depth+1;
1080 if (searched[room] == csearch) {
1081 if (searchdist[room] < depth)
1082 return 0;
1083 }
1084 if (depth > e->followdepth) return 0;
1085 if ((e->last_room == room) && (e->p_last_room == player_room)) return 0;
1086
1087 searched[room] = csearch;
1088 searchdist[room] = depth;
1089
1090 while (follow != NULL) {
1091 if ((dpth = RecurseFind(e, follow->c, depth+1)) > 0) {
1092 if (dpth < mindpth) {
1093 mindpth = dpth;
1094 }
1095 }
1096 follow = follow->n;
1097 }
1098
1099 if (mindpth != 1000000) {
1100 return mindpth;
1101 }
1102
1103 return 0;
1104
1105 }
1106
1107 int FollowPlayer(struct enemy *e, struct RoomConnection **rcon)
1108 {
1109 struct RoomConnection *follow;
1110 int mindepth = 1000000;
1111 int newdepth;
1112 int mdist = 1000000;
1113 int ndist = 0;
1114 int rdepth[4000];
1115
1116 return 0;
1117 follow = rooms[e->room].con;
1118
1119 while (follow != NULL) {
1120 if (follow->c == player_room) {
1121 if (CanEnterRoom(follow->c)) {
1122 *rcon = follow;
1123 e->curr_follow = (*rcon)->c;
1124 return 1;
1125 }
1126 }
1127 follow = follow->n;
1128 }
1129
1130 // Recursively follow the player, to a certain depth
1131 follow = rooms[e->room].con;
1132 csearch = rand();
1133
1134 // Are we already following the player into a room?
1135
1136 /*if (e->curr_follow != -1) {
1137 // See if this room is the best FIRST
1138 newdepth = RecurseFind(e, e->curr_follow, 0);
1139 if (newdepth > 0) {
1140 mindepth = newdepth;
1141 *rcon = follow;
1142 }
1143 }*/
1144
1145 while (follow != NULL) {
1146 if (CanEnterRoom(follow->c)) {
1147 newdepth = RecurseFind(e, follow->c, 0);
1148 rdepth[follow->c] = newdepth;
1149 if (newdepth > 0) {
1150 if (mindepth > newdepth) {
1151 mindepth = newdepth;
1152 *rcon = follow;
1153 }
1154 }
1155 }
1156 follow = follow->n;
1157 }
1158 if (mindepth != 1000000) {
1159 follow = rooms[e->room].con;
1160 while (follow != NULL) {
1161 if (CanEnterRoom(follow->c)) {
1162 newdepth = rdepth[follow->c];
1163 if (newdepth == mindepth) {
1164 ndist = PlayerDist(follow->x*32+16, follow->y*32+16);
1165 if (ndist < mdist) {
1166 mdist = ndist;
1167 *rcon = follow;
1168 }
1169 }
1170 }
1171 follow = follow->n;
1172 }
1173
1174 e->curr_follow = (*rcon)->c;
1175 return mindepth;
1176 }
1177 return 0;
1178 }
1179
1180 void KillEnemy(struct enemy *t)
1181 {
1182 static int lastkill = 0;
1183 int ct;
1184
1185 if (t->dying > 0) return;
1186 if (t->teleport_v > 0) return;
1187 if (t->delete_me) return;
1188
1189 ct = SDL_GetTicks();
1190
1191 if ((ct - lastkill) > 100) {
1192 SND_Pos("dat/a/enemyhit.wav", 128, PlayerDist(t->x, t->y));
1193 lastkill = ct;
1194 }
1195
1196 t->dying = 1;
1197 }
1198
1199 void ArtifactRoomUnlock(int room)
1200 {
1201 struct enemy *e;
1202 int x, y, rx, ry, rt;
1203 int placed;
1204 int tot_treasures;
1205
1206 e = active_stack;
1207 while (e != NULL) {
1208 if ((e->delete_me == 0) && (e->room == room)) {
1209 return;
1210 }
1211 e = e->next_active;
1212 }
1213
1214 // unlock doors
1215
1216 for (y = 0; y < rooms[room].h; y++) {
1217 for (x = 0; x < rooms[room].w; x++) {
1218 rx = x + rooms[room].x;
1219 ry = y + rooms[room].y;
1220 rt = Get(rx, ry);
1221
1222 if ((rt >= 21) && (rt <= 24)) {
1223 Put(rx, ry, rt - 21 + 13, room);
1224 }
1225 }
1226 }
1227
1228 // place treasure
1229 placed = 0;
1230 tot_treasures = 2 + rand() % (rooms[room].s_dist / 8 + 1);
1231 while (placed < tot_treasures) {
1232 x = rooms[room].x + (rand() % (rooms[room].w - 2));
1233 y = rooms[room].y + (rand() % (rooms[room].h - 2));
1234 //printf("Attempting %d, %d\n", x, y);
1235 if ((x+y)%2 == (placed>0)) {
1236 //printf("Correct placement type\n");
1237 if (!IsSolid(Get(x, y))) {
1238 //printf("Not solid\n");
1239 Put(x, y, 26, room);
1240 placed++;
1241 }
1242 }
1243 fflush(stdout);
1244 }
1245
1246 // sign room
1247 rooms[room].room_type = 4;
1248 }
1249
1250 void EnemySound(int t, int dist)
1251 {
1252 static int last_e_sound = 0;
1253 static int last_delay = 150;
1254 int curr_e_sound = SDL_GetTicks();
1255
1256 if ((curr_e_sound - last_delay) < last_e_sound) {
1257 return;
1258 }
1259
1260 switch (t) {
1261 case 0:
1262 SND_Pos("dat/a/mons0shot.wav", 48, dist);
1263 last_delay = 200;
1264 break;
1265 case 1:
1266 SND_Pos("dat/a/mons1shot.wav", 112, dist);
1267 last_delay = 500;
1268 break;
1269 case 2:
1270 SND_Pos("dat/a/mons2shot.wav", 110, dist);
1271 last_delay = 1000;
1272 break;
1273 case 3:
1274 SND_Pos("dat/a/mons3shot.wav", 110, dist);
1275 last_delay = 500;
1276 break;
1277 case 4:
1278 SND_Pos("dat/a/mons4shot.wav", 110, dist);
1279 last_delay = 900;
1280 break;
1281 case 5:
1282 SND_Pos("dat/a/mons5shot.wav", 80, dist);
1283 last_delay = 60;
1284 break;
1285 case 6:
1286 SND_Pos("dat/a/mons6shot.wav", 110, dist);
1287 last_delay = 1000;
1288 break;
1289 case 7:
1290 SND_Pos("dat/a/mons7shot.wav", 110, dist);
1291 last_delay = 600;
1292 break;
1293 case 8:
1294 SND_Pos("dat/a/mons8shot.wav", 110, dist);
1295 last_delay = 700;
1296 break;
1297 case 9:
1298 SND_Pos("dat/a/mons9shot.wav", 110, dist);
1299 last_delay = 242;
1300 break;
1301 case 10:
1302 SND_Pos("dat/a/mons10shot.wav", 110, dist);
1303 last_delay = 250;
1304 break;
1305
1306
1307 default:
1308 break;
1309 }
1310
1311 last_e_sound = curr_e_sound;
1312 }
1313
1314 void MoveEnemy(struct enemy *e)
1315 {
1316 int n_gems;
1317 int i;
1318 int move_x, move_y;
1319 int door_x=0, door_y=0;
1320 int enemy_fire_type;
1321 int actual_lives;
1322 int can_move = 0;
1323 struct RoomConnection *con_traverse;
1324 struct RoomConnection *rcon;
1325 int nearest;
1326 struct bullet *b;
1327 e->t++;
1328 float dp;
1329 float dpf;
1330 if (e->teleport_v > 0) {
1331 e->teleport_v--;
1332 return;
1333 }
1334
1335 if (e->enemy_type < 10) {
1336 enemy_fire_type = e->enemy_type;
1337 } else {
1338 enemy_fire_type = rand()%10;
1339 }
1340
1341 if (e->dying == 0) {
1342 if ((e->t % e->fire_rate) == 0) {
1343 if (e->room == player_room) {
1344 switch (enemy_fire_type) {
1345 case 0:
1346 EnemySound(0, PlayerDist(e->x, e->y));
1347 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y), 1.5);
1348 if (e->enemy_type==10) e->fire_rate = 20;
1349 break;
1350
1351 case 1:
1352 EnemySound(1, PlayerDist(e->x, e->y));
1353 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.1, 2.1);
1354 CreateBullet(e->x, e->y, e, 3, PlayerDir(e->x, e->y), 2.4);
1355 CreateBullet(e->x, e->y, e, 3, PlayerDir(e->x, e->y)-0.1, 2.1);
1356 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y), 1.7);
1357 if (e->enemy_type==10) e->fire_rate = 25;
1358 break;
1359
1360 case 2:
1361 EnemySound(2, PlayerDist(e->x, e->y));
1362 for (dp = 0; dp < M_PI*2; dp += 0.25) {
1363 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+dp, 1.1);
1364 }
1365 dp = RandomDir();
1366 for (i = 0; i < 20; i++) {
1367 CreateBullet(e->x, e->y, e, 0, dp, (float)i * 0.1 + 2.5);
1368 }
1369 if (e->enemy_type==10) e->fire_rate = 40;
1370 break;
1371
1372 case 3:
1373 EnemySound(3, PlayerDist(e->x, e->y));
1374 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y), 2.5);
1375 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.1, 2.5);
1376 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.2, 2.5);
1377 CreateBullet(e->x, e->y, e, 1, PlayerDir(e->x, e->y), 1.5);
1378 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.2, 2.2);
1379 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.3, 2.2);
1380 if (e->enemy_type==10) e->fire_rate = 24;
1381 break;
1382
1383 case 4:
1384 EnemySound(4, PlayerDist(e->x, e->y));
1385 for (dp = 0; dp < M_PI * 0.66; dp += 0.2) {
1386 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.5 - dp, 1.8+(dp/2));
1387 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.4 + dp, 1.8+(dp/2));
1388 }
1389 FireLaser(e->x, e->y, e, PlayerDir(e->x, e->y), 24, 4, 20.0, 6);
1390 if (e->enemy_type==10) e->fire_rate = 32;
1391 break;
1392
1393 case 5:
1394 EnemySound(5, PlayerDist(e->x, e->y));
1395 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y), 4);
1396 if (e->enemy_type==10) e->fire_rate = 2;
1397 break;
1398
1399 case 6:
1400 EnemySound(6, PlayerDist(e->x, e->y));
1401 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.25, 6);
1402 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.25, 4);
1403
1404 CreateBullet(e->x, e->y, e, 5, PlayerDir(e->x, e->y) - 0.05, 4.99);
1405 CreateBullet(e->x, e->y, e, 5, PlayerDir(e->x, e->y), 4.99);
1406 CreateBullet(e->x, e->y, e, 5, PlayerDir(e->x, e->y) + 0.05, 4.99);
1407
1408 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.25, 5);
1409 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.25, 3);
1410 if (e->enemy_type==10) e->fire_rate = 10;
1411 break;
1412
1413 case 7:
1414 EnemySound(7, PlayerDist(e->x, e->y));
1415 for (dp = 0; dp < M_PI * 0.66; dp += 0.1) {
1416 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)+0.5 - dp, 1.8+(dp/2));
1417 CreateBullet(e->x, e->y, e, 3, PlayerDir(e->x, e->y)-0.4 + dp, 1.8+(dp/2));
1418
1419 CreateBullet(e->x, e->y, e, 3, PlayerDir(e->x, e->y)+0.5 - dp*2, 4+(dp*2));
1420 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y)-0.4 + dp*2, 4+(dp*2));
1421 }
1422 FireLaser(e->x, e->y, e, (float)e->t / 25.0, 16, 10, 0.08, 4);
1423 FireLaser(e->x, e->y, e, (float)e->t / 25.0 + M_PI*2/4, 16, 10, 0.08, 4);
1424 FireLaser(e->x, e->y, e, (float)e->t / 25.0 + M_PI*4/4, 16, 10, 0.08, 4);
1425 FireLaser(e->x, e->y, e, (float)e->t / 25.0 + M_PI*6/4, 16, 10, 0.08, 4);
1426 if (e->enemy_type==10) e->fire_rate = 27;
1427 break;
1428
1429 case 8:
1430 EnemySound(8, PlayerDist(e->x, e->y));
1431 for (dp = 0; dp < 1; dp += 0.1) {
1432 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y) + M_PI/2 + dp, 3 + dp/2);
1433 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y), 4 + dp);
1434 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y) - M_PI/2 - dp, 3 + dp/2);
1435 }
1436 CreateBullet(e->x, e->y, e, 6, (e->t / e->fire_rate)*0.7, 2);
1437 if (e->enemy_type==10) e->fire_rate = 8;
1438 break;
1439
1440 case 9:
1441 i = rand()%((rand()%(PlayerDist(e->x, e->y)+1))+1);
1442 if (i < 15) {
1443 EnemySound(9, PlayerDist(e->x, e->y));
1444 dpf = (float)(2000 - e->str) / 2500.0;
1445 for (dp = 0; dp < 1; dp += dpf) {
1446 (CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y) + 0.1 - dp/5.0, 3.5 + dp/3.0));
1447 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y) + (2*M_PI / 3) + 0.1 - dp/5.0, 3.5 + dp/3.0);
1448 CreateBullet(e->x, e->y, e, 0, PlayerDir(e->x, e->y) + (4*M_PI / 3) + 0.1 - dp/5.0, 3.5 + dp/3.0);
1449
1450 CreateBullet(e->x, e->y, e, 4, PlayerDir(e->x, e->y) + 0.1 - dp/5.0, 7 + dp*5);
1451 CreateBullet(e->x, e->y, e, 4, PlayerDir(e->x, e->y) + (2*M_PI / 3) + 0.1 - dp/5.0, 7 + dp*5);
1452 CreateBullet(e->x, e->y, e, 4, PlayerDir(e->x, e->y) + (4*M_PI / 3) + 0.1 - dp/5.0, 7 + dp*5);
1453 }
1454 }
1455 if (e->enemy_type==10) e->fire_rate = 21;
1456 break;
1457
1458 default:
1459 break;
1460 }
1461 }
1462 }
1463
1464 if ((e->t % e->speed) == 0) {
1465 if (player_room == e->room) {
1466 e->m_exit = NULL;
1467 if (e->t % (e->speed * (8 + rand()%6)) == 0) {
1468 e->move_dir = (float)(rand()%256) / 256.0 * M_PI * 2.0;
1469 }
1470 move_x = e->x + cos(e->move_dir)*5;
1471 move_y = e->y + sin(e->move_dir)*5;
1472
1473 EnemyMovement(e, move_x, move_y);
1474 } else {
1475 if (CanLeaveRoom(e->room)) {
1476 // Try to follow the player into the next room
1477
1478 // Are we already moving towards an exit?
1479
1480 if (e->m_exit != NULL) {
1481 rcon = e->m_exit;
1482
1483 door_x = (rcon->x + (rcon->x - rcon->x2))*32+16;
1484 door_y = (rcon->y + (rcon->y - rcon->y2))*32+16;
1485
1486 can_move = 1;
1487 } else {
1488 con_traverse = rooms[e->room].con;
1489 nearest = PlayerDist(e->x, e->y);
1490 rcon = NULL;
1491 while (con_traverse != NULL) {
1492 i = PlayerDist(con_traverse->x2 * 32 + 16, con_traverse->y2 * 32 + 16);
1493
1494 if ((i < nearest) && CanEnterRoom(GetRoom(con_traverse->x2, con_traverse->y2))) {
1495 nearest = i;
1496 rcon = con_traverse;
1497 }
1498 con_traverse = con_traverse->n;
1499 }
1500
1501 if (rcon != NULL) {
1502 door_x = (rcon->x + (rcon->x - rcon->x2))*32+16;
1503 door_y = (rcon->y + (rcon->y - rcon->y2))*32+16;
1504 e->m_exit = rcon;
1505 can_move = 1;
1506 }
1507 }
1508
1509 // So, can we move?
1510 if (can_move) {
1511 // Are we near the door?
1512 if (( abs(door_x - e->x) + abs(door_y - e->y))<6) {
1513 // Go through the door
1514 e->last_room = e->room;
1515 e->p_last_room = player_room;
1516 e->x = (rcon->x2 + (rcon->x2 - rcon->x))*32+16;
1517 e->y = (rcon->y2 + (rcon->y2 - rcon->y))*32+16;
1518 rooms[e->room].enemies--;
1519 e->room = (rcon->c);
1520 rooms[e->room].enemies++;
1521 e->curr_follow = -1;
1522
1523 e->m_exit = NULL;
1524
1525 } else {
1526 // Move towards the door
1527 e->move_dir = atan2(door_y - e->y, door_x - e->x);
1528 move_x = e->x + cos(e->move_dir)*5;
1529 move_y = e->y + sin(e->move_dir)*5;
1530
1531 EnemyMovement(e, move_x, move_y);
1532 }
1533 }
1534 }
1535 }
1536 }
1537 }
1538
1539 if (e->dying > 0) {
1540 e->dying++;
1541 if (e->dying == 3) {
1542 b = bullet_stack;
1543 while (b != NULL) {
1544 if (!b->delete_me) {
1545 if (b->firer == e) {
1546 b->delete_me = 1;
1547 CreateGem(b->x, b->y, b->room, (e->max_gems + e->min_gems) / 5 + (artifacts[2] * (e->max_gems + e->min_gems) / 4));
1548 }
1549 }
1550 b = b->next;
1551 }
1552 }
1553 if (e->dying >= 20) {
1554 if ((e->lives >= 4)&&training) {
1555 actual_lives = e->lives * 3 / 4;
1556 } else {
1557 actual_lives = e->lives;
1558 }
1559
1560 e->deaths++;
1561 if (e->deaths >= actual_lives) {
1562 e->deaths--;
1563 e->delete_me = 1;
1564 e->dying = 0;
1565 killed_enemies++;
1566 rooms[e->room].enemies--;
1567 n_gems = e->min_gems + rand()%(e->max_gems - e->min_gems + 1);
1568 for (i = 0; i < n_gems; i++) {
1569 CreateGem(e->x - 16 + rand()%32, e->y - 16 + rand()%32, e->room, 1+rand()%4 + (artifacts[2]*rand()%3));
1570 }
1571 if (rooms[e->room].room_type == 3) {
1572 ArtifactRoomUnlock(e->room);
1573 }
1574 } else {
1575 e->dying = 0;
1576 }
1577 }
1578 }
1579 }
1580
1581 void MoveBullet(struct bullet *e)
1582 {
1583 int pdist;
1584 struct bullet *n;
1585 float fx, fy;
1586 static int last_shield_hit_sound = 0;
1587 int c_shield_hit_sound;
1588
1589 e->t++;
1590
1591 if ( (boss_fight_mode != 0) && (boss_fight_mode != 2) && (e->dying == 0) ) {
1592 e->dying = 1;
1593 }
1594
1595 if (e->dying == 0) {
1596 if (e->img == 7) {
1597 if (proxy_seek) {
1598 e->speed = 10;
1599 e->img = 4;
1600 e->dir = (e->dir + PlayerDir(e->x, e->y)) / 2;
1601 }
1602 }
1603
1604 e->x += cos(e->dir) * e->speed;
1605 e->y += sin(e->dir) * e->speed;
1606
1607 if (e->img == 1) {
1608 if (e->t % 20 == 19) {
1609 if (e->t % 40 >= 20)
1610 CreateBullet(e->x, e->y, e->firer, 3, e->dir + M_PI/2, e->speed * 0.75);
1611 else
1612 CreateBullet(e->x, e->y, e->firer, 3, e->dir - M_PI/2, e->speed * 0.75);
1613 }
1614 }
1615 if (e->img == 6) {
1616 if (e->t % 40 == 39) {
1617 (FireLaser(e->x, e->y, e->firer, (float)e->t / 30.0, 20, 10, 0.05, 2))->parent = e;
1618 (FireLaser(e->x, e->y, e->firer, (float)e->t / 30.0 + M_PI*2/3, 20, 10, 0.05, 2))->parent = e;
1619 (FireLaser(e->x, e->y, e->firer, (float)e->t / 30.0 + M_PI*4/3, 20, 10, 0.05, 2))->parent = e;
1620 }
1621 }
1622
1623
1624 if (e->img == 5) {
1625 if (e->t < 100) {
1626 if (e->t % 20 == 9) {
1627 n = CreateBullet(e->x, e->y, e->firer, 5, e->dir + M_PI/4, e->speed);
1628 n->natural_dir = e->dir;
1629 n->t = e->t;
1630 e->natural_dir = e->dir;
1631
1632 e->dir -= M_PI / 4;
1633 }
1634 if (e->t % 20 == 19) {
1635 e->dir = e->natural_dir;
1636 }
1637 }
1638 if (e->t == 100) {
1639 e->dir = PlayerDir(e->x, e->y);
1640 e->speed *= 1.5;
1641 }
1642 }
1643
1644 if (IsSolid(Get(e->x/32, e->y/32))) {
1645 if (e->img == 3) {
1646 if (e->room == player_room) {
1647 e->dir = PlayerDir(e->x, e->y);
1648
1649 if (IsSolid(Get((e->x + cos(e->dir) * e->speed * 1.5)/32, (e->y + sin(e->dir) * e->speed * 1.5)/32))) e->dying = 1;
1650
1651 } else {
1652 e->dying = 1;
1653 }
1654 } else {
1655 e->dying = 1;
1656 }
1657 }
1658
1659 if (e->img == 2) {
1660 if (e->parent != NULL) {
1661 e->x = e->parent->x;
1662 e->y = e->parent->y;
1663 } else {
1664 if (e->firer != NULL) {
1665 e->x = e->firer->x;
1666 e->y = e->firer->y;
1667 }
1668 }
1669 if (e->dying == 0) {
1670 if ((e->t > e->fire_time)&&(e->t <= (e->fire_time + e->duration))) {
1671 fx = e->x;
1672 fy = e->y;
1673 while (!IsSolid(Get((fx)/32, (fy)/32))) {
1674 if (player_dying == 0) {
1675 if (PlayerDist(fx, fy) < 30) {
1676 // hits player shield
1677 if ((player_shield > 0)&&(shield_hp > 0)) {
1678 shield_hp -= e->shield_damage;
1679 if (shield_hp >= 0) {
1680 e->dying = 1;
1681 break;
1682 } else {
1683 shield_hp = 0;
1684 }
1685 }
1686
1687 if (PlayerDist(fx, fy) < 4 - (2 * artifacts[5])) {
1688 player_dying = 1;
1689 SND_Pos("dat/a/playerhurt.wav", 128, 0);
1690 e->dying = 1;
1691 break;
1692 }
1693 }
1694 }
1695 fx += cos(e->dir)*2;
1696 fy += sin(e->dir)*2;
1697 }
1698 }
1699 if (e->turn > 10) {
1700 if (e->dir > PlayerDir(e->x, e->y)) {
1701 e->dir -= (e->dir - PlayerDir(e->x, e->y)) / (e->turn - 9.00);
1702 e->dir -= (e->dir - PlayerDir(e->x, e->y)) / (e->turn - 9.00);
1703 } else {
1704 e->dir += (PlayerDir(e->x, e->y) - e->dir) / (e->turn - 9.00);
1705 }
1706 } else {
1707 e->dir += e->turn;
1708 }
1709 if (e->t > (e->fire_time + e->duration)) {
1710 e->dying = 1;
1711 }
1712 }
1713 } else {
1714
1715 pdist = PlayerDist(e->x, e->y);
1716
1717 if (pdist < 30) {
1718 if (player_dying == 0) {
1719 if (player_shield > 0) {
1720 if (shield_hp > 0) {
1721 shield_hp--;
1722 if (e->img == 4) {
1723 e->dying = 1;
1724 } else {
1725 e->dir += M_PI;
1726 c_shield_hit_sound = SDL_GetTicks();
1727
1728 if ((c_shield_hit_sound - 150) > last_shield_hit_sound) {
1729 SND_Pos("dat/a/shieldhit.wav", 50, 0);
1730 last_shield_hit_sound = c_shield_hit_sound;
1731 }
1732 while (PlayerDist(e->x, e->y) < 30) {
1733 e->x += cos(e->dir) * e->speed;
1734 e->y += sin(e->dir) * e->speed;
1735 }
1736 }
1737 }
1738 }
1739 }
1740 }
1741 if (e->dying == 0) {
1742 if (pdist < 6 - (2 * artifacts[5])) {
1743 if (player_dying == 0) {
1744 SND_Pos("dat/a/playerhurt.wav", 128, 0);
1745 player_dying = 1;
1746 }
1747 }
1748 }
1749 }
1750 }
1751
1752 if ((e->dying == 1) && (e->img == 8)) {
1753 SpawnLaser(e->x - cos(e->dir) * e->speed, e->y - sin(e->dir) * e->speed, PlayerDir(e->x, e->y), 10, 10, 0.0, player_shield / 6);
1754 }
1755
1756 if (GetRoom((e->x)/32, (e->y)/32) != e->room) {
1757 e->delete_me = 1;
1758 }
1759
1760 if (e->dying > 0) {
1761 e->dying++;
1762
1763 if (e->dying >= 10) {
1764 e->delete_me = 1;
1765 e->dying = 0;
1766 }
1767 }
1768 }
1769
1770 void DrawEnemy(struct enemy *e, SDL_Surface *scr)
1771 {
1772 SDL_Rect draw_pos;
1773 SDL_Rect surf_pos;
1774 static SDL_Surface *teleflash = NULL;
1775
1776 if (e->delete_me) return;
1777 draw_pos.x = e->x - e->image->h/2/e->lives - scroll_x;
1778 draw_pos.y = e->y - e->image->h/2/e->lives - scroll_y;
1779
1780 surf_pos.x = e->blit_pos;
1781 surf_pos.y = e->image->h/e->lives*e->deaths;
1782 surf_pos.w = e->image->h/e->lives;
1783 surf_pos.h = e->image->h/e->lives;
1784
1785 if (e->teleport_v < 8) {
1786
1787 if (e->dying == 0) {
1788 SDL_BlitSurface(e->image, &surf_pos, scr, &draw_pos);
1789 } else {
1790 if ((e->deaths+1) >= e->lives) {
1791 surf_pos.w = e->image->h/e->lives * (20 - e->dying) / 20;
1792 surf_pos.h = surf_pos.w;
1793 surf_pos.x += (e->image->h/e->lives - surf_pos.w)/2;
1794 surf_pos.y += (e->image->h/e->lives - surf_pos.w)/2;
1795 draw_pos.x += (e->image->h/e->lives - surf_pos.w)/2;
1796 draw_pos.y += (e->image->h/e->lives - surf_pos.w)/2;
1797 } else {
1798 surf_pos.w = e->image->h/e->lives * (20 - e->dying/2) / 20;
1799 surf_pos.h = surf_pos.w;
1800 surf_pos.x += (e->image->h/e->lives - surf_pos.w)/2;
1801 surf_pos.y += (e->image->h/e->lives - surf_pos.w)/2;
1802 draw_pos.x += (e->image->h/e->lives - surf_pos.w)/2;
1803 draw_pos.y += (e->image->h/e->lives - surf_pos.w)/2;
1804 }
1805 SDL_BlitSurface(e->image, &surf_pos, scr, &draw_pos);
1806 }
1807
1808 if (((e->t % 8) == 1) && (!game_paused)) {
1809 e->blit_pos = (e->blit_pos + e->image->h/e->lives) % e->image->w;
1810 }
1811
1812 draw_pos.x = e->x - e->image->h/e->lives/2 - scroll_x;
1813 draw_pos.y = e->y - e->image->h/e->lives/2 - scroll_y;
1814
1815 draw_pos.x -= (128-e->image->h/e->lives)/2;
1816 draw_pos.y -= (128-e->image->h/e->lives)/2;
1817
1818 if (magic_circuit >= e->str) {
1819 SDL_BlitSurface(reticle, NULL, scr, &draw_pos);
1820 }
1821
1822 draw_pos.x = e->x - e->image->h/e->lives/2 - scroll_x;
1823 draw_pos.y = e->y - e->image->h/e->lives/2 - scroll_y;
1824
1825 draw_pos.x -= (128-e->image->h/e->lives)/2;
1826 draw_pos.y -= (128-e->image->h/e->lives)/2;
1827
1828 if (sqrt(sqr(e->x - player_x) + sqr(e->y - player_y)) < circuit_range) {
1829 SDL_BlitSurface(inrange, NULL, scr, &draw_pos);
1830 }
1831 }
1832
1833 if (e->teleport_v < 24) {
1834 if (teleflash == NULL) {
1835 teleflash = IMG_Load("dat/i/teleflash.png");
1836 SDL_SetColorKey(teleflash, SDL_SRCCOLORKEY | SDL_RLEACCEL, 0);
1837 }
1838
1839 surf_pos.x = 48*((e->teleport_v) / 3);
1840 surf_pos.y = 0;
1841 surf_pos.w = 48;
1842 surf_pos.h = 48;
1843
1844 draw_pos.x = e->x - 24 - scroll_x;
1845 draw_pos.y = e->y - 24 - scroll_y;
1846 SDL_BlitSurface(teleflash, &surf_pos, scr, &draw_pos);
1847 }
1848 }
1849
1850 void DrawBullet(struct bullet *b)
1851 {
1852 int i;
1853 int x1, y1, x2, y2, xo1, yo1;
1854 int z;
1855 float fx, fy;
1856 static SDL_Surface *d_star_small = NULL, *d_star_big = NULL, *d_star_ls = NULL;
1857 SDL_Rect draw_pos, surf_pos;
1858 if (b->delete_me) return;
1859 if (b->img == 0) {
1860 if (b->dying > 0) {
1861 DrawCircle(b->x - scroll_x, b->y - scroll_y, 6+(b->dying / 2), b->dying*10);
1862 DrawCircle(b->x - scroll_x, b->y - scroll_y, 3+(b->dying / 2), 255-b->dying*10);
1863 } else {
1864 if ((b->t % 8) < 4) {
1865 DrawCircle(b->x - scroll_x, b->y - scroll_y, 6, 0);
1866 DrawCircle(b->x - scroll_x, b->y - scroll_y, 4, 255);
1867 } else {
1868 DrawCircle(b->x - scroll_x, b->y - scroll_y, 6, 255);
1869 DrawCircle(b->x - scroll_x, b->y - scroll_y, 4, 0);
1870 }
1871 }
1872 }
1873 if (b->img == 1) {
1874 if (d_star_big == NULL) {
1875 d_star_big = IMG_Load("dat/i/star1.png");
1876 SDL_SetColorKey(d_star_big, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
1877 }
1878
1879 if (b->dying == 0) {
1880 surf_pos.x = b->x - 16 - scroll_x;
1881 surf_pos.y = b->y - 16 - scroll_y;
1882 draw_pos.x = (b->t % 8)*32;
1883 draw_pos.y = 0;
1884 draw_pos.w = 32;
1885 draw_pos.h = 32;
1886 SDL_BlitSurface(d_star_big, &draw_pos, screen, &surf_pos);
1887 } else {
1888 DrawCircle(b->x - scroll_x, b->y - scroll_y, 4+(b->dying), b->dying*10);
1889 DrawCircle(b->x - scroll_x, b->y - scroll_y, 2+(b->dying), 255-b->dying*10);
1890 }
1891 }
1892 if (b->img == 2) {
1893 // IMMA CHARGIN MAH LAZER
1894 if (b->t <= b->fire_time) {
1895 z = (b->t * 150 / (b->fire_time+1)) + 80;
1896
1897 fx = b->x;
1898 fy = b->y;
1899 while (!IsSolid(Get((fx)/32, (fy)/32))) {
1900 DrawRect(fx-1-scroll_x, fy-1-scroll_y, 4, 4, z/2);
1901 fx += cos(b->dir)*2;
1902 fy += sin(b->dir)*2;
1903
1904 if ((player_shield > 0)&&(shield_hp > 0)&&(PlayerDist(fx, fy) < 30)) break;
1905 if (PlayerDist(fx, fy) < 4) break;
1906 }
1907 DrawCircle(b->x - scroll_x, b->y - scroll_y, 5, (z+255)/2.4);
1908 DrawCircle(fx-cos(b->dir)*2 - scroll_x, fy-sin(b->dir)*2 - scroll_y, 4, z/2);
1909
1910 fx = b->x;
1911 fy = b->y;
1912 while (!IsSolid(Get((fx)/32, (fy)/32))) {
1913 DrawRect(fx-scroll_x, fy-scroll_y, 2, 2, z);
1914 fx += cos(b->dir)*2;
1915 fy += sin(b->dir)*2;
1916
1917 if ((player_shield > 0)&&(shield_hp > 0)&&(PlayerDist(fx, fy) < 30)) break;
1918 if (PlayerDist(fx, fy) < 4) break;
1919 }
1920
1921 DrawCircle(b->x - scroll_x, b->y - scroll_y, 3, (z+255)/2);
1922 DrawCircle(fx-cos(b->dir)*2 - scroll_x, fy-sin(b->dir)*2 - scroll_y, 2, z);
1923 }
1924
1925 // SHOOP DA WHOOP
1926 if ((b->t > b->fire_time) && (b->t <= b->fire_time + b->duration)) {
1927 z = 255 - ((b->t - b->fire_time) * 200 / (b->duration+1));
1928
1929 fx = b->x;
1930 fy = b->y;
1931 while (!IsSolid(Get((fx)/32, (fy)/32))) {
1932 DrawRect(fx-3-scroll_x, fy-3-scroll_y, 8, 8, z*2/3);
1933 fx += cos(b->dir)*2;
1934 fy += sin(b->dir)*2;
1935
1936 if ((player_shield > 0)&&(shield_hp > 0)&&(PlayerDist(fx, fy) < 30)) break;
1937 if (PlayerDist(fx, fy) < 4) break;
1938 }
1939 DrawCircle(b->x - scroll_x, b->y - scroll_y, 9, (z+255)/2.4);
1940 DrawCircle(fx-cos(b->dir)*2 - scroll_x, fy-sin(b->dir)*2 - scroll_y, 8, z*2/3);
1941 fx = b->x;
1942 fy = b->y;
1943 while (!IsSolid(Get((fx)/32, (fy)/32))) {
1944 DrawRect(fx-2-scroll_x, fy-2-scroll_y, 6, 6, z);
1945 fx += cos(b->dir)*2;
1946 fy += sin(b->dir)*2;
1947
1948 x1 = fx + rand()%12 - rand()%12 - scroll_x;
1949 y1 = fy + rand()%12 - rand()%12 - scroll_y;
1950 DrawRect(x1, y1, 2, 2, rand()%(z+1));
1951
1952 if ((player_shield > 0)&&(shield_hp > 0)&&(PlayerDist(fx, fy) < 30)) break;
1953 if (PlayerDist(fx, fy) < 4) break;
1954 }
1955
1956 DrawCircle(b->x - scroll_x, b->y - scroll_y, 7, (z+255)/2);
1957 DrawCircle(fx-cos(b->dir)*2 - scroll_x, fy-sin(b->dir)*2 - scroll_y, 6, z);
1958 }
1959 }
1960 if (b->img == 3) {
1961 if (d_star_small == NULL) {
1962 d_star_small = IMG_Load("dat/i/star2.png");
1963 SDL_SetColorKey(d_star_small, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
1964 }
1965 if (b->dying == 0) {
1966 surf_pos.x = b->x - 8 - scroll_x;
1967 surf_pos.y = b->y - 8 - scroll_y;
1968 draw_pos.x = (b->t % 8)*16;
1969 draw_pos.y = 0;
1970 draw_pos.w = 16;
1971 draw_pos.h = 16;
1972 SDL_BlitSurface(d_star_small, &draw_pos, screen, &surf_pos);
1973 } else {
1974 DrawCircle(b->x - scroll_x, b->y - scroll_y, 4+(b->dying/2), b->dying*10);
1975 DrawCircle(b->x - scroll_x, b->y - scroll_y, 2+(b->dying/2), 255-b->dying*10);
1976 }
1977 }
1978 if (b->img == 4) {
1979 if (b->dying == 0) {
1980 x1 = b->x + cos(b->dir)*(2) - scroll_x;
1981 y1 = b->y + sin(b->dir)*(2) - scroll_y;
1982
1983 x2 = b->x - cos(b->dir)*(80) - scroll_x;
1984 y2 = b->y - sin(b->dir)*(80) - scroll_y;
1985 for (i = 0; i < 40; i++) {
1986 xo1 = (x2 - x1)*i/40 + x1;
1987 yo1 = (y2 - y1)*i/40 + y1;
1988
1989 z = (i/2);
1990 if (i > 10) z = (40 - i)/7;
1991
1992 DrawRect(xo1 - z - 2, yo1 - z - 2, z*2 + 4, z*2 + 4, 200);
1993 }
1994 for (i = 0; i < 40; i++) {
1995 xo1 = (x2 - x1)*i/40 + x1;
1996 yo1 = (y2 - y1)*i/40 + y1;
1997
1998 z = (i/2);
1999 if (i > 10) z = (40 - i)/7;
2000
2001 DrawRect(xo1 - z, yo1 - z, z*2, z*2, 255);
2002 }
2003 } else{
2004 DrawCircleEx(b->x - scroll_x, b->y - scroll_y, b->dying * 2 + 1, b->dying * 1.75 - 1, 230);
2005 DrawCircleEx(b->x - scroll_x, b->y - scroll_y, b->dying * 2, b->dying * 1.75, 255);
2006 }
2007 }
2008 if (b->img == 5) {
2009 if (b->dying > 0) {
2010 i = 4+(b->dying / 5);
2011 DrawRect(b->x - scroll_x - (i-1/2), b->y - scroll_y - (i-1/2), i, i, b->dying*10);
2012 i = 2+(b->dying / 5);
2013 DrawRect(b->x - scroll_x - (i-1/2), b->y - scroll_y - (i-1/2), i, i, 255-b->dying*10);
2014 } else {
2015 if ((b->t % 8) < 4) {
2016 DrawRect(b->x - scroll_x - 1, b->y - scroll_y - 1, 4, 4, 0);
2017 DrawRect(b->x - scroll_x, b->y - scroll_y, 2, 2, 255);
2018 } else {
2019 DrawRect(b->x - scroll_x - 1, b->y - scroll_y - 1, 4, 4, 255);
2020 DrawRect(b->x - scroll_x, b->y - scroll_y, 2, 2, 0);
2021 }
2022 }
2023 }
2024 if (b->img == 6) {
2025 if (d_star_ls == NULL) {
2026 d_star_ls = IMG_Load("dat/i/star3.png");
2027 SDL_SetColorKey(d_star_ls, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
2028 }
2029 if (b->dying == 0) {
2030 surf_pos.x = b->x - 16 - scroll_x;
2031 surf_pos.y = b->y - 16 - scroll_y;
2032 draw_pos.x = (b->t % 8)*32;
2033 draw_pos.y = 0;
2034 draw_pos.w = 32;
2035 draw_pos.h = 32;
2036 SDL_BlitSurface(d_star_ls, &draw_pos, screen, &surf_pos);
2037 } else {
2038 DrawCircle(b->x - scroll_x, b->y - scroll_y, 4+(b->dying), 255-b->dying*10);
2039 DrawCircle(b->x - scroll_x, b->y - scroll_y, 2+(b->dying), b->dying*10);
2040 }
2041 }
2042
2043 if (b->img == 7) {
2044 if ((b->t % 8) < 4) {
2045 DrawCircle(b->x - scroll_x, b->y - scroll_y, 8, 0);
2046 DrawCircle(b->x - scroll_x, b->y - scroll_y, 5, 255);
2047 } else {
2048 DrawCircle(b->x - scroll_x, b->y - scroll_y, 8, 255);
2049 DrawCircle(b->x - scroll_x, b->y - scroll_y, 5, 0);
2050 }
2051 }
2052 if (b->img == 8) {
2053 if (b->dying > 0) {
2054 DrawCircle(b->x - scroll_x, b->y - scroll_y, 12+(b->dying), b->dying*10);
2055 DrawCircle(b->x - scroll_x, b->y - scroll_y, 6+(b->dying), 255-b->dying*10);
2056 } else {
2057 if ((b->t % 6) < 3) {
2058 DrawCircle(b->x - scroll_x, b->y - scroll_y, 12, 0);
2059 DrawCircle(b->x - scroll_x, b->y - scroll_y, 8, 255);
2060 } else {
2061 DrawCircle(b->x - scroll_x, b->y - scroll_y, 12, 255);
2062 DrawCircle(b->x - scroll_x, b->y - scroll_y, 8, 0);
2063 }
2064 }
2065 }
2066 }
2067
2068 void DrawGem(struct diamond *g)
2069 {
2070 static SDL_Surface *d_sprite = NULL;
2071 int gemtype = 0;
2072 static char hp_icon[2];
2073 SDL_Rect draw_pos;
2074 SDL_Rect surf_pos;
2075 unsigned char fxp = (SDL_GetTicks() / 300)%2 ? 255 : 0;
2076
2077 if (g->delete_me) return;
2078
2079 if (d_sprite == NULL) {
2080 d_sprite = IMG_Load("dat/i/gem.png");
2081 SDL_SetColorKey(d_sprite, SDL_SRCCOLORKEY | SDL_RLEACCEL, 255);
2082 hp_icon[0] = 3;
2083 hp_icon[1] = 0;
2084 }
2085
2086 if (g->value == 1) gemtype = 2;
2087 if ((g->value > 1)&&(g->value < 5)) gemtype = 1;
2088 if (g->value >= 5) gemtype = 0;
2089
2090 if (g->value != 31337) {
2091
2092 surf_pos.x = g->x - 4 - scroll_x;
2093 surf_pos.y = g->y - 4 - scroll_y;
2094 draw_pos.x = (g->t % 4) * 8 + 32 * gemtype;
2095 draw_pos.y = 0;
2096 draw_pos.w = 8;
2097 draw_pos.h = 8;
2098
2099 SDL_BlitSurface(d_sprite, &draw_pos, screen, &surf_pos);
2100 } else {
2101 DrawCircle(g->x - scroll_x, g->y - scroll_y, 6, (rand()%64) ^ fxp);
2102 draw_text(g->x - 4 - scroll_x, g->y - 4 - scroll_y, hp_icon, (200+rand()%56) ^ fxp);
2103 }
2104
2105 g->t++;
2106 }
2107
2108 void xprintf(char *s)
2109 {
2110 printf(s);
2111 fflush(stdout);
2112 }
2113
2114 void DrawInvisible(int x, int y)
2115 {
2116 SDL_Rect dest;
2117 dest.x = x - scroll_x - 24;
2118 dest.y = y - scroll_y - 24;
2119 SDL_BlitSurface(invis_enemy, NULL, screen, &dest);
2120 }
2121
2122 void DrawEntities()
2123 {
2124 struct enemy *t;
2125 struct bullet *b;
2126 struct diamond *g;
2127 struct enemyloc *els;
2128
2129 if ((rooms[player_room].room_type != 3)&&(rooms[player_room].room_type != 2)) {
2130 // Draw gems
2131
2132 g = room_gems[player_room];
2133 while (g != NULL) {
2134 if ((g->room == player_room)&&(g->delete_me == 0)&&(g->value != 31337)) {
2135 DrawGem(g);
2136 }
2137 g = g->next_in_room;
2138 }
2139 g = room_gems[player_room];
2140 while (g != NULL) {
2141 if ((g->room == player_room)&&(g->delete_me == 0)&&(g->value == 31337)) {
2142 DrawGem(g);
2143 }
2144 g = g->next_in_room;
2145 }
2146 }
2147
2148 t = active_stack;
2149 while (t != NULL) {
2150 if (!t->delete_me) {
2151 if ((t->room == player_room) && (t->enemy_type != 9)) {
2152 DrawEnemy(t, screen);
2153 }
2154 }
2155 t = t->next_active;
2156 }
2157
2158 // Draw invisible enemies (if possible)
2159 if (artifacts[6]) {
2160 // Draw the actives
2161 t = active_stack;
2162 while (t != NULL) {
2163 if (!t->delete_me)
2164 {
2165 if (((!t->delete_me)&&((t->room != player_room)||(t->enemy_type == 9)))) {
2166 DrawInvisible(t->x, t->y);
2167 }
2168 }
2169 t = t->next_active;
2170 }
2171 // Draw the inactives
2172 if (!artifacts[11]) {
2173 els = GetEnemyLoc(scroll_x, scroll_y);
2174 while (els != NULL) {
2175 t = els->e;
2176 if (((!t->delete_me)&&((t->room != player_room)||(t->enemy_type == 9)))&&(t->active == 0)) {
2177 if ((t->x+24 >= scroll_x) && (t->y+24 >= scroll_y)) {
2178 if (t->x-24 <= (scroll_x+639)) {
2179 if (t->y-24 <= (scroll_y+479)) {
2180 if ((rooms[t->room].room_type != 2) && (rooms[t->room].room_type != 3)) {
2181 DrawInvisible(t->x, t->y);
2182 }
2183 }
2184 }
2185 }
2186 }
2187 els = els->n;
2188 }
2189 }
2190 }
2191
2192 b = bullet_stack;
2193 while (b != NULL) {
2194 if (!b->delete_me) {
2195 if (b->room == player_room) {
2196 DrawBullet(b);
2197 }
2198 }
2199 b = b->next;
2200 }
2201 }
2202
2203 void MoveEntities()
2204 {
2205 struct enemy *t;
2206 struct bullet *b;
2207 struct diamond *g;
2208
2209 struct bullet *b_del;
2210 struct diamond *g_del;
2211
2212 if ((rooms[player_room].room_type != 3)&&(rooms[player_room].room_type != 2)) {
2213 // gem stuff
2214 g = room_gems[player_room];
2215 while (g != NULL) {
2216 if ((g->room == player_room)&&(g->delete_me == 0)) {
2217 if (artifacts[7]) {
2218 g->x += (player_x+4 - g->x)/10;
2219 g->y += (player_y+12 - g->y)/10;
2220 }
2221 if (PlayerDist(g->x, g->y) < 20) {
2222 g->delete_me = 1;
2223 total_gems--;
2224
2225 if (g->value == 31337) {
2226 if (player_hp < (3 + (player_shield == 30)*3)) {
2227 SND_Pos("dat/a/crystal.wav", 64, 0);
2228 player_hp++;
2229 } else {
2230 if (!training) {
2231 SND_Pos("dat/a/tone.wav", 64, 0);
2232
2233 if (player_lives == 1) {
2234 player_lives_part += 15;
2235 } else {
2236 if (player_lives < 10) {
2237 player_lives_part += 4;
2238 } else {
2239 player_lives_part += 1;
2240 }
2241 }
2242 if (player_lives_part >= 88) {
2243 player_lives_part -= 88;
2244 player_lives += 1;
2245 SND_Pos("dat/a/crystal2.wav", 100, 0);
2246 }
2247 }
2248 }
2249
2250 } else {
2251 player_gems += g->value;
2252 }
2253 }
2254 }
2255 g = g->next_in_room;
2256 }
2257 }
2258
2259 t = active_stack;
2260 while (t != NULL) {
2261 if (!t->delete_me) {
2262 if ((rooms[t->room].room_type != 3) || (t->room == player_room))
2263 MoveEnemy(t);
2264 }
2265 t = t->next_active;
2266 }
2267
2268 b = bullet_stack;
2269 while (b != NULL) {
2270 if (!b->delete_me) {
2271 MoveBullet(b);
2272 }
2273 b = b->next;
2274 }
2275
2276 // delete old bullets
2277 b = bullet_stack;
2278 if ((b != NULL)&&(b->delete_me)) {
2279 b_del = b;
2280 b = b->next;
2281 free(b_del);
2282 bullet_stack = b;
2283 }
2284 while (b != NULL) {
2285 if (b->next != NULL) {
2286 if (b->next->delete_me) {
2287 b_del = b->next;
2288
2289 b->next = b->next->next;
2290 free(b_del);
2291 }
2292 }
2293 b = b->next;
2294 }
2295
2296 // delete old gems
2297 g = gem_stack;
2298 if ((g != NULL)&&(g->delete_me)) {
2299 // Remove room reference
2300
2301 if (g == room_gems[g->room]) {
2302 room_gems[g->room] = g->next_in_room;
2303 if (room_gems[g->room] != NULL) {
2304 room_gems[g->room]->prv_in_room = NULL;
2305 }
2306 } else {
2307 if (g->prv_in_room != NULL) {
2308 g->prv_in_room->next_in_room = g->next_in_room;
2309 }
2310
2311 if (g->next_in_room != NULL) {
2312 g->next_in_room->prv_in_room = g->prv_in_room;
2313 }
2314 }
2315
2316 g_del = g;
2317 g = g->next;
2318 free(g_del);
2319 gem_stack = g;
2320 }
2321 while (g != NULL) {
2322 if (g->next != NULL) {
2323 if (g->next->delete_me) {
2324 // Remove room reference
2325 assert( (g->next->prv_in_room != NULL) || (room_gems[g->next->room] == g->next) );
2326
2327 if (g->next == room_gems[g->next->room]) {
2328 room_gems[g->next->room] = g->next->next_in_room;
2329 if (room_gems[g->next->room] != NULL) {
2330 room_gems[g->next->room]->prv_in_room = NULL;
2331 }
2332 } else {
2333 g->next->prv_in_room->next_in_room = g->next->next_in_room;
2334 if (g->next->next_in_room != NULL) {
2335 g->next->next_in_room->prv_in_room = g->next->prv_in_room;
2336 }
2337 }
2338 g_del = g->next;
2339
2340 g->next = g->next->next;
2341 free(g_del);
2342 }
2343 }
2344 g = g->next;
2345 }
2346
2347 // delete old monsters
2348 t = active_stack;
2349 if (t != NULL) {
2350 while (t->delete_me) {
2351 t = t->next_active;
2352 active_stack = t;
2353
2354 if (t == NULL) break;
2355 }
2356 }
2357 while (t != NULL) {
2358 if (t == active_stack)
2359 assert(t->delete_me == 0);
2360 else
2361 assert(!t->delete_me);
2362
2363 if (t->next_active != NULL) {
2364 while (t->next_active->delete_me) {
2365 t->next_active = t->next_active->next_active;
2366 if (t->next_active == NULL) break;
2367 }
2368 }
2369 t = t->next_active;
2370 }
2371 }
2372
2373 void HurtEnemies(int x, int y, int range, int power)
2374 {
2375 struct enemy *t;
2376 int e_range;
2377
2378 t = active_stack;
2379 while (t != NULL) {
2380 e_range = sqrt(sqr(t->x - x) + sqr(t->y - y));
2381 if (e_range < range) {
2382 if (power >= t->str) {
2383 if (t->room == GetRoom(x/32, y/32)) {
2384 KillEnemy(t);
2385 }
2386 }
2387 }
2388 t = t->next_active;
2389 }
2390 }
2391
2392 void CircuitBullets(int x, int y, int r)
2393 {
2394 struct bullet *b;
2395 b = bullet_stack;
2396 while (b != NULL) {
2397 if (!b->delete_me) {
2398 if (b->dying == 0) {
2399 if (b->invuln == 0) {
2400 if (sqrt(sqr(b->x - x) + sqr(b->y - y)) < r) {
2401 b->dying = 1;
2402 }
2403 }
2404 }
2405 }
2406 b = b->next;
2407 }
2408 }
2409
2410 int IsCrystalSummonPossible()
2411 {
2412 if(total_gems == 0) {
2413 return 1;
2414 }
2415 int i;
2416 int total_rooms = 0;
2417 for (i = 0; i < 3000; i++) {
2418 if(room_gems[i] != NULL) {
2419 total_rooms++;
2420 if(total_rooms > 1 || i != player_room) {
2421 return 0;
2422 }
2423 }
2424 }
2425 return 1;
2426 }
2427
2428 unsigned int CrystalSummon()
2429 {
2430 struct diamond *g;
2431 int rg_x, rg_y;
2432 int i;
2433 int crystals = 0;
2434
2435 g = gem_stack;
2436
2437 for (i = 0; i < 3000; i++) {
2438 if(i != player_room) {
2439 room_gems[i] = NULL;
2440 }
2441 }
2442
2443 while (g != NULL) {
2444 if (g->room != player_room) {
2445 if (!g->delete_me) {
2446 if (rooms[g->room].room_type != 3) {
2447 g->room = player_room;
2448 rg_x = rooms[player_room].x * 32 + 32 + rand()%(rooms[player_room].w*32-64);
2449 rg_y = rooms[player_room].y * 32 + 32 + rand()%(rooms[player_room].h*32-64);
2450 if (player_room == 0) {
2451 rg_x = (rooms[player_room].x+5) * 32 + 32 + rand()%(8*32);
2452 rg_y = (rooms[player_room].y+5) * 32 + 32 + rand()%(5*32);
2453 }
2454 while (IsSolid(Get(rg_x/32, rg_y/32))) {
2455 rg_x = rooms[player_room].x * 32 + 32 + rand()%(rooms[player_room].w*32-64);
2456 rg_y = rooms[player_room].y * 32 + 32 + rand()%(rooms[player_room].h*32-64);
2457 if (player_room == 0) {
2458 rg_x = (rooms[player_room].x+5) * 32 + 32 + rand()%(8*32);
2459 rg_y = (rooms[player_room].y+5) * 32 + 32 + rand()%(5*32);
2460 }
2461 }
2462 g->x = rg_x;
2463 g->y = rg_y;
2464 }
2465 }
2466
2467 g->next_in_room = room_gems[g->room];
2468 g->prv_in_room = NULL;
2469 if (room_gems[g->room] != NULL) {
2470 room_gems[g->room]->prv_in_room = g;
2471 }
2472 room_gems[g->room] = g;
2473
2474 crystals++;
2475 }
2476 g = g->next;
2477 }
2478 return crystals;
2479 }
2480
2481 void ActivateRand()
2482 {
2483 struct enemy *e;
2484 struct enemy *en[20000];
2485 int ent = 0;
2486
2487 e = enemy_stack;
2488
2489 while (e != NULL) {
2490 if (e->delete_me == 0) {
2491 if (e->active == 0) {
2492 en[ent++] = e;
2493 }
2494 }
2495 e = e->next;
2496 }
2497 if (ent > 0) {
2498 e = en[rand()%ent];
2499
2500 XActivateSingleEnemy(e);
2501 }
2502 }
2503
2504 void ClearBossBullets()
2505 {
2506 struct bullet *b = bullet_stack;
2507 while (b != NULL) {
2508 if (!b->delete_me) {
2509 if (b->firer == NULL) {
2510 b->delete_me = 1;
2511 }
2512 }
2513 b = b->next;
2514 }
2515 }
2516
2517 void SpawnBullet(int x, int y, int bullet_type, float dir, float spd, int invuln)
2518 {
2519 struct bullet *b;
2520
2521 if ( (current_boss == 3) && (player_shield == 30) && (boss_fight_mode == 2) ) {
2522 spd *= 1.2;
2523 }
2524 b = CreateBullet(x, y, NULL, bullet_type, dir, spd);
2525 if (invuln) {
2526 b->invuln = 1;
2527 }
2528 }
2529 void SpawnLaser(int x, int y, float dir, int fire_time, int duration, float turn, int dmg)
2530 {
2531 FireLaser(x, y, NULL, dir, fire_time, duration, turn, dmg);
2532 }
2533
2534 void CullEnemies(int nth)
2535 {
2536 struct enemy *e;
2537 int i = 0;
2538
2539 e = enemy_stack;
2540
2541 while (e != NULL) {
2542 if (e->delete_me == 0) {
2543 if (rooms[e->room].room_type == 0) {
2544 if ( (i % nth) == (nth - 1)) {
2545 e->delete_me = 1;
2546 killed_enemies++;
2547 e->dying = 0;
2548 rooms[e->room].enemies--;
2549 }
2550 i++;
2551 }
2552 }
2553 e = e->next;
2554 }
2555 }
2556
2557 void SoupUpEnemies(int boss)
2558 {
2559 struct enemy *e;
2560 int str_limit;
2561 float str_multiplier;
2562 float fr_divider;
2563
2564 e = enemy_stack;
2565 str_limit = 1500;
2566 if (circuit_size > 1500) {
2567 str_limit = 1500;
2568 }
2569
2570 str_multiplier = 1.0 + (1.0/3.0)*(float)boss;
2571 fr_divider = 1.0 + (2.0/3.0)*(float)boss;
2572
2573 while (e != NULL) {
2574 if (e->delete_me == 0) {
2575 if (e->enemy_type != 10) {
2576 if (e->str < str_limit) {
2577 if ((e->str * 2) < str_limit) {
2578 e->str = e->str * str_multiplier;
2579 } else {
2580 e->str = str_limit;
2581 }
2582 }
2583 e->fire_rate = (int)((float)e->fire_rate / fr_divider) + 1;
2584 e->speed = (int)((float)e->speed / fr_divider) + 1;
2585 e->min_gems *= str_multiplier;
2586 e->max_gems *= str_multiplier;
2587 }
2588 }
2589 e = e->next;
2590 }
2591 }
2592
2593 void CurseSingleEnemy(struct enemy *e)
2594 {
2595 static int ActiveRooms[3000];
2596 static int NActiveRooms = 0;
2597 int i;
2598 int rm;
2599
2600 if (NActiveRooms == 0) {
2601 for (i = 0; i < 3000; i++) {
2602 if ((rooms[i].room_type == 0) || (rooms[i].room_type == 4)) {
2603 ActiveRooms[NActiveRooms++] = i;
2604 }
2605 }
2606 }
2607
2608 rm = ActiveRooms[rand()%NActiveRooms];
2609 while ((rooms[rm].enemies > 3) || (rooms[rm].visited == 0)) {
2610 rm = ActiveRooms[rand()%NActiveRooms];
2611 }
2612
2613 e->x = rooms[rm].w * 16 + rooms[rm].x * 32;
2614 e->y = rooms[rm].h * 16 + rooms[rm].y * 32;
2615 rooms[e->room].enemies--;
2616 e->room = rm;
2617 rooms[e->room].enemies++;
2618
2619 e->image = enemy_sprites[9];
2620 e->lives = 8;
2621 e->str = 500;
2622 e->speed = 1;
2623 e->fire_rate = (rand()%4)+1;
2624 e->min_gems = 5000;
2625 e->max_gems = 6000;
2626 e->followdepth = 12;
2627 e->creationcost = 6;
2628 e->enemy_type = 10;
2629
2630 ActivateSingleEnemy(e);
2631 }
2632
2633 void CurseEnemies()
2634 {
2635 struct enemy *e;
2636 int i = 0;
2637
2638 e = enemy_stack;
2639
2640 while (e != NULL) {
2641 if (e->delete_me == 0) {
2642 if ( (i % 5) == (4)) {
2643 CurseSingleEnemy(e);
2644 } else {
2645 e->delete_me = 1;
2646 killed_enemies++;
2647
2648 e->dying = 0;
2649 rooms[e->room].enemies--;
2650 }
2651 i++;
2652 }
2653 e = e->next;
2654 }
2655 }
An action-adventure dungeon-crawl-like game where the player’s only weapon are psi discharges.