enemytag.c

   1 #include "enemy.h"
   2 #include "gameobj.h"
   3 #include "video.h"
   4 #include <unistd.h>
   5 static struct enemy_spawn tag_enemy;
   6 static int tag_enemy_current_route;
   7 static int tag_enemy_current_shot;
   8 static int tag_enemy_id;
   9 static int tag_enemy_spawnline;
  10 static int tag_enemy_y;
  11 static int tag_enemy_upscrolled;
  12
  13 static void scrollup() {
  14         tag_enemy_upscrolled += 10;
  15         objs[player_ids[0]].pos.y -= 10*SCALE;
  16 }
  17
  18 #define STRING_ENTRY(x) [x] = #x
  19 static const char* enemy_weapon_string_lut[] = {
  20         STRING_ENTRY(EW_GUN),
  21         STRING_ENTRY(EW_GRENADE),
  22 };
  23 static const char* enemy_shape_string_lut[] = {
  24         STRING_ENTRY(ES_SOLDIER1_DOWN),
  25         STRING_ENTRY(ES_SOLDIER1_LEFT),
  26         STRING_ENTRY(ES_SOLDIER1_RIGHT),
  27         STRING_ENTRY(ES_SOLDIER2_DOWN),
  28         STRING_ENTRY(ES_SOLDIER2_LEFT),
  29         STRING_ENTRY(ES_SOLDIER2_RIGHT),
  30         STRING_ENTRY(ES_GUNTURRET_MOVABLE_MAN),
  31         STRING_ENTRY(ES_GUNTURRET_MOVABLE_MACHINE),
  32         STRING_ENTRY(ES_JEEP),
  33         STRING_ENTRY(ES_TANK_SMALL),
  34         STRING_ENTRY(ES_TANK_BIG),
  35         STRING_ENTRY(ES_TRANSPORTER),
  36         STRING_ENTRY(ES_BUNKER_1),
  37         STRING_ENTRY(ES_BUNKER_2),
  38         STRING_ENTRY(ES_BUNKER_3),
  39         STRING_ENTRY(ES_BUNKER_4),
  40         STRING_ENTRY(ES_BUNKER_5),
  41         STRING_ENTRY(ES_MINE_FLAT),
  42         STRING_ENTRY(ES_MINE_CROSS),
  43         STRING_ENTRY(ES_FLAMETURRET),
  44         STRING_ENTRY(ES_GUNTURRET_FIXED_SOUTH),
  45         STRING_ENTRY(ES_GUNTURRET_FIXED_NORTH),
  46         STRING_ENTRY(ES_BOSS),
  47         STRING_ENTRY(ES_MAX),
  48 };
  49 static const char* dir16_string_lut[] = {
  50         STRING_ENTRY(DIR16_N),
  51         STRING_ENTRY(DIR16_NNW),
  52         STRING_ENTRY(DIR16_NW),
  53         STRING_ENTRY(DIR16_WNW),
  54         STRING_ENTRY(DIR16_W),
  55         STRING_ENTRY(DIR16_WSW),
  56         STRING_ENTRY(DIR16_SW),
  57         STRING_ENTRY(DIR16_SSW),
  58         STRING_ENTRY(DIR16_S),
  59         STRING_ENTRY(DIR16_SSO),
  60         STRING_ENTRY(DIR16_SO),
  61         STRING_ENTRY(DIR16_OSO),
  62         STRING_ENTRY(DIR16_O),
  63         STRING_ENTRY(DIR16_ONO),
  64         STRING_ENTRY(DIR16_NO),
  65         STRING_ENTRY(DIR16_NNO),
  66         STRING_ENTRY(DIR16_MAX),
  67 };
  68 static void dump_enemy() {
  69 /*
  70                 .scroll_line = 1,
  71                 .weapon = EW_GUN,
  72                 .x = 100,
  73                 .y = 100,
  74                 .route = {
  75                         [3] = {
  76                                 .shape = ES_JEEP,
  77                                 .dir = DIR16_WNW,
  78                                 .start_step = 0,
  79                                 .vel = 2,
  80                         },
  81                         [4] = {
  82                                 .shape = ES_SOLDIER1_RIGHT,
  83                                 .dir = DIR16_NNW,
  84                                 .start_step = 128,
  85                                 .vel = 2,
  86                         },
  87
  88                 },
  89  */
  90 #define tprintf(tabs, args...) do { int __tabs; for(__tabs = 0; __tabs < tabs; __tabs++) printf("\t"); printf(args); } while(0)
  91         printf("XXX screen %d\n", map_spawn_screen_index);
  92         tprintf(2, ".scroll_line = %d,\n", tag_enemy_spawnline);
  93         tprintf(2, ".weapon = %s,\n", enemy_weapon_string_lut[tag_enemy.weapon]);
  94         tprintf(2, ".x = %d,\n", tag_enemy.x);
  95         tprintf(2, ".y = %d,\n", tag_enemy_y);
  96         tprintf(2, ".route = {\n");
  97         int i;
  98         for(i = 0; i < ENEMY_MAX_ROUTE && tag_enemy.route[i].shape != ES_INVALID; i++) {
  99                 tprintf(3, "[%d] = {\n", i);
 100                 tprintf(4, ".shape = %s,\n", enemy_shape_string_lut[tag_enemy.route[i].shape]);
 101                 tprintf(4, ".dir = %s,\n", dir16_string_lut[tag_enemy.route[i].dir]);
 102                 tprintf(4, ".start_step = %d,\n", tag_enemy.route[i].start_step);
 103                 tprintf(4, ".vel = %d,\n", tag_enemy.route[i].vel);
 104                 tprintf(3, "},\n");
 105         }
 106         tprintf(2, "},\n");
 107         tprintf(2, ".shots = {\n");
 108         for(i = 0; i < ENEMY_MAX_SHOT; i++)
 109                 tprintf(3, "[%d] = %d,\n", i, tag_enemy.shots[i]);
 110         tprintf(2, "},\n");
 111 }
 112
 113 static void reset_tag_enemy() {
 114         memset(&tag_enemy, 0, sizeof(tag_enemy));
 115         tag_enemy.route[0].shape = ES_SOLDIER1_DOWN;
 116 }
 117
 118 static void update_tag_enemy(int doremove) {
 119         if(doremove) remove_enemy(tag_enemy_id);
 120         tag_enemy.y = tag_enemy_y + tag_enemy_upscrolled;
 121         tag_enemy_id = init_enemy(&tag_enemy);
 122 }
 123
 124 static void toggle_shape(int shapedir) {
 125         int s = tag_enemy.route[tag_enemy_current_route].shape;
 126         s += shapedir;
 127         if(s < ES_FIRST) s = ES_MAX - 1;
 128         else if(s >= ES_MAX) s = ES_FIRST;
 129         tag_enemy.route[tag_enemy_current_route].shape = s;
 130 }
 131
 132 static void toggle_vel(int veldir) {
 133         int v = tag_enemy.route[tag_enemy_current_route].vel;
 134         v+=veldir;
 135         if(v<0) v = 0;
 136         else if(v > 255) v = 255;
 137         int i;
 138         for(i = tag_enemy_current_route; i < ENEMY_MAX_ROUTE; i++)
 139                 tag_enemy.route[i].vel = v;
 140         update_tag_enemy(1);
 141 }
 142
 143 static void toggle_route(int dir) {
 144         enum enemy_shape currshape = tag_enemy.route[tag_enemy_current_route].shape;
 145         int newroute = tag_enemy_current_route + dir;
 146         if(newroute >= ENEMY_MAX_ROUTE) newroute = 0;
 147         else if(newroute < 0) newroute = ENEMY_MAX_ROUTE -1;
 148         tag_enemy_current_route = newroute;
 149         if(tag_enemy.route[tag_enemy_current_route].shape == ES_INVALID)
 150                 tag_enemy.route[tag_enemy_current_route].shape = currshape;
 151 }
 152
 153 static void toggle_shot(int dir) {
 154         int newshot = tag_enemy_current_shot + dir;
 155         if(newshot >= ENEMY_MAX_SHOT) newshot = 0;
 156         else if(newshot < 0) newshot = ENEMY_MAX_SHOT -1;
 157         tag_enemy_current_shot = newshot;
 158 }
 159
 160 static void toggle_gun(void) {
 161         if(tag_enemy.weapon == EW_GRENADE) tag_enemy.weapon = EW_GUN;
 162         else tag_enemy.weapon = EW_GRENADE;
 163 }
 164
 165 static void insert_steps(void) {
 166         tag_enemy.route[tag_enemy_current_route].start_step = objs[tag_enemy_id].objspecific.enemy.curr_step;
 167 }
 168
 169 static void insert_shot(void) {
 170         tag_enemy.shots[tag_enemy_current_shot] = objs[tag_enemy_id].objspecific.enemy.curr_step;
 171 }
 172
 173 static int paused;
 174 static void tag_update_caption(void) {
 175         char buf [128];
 176         snprintf(buf, 128, "%s tag mode: x %d, y %d, route: %d, vel: %d, step: %d, shot: %d",
 177                  paused ? "XXXX PAUSED XXXX" : "",
 178                  (int) tag_enemy.x, (int) tag_enemy.y,
 179                  (int) tag_enemy_current_route,
 180                  (int) tag_enemy.route[tag_enemy_current_route].vel,
 181                  (int) objs[tag_enemy_id].objspecific.enemy.curr_step,
 182                  (int) tag_enemy_current_shot
 183                 );
 184         SDL_WM_SetCaption(buf, 0);
 185 }
 186
 187 static void print_dirbuf(char* dirbuf) {
 188         char buf [128];
 189         snprintf(buf, 128, "enter dir16: %s", dirbuf);
 190         SDL_WM_SetCaption(buf, 0);
 191 }
 192
 193 static void do_pause() {
 194         static int save_vel[ENEMY_MAX_ROUTE];
 195         int i;
 196         if(!paused) {
 197                 for(i = 0; i < ENEMY_MAX_ROUTE; i++) save_vel[i] = tag_enemy.route[i].vel;
 198                 for(i = 0; i < ENEMY_MAX_ROUTE; i++) tag_enemy.route[i].vel = 0;
 199         } else {
 200                 for(i = 0; i < ENEMY_MAX_ROUTE; i++) tag_enemy.route[i].vel = save_vel[i];
 201         }
 202         paused = !paused;
 203 }
 204
 205 static void enter_direction() {
 206         char dirbuf[4] = {0};
 207         char* p = dirbuf;
 208         while(1) {
 209                 SDL_Event sdl_event;
 210                 while (SDL_PollEvent(&sdl_event)) {
 211                         if(sdl_event.type == SDL_KEYUP) switch(sdl_event.key.keysym.sym) {
 212                                 #define check(dir) if(p+dir < dirbuf || p+dir>=dirbuf+4) break;
 213                                 case SDLK_w: check(1); *p++ = 'w'; break;
 214                                 case SDLK_s: check(1); *p++ = 's'; break;
 215                                 case SDLK_o: check(1); *p++ = 'o'; break;
 216                                 case SDLK_n: check(1); *p++ = 'n'; break;
 217                                 case SDLK_BACKSPACE: check(-1); *--p = 0; break;
 218                                 #undef check
 219                                 case SDLK_RETURN: goto end_loop;
 220                                 default: ;
 221                         }
 222                         print_dirbuf(dirbuf);
 223                 }
 224                 print_dirbuf(dirbuf);
 225                 SDL_Delay(5);
 226         }
 227         end_loop:;
 228         enum direction16 dir;
 229         if(0);
 230         else if (!strcmp(dirbuf,"o")) dir= DIR16_O;
 231         else if (!strcmp(dirbuf,"ono")) dir= DIR16_ONO;
 232         else if (!strcmp(dirbuf,"no")) dir= DIR16_NO;
 233         else if (!strcmp(dirbuf,"nno")) dir= DIR16_NNO;
 234         else if (!strcmp(dirbuf,"n")) dir= DIR16_N;
 235         else if (!strcmp(dirbuf,"nnw")) dir= DIR16_NNW;
 236         else if (!strcmp(dirbuf,"nw")) dir= DIR16_NW;
 237         else if (!strcmp(dirbuf,"wnw")) dir= DIR16_WNW;
 238         else if (!strcmp(dirbuf,"w")) dir= DIR16_W;
 239         else if (!strcmp(dirbuf,"wsw")) dir= DIR16_WSW;
 240         else if (!strcmp(dirbuf,"sw")) dir= DIR16_SW;
 241         else if (!strcmp(dirbuf,"ssw")) dir= DIR16_SSW;
 242         else if (!strcmp(dirbuf,"s")) dir= DIR16_S;
 243         else if (!strcmp(dirbuf,"sso")) dir= DIR16_SSO;
 244         else if (!strcmp(dirbuf,"so")) dir= DIR16_SO;
 245         else if (!strcmp(dirbuf,"oso")) dir= DIR16_OSO;
 246         else dir = DIR16_INVALID;
 247         if(dir != DIR16_INVALID) tag_enemy.route[tag_enemy_current_route].dir = dir;
 248         update_tag_enemy(1);
 249 }
 250
 251 static void enemy_tag_loop() {
 252         update_caption = tag_update_caption;
 253         tag_enemy_current_route = 0;
 254         tag_enemy_current_shot = 0;
 255         tag_enemy_spawnline = map_spawn_line;
 256         tag_enemy_y = 0;
 257         tag_enemy_upscrolled = 0;
 258         reset_tag_enemy();
 259         tag_enemy_id = init_enemy(&tag_enemy);
 260
 261         SDL_Event sdl_event;
 262         while(1) {
 263                 if(!obj_slot_used[tag_enemy_id]) update_tag_enemy(0);
 264                         //tag_enemy_id = init_enemy(&tag_enemy);
 265                 unsigned need_redraw = 1;
 266                 while (SDL_PollEvent(&sdl_event)) {
 267                         need_redraw = 0;
 268                         int dir = -1;
 269                         switch (sdl_event.type) {
 270                                 case SDL_KEYUP:
 271                                         switch(sdl_event.key.keysym.sym) {
 272                                                 case SDLK_e: dump_enemy(); return;
 273                                                 case SDLK_g: toggle_gun(); break;
 274                                                 case SDLK_d: enter_direction(); break;
 275                                                 case SDLK_i: insert_steps(); break;
 276                                                 case SDLK_s: insert_shot(); break;
 277                                                 case SDLK_p: do_pause(); break;
 278                                                 case SDLK_c: clear_screen(); video_update(); need_redraw = 1; break;
 279                                                 case SDLK_SPACE: update_tag_enemy(1); break;
 280                                                 case SDLK_PAGEUP: scrollup(); break;
 281                                                 case SDLK_KP_PLUS:
 282                                                         dir = 1;
 283                                                 case SDLK_KP_MINUS:
 284                                                         if((sdl_event.key.keysym.mod & KMOD_RSHIFT) ||
 285                                                            (sdl_event.key.keysym.mod & KMOD_LSHIFT))
 286                                                                 toggle_shape(dir);
 287                                                         else
 288                                                         if((sdl_event.key.keysym.mod & KMOD_RALT) ||
 289                                                            (sdl_event.key.keysym.mod & KMOD_LALT))
 290                                                                 toggle_route(dir);
 291                                                         else
 292                                                         if((sdl_event.key.keysym.mod & KMOD_RCTRL) ||
 293                                                            (sdl_event.key.keysym.mod & KMOD_LCTRL))
 294                                                                 toggle_shot(dir);
 295                                                         else
 296                                                                 toggle_vel(dir);
 297                                                         break;
 298                                                 default: break;
 299                                         }
 300                                 case SDL_KEYDOWN:
 301                                         switch(sdl_event.key.keysym.sym) {
 302                                                 case SDLK_RIGHT: dir = 1;
 303                                                 case SDLK_LEFT:
 304                                                         if((sdl_event.key.keysym.mod & KMOD_RSHIFT) ||
 305                                                            (sdl_event.key.keysym.mod & KMOD_LSHIFT)) dir *= 4;
 306                                                         tag_enemy.x += dir;
 307                                                         update_tag_enemy(1);
 308                                                         break;
 309                                                 case SDLK_DOWN:
 310                                                         dir = 1;
 311                                                 case SDLK_UP:
 312                                                         if((sdl_event.key.keysym.mod & KMOD_RSHIFT) ||
 313                                                            (sdl_event.key.keysym.mod & KMOD_LSHIFT)) dir *= 4;
 314                                                         tag_enemy_y += dir;
 315                                                         update_tag_enemy(1);
 316                                                         break;
 317                                                 default: ;
 318                                         }
 319                                 break;
 320                                 default: ;
 321                         }
 322                 }
 323                 game_tick(need_redraw);
 324         }
 325 }