main/automap.c

   1 /* $Id: automap.c,v 1.15 2003-11-14 23:31:16 btb Exp $ */
   2 /*
   3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  13 */
  14
  15 /*
  16  *
  17  * Routines for displaying the auto-map.
  18  *
  19  * Old Log:
  20  * Revision 1.8  1995/10/31  10:24:54  allender
  21  * shareware stuff
  22  *
  23  * Revision 1.7  1995/10/21  16:18:20  allender
  24  * blit pcx background directly to Page canvas instead of creating
  25  * seperate bitmap for it -- hope to solve VM bug on some macs
  26  *
  27  * Revision 1.6  1995/10/20  00:49:16  allender
  28  * added redbook check during automap
  29  *
  30  * Revision 1.5  1995/09/13  08:44:07  allender
  31  * Dave Denhart's changes to speed up the automap
  32  *
  33  * Revision 1.4  1995/08/18  15:46:00  allender
  34  * put text all on upper bar -- and fixed background since
  35  * changing xparency color
  36  *
  37  * Revision 1.3  1995/08/03  15:15:18  allender
  38  * fixed edge hashing problem causing automap to crash
  39  *
  40  * Revision 1.2  1995/07/12  12:49:27  allender
  41  * works in 640x480 mode
  42  *
  43  * Revision 1.1  1995/05/16  15:22:59  allender
  44  * Initial revision
  45  *
  46  * Revision 2.2  1995/03/21  14:41:26  john
  47  * Ifdef'd out the NETWORK code.
  48  *
  49  * Revision 2.1  1995/03/20  18:16:06  john
  50  * Added code to not store the normals in the segment structure.
  51  *
  52  * Revision 2.0  1995/02/27  11:32:55  john
  53  * New version 2.0, which has no anonymous unions, builds with
  54  * Watcom 10.0, and doesn't require parsing BITMAPS.TBL.
  55  *
  56  * Revision 1.117  1995/02/22  14:11:31  allender
  57  * remove anonymous unions from object structure
  58  *
  59  * Revision 1.116  1995/02/22  13:24:39  john
  60  * Removed the vecmat anonymous unions.
  61  *
  62  * Revision 1.115  1995/02/09  14:57:02  john
  63  * Reduced mem usage. Made automap slide farther.
  64  *
  65  * Revision 1.114  1995/02/07  20:40:44  rob
  66  * Allow for anarchy automap of player pos by option.
  67  *
  68  * Revision 1.113  1995/02/07  15:45:33  john
  69  * Made automap memory be static.
  70  *
  71  * Revision 1.112  1995/02/02  12:24:00  adam
  72  * played with automap labels
  73  *
  74  * Revision 1.111  1995/02/02  01:52:52  john
  75  * Made the automap use small font.
  76  *
  77  * Revision 1.110  1995/02/02  01:34:34  john
  78  * Made Reset in automap not change segmentlimit.
  79  *
  80  * Revision 1.109  1995/02/02  01:23:11  john
  81  * Finalized the new automap partial viewer.
  82  *
  83  * Revision 1.108  1995/02/02  00:49:45  mike
  84  * new automap segment-depth functionality.
  85  *
  86  * Revision 1.107  1995/02/02  00:23:04  john
  87  * Half of the code for new connected distance stuff in automap.
  88  *
  89  * Revision 1.106  1995/02/01  22:54:00  john
  90  * Made colored doors not fade in automap. Made default
  91  * viewing area be maxxed.
  92  *
  93  * Revision 1.105  1995/02/01  13:16:13  john
  94  * Added great grates.
  95  *
  96  * Revision 1.104  1995/01/31  12:47:06  john
  97  * Made Alt+F only work with cheats enabled.
  98  *
  99  * Revision 1.103  1995/01/31  12:41:23  john
 100  * Working with new controls.
 101  *
 102  * Revision 1.102  1995/01/31  12:04:19  john
 103  * Version 2 of new key control.
 104  *
 105  * Revision 1.101  1995/01/31  11:32:00  john
 106  * First version of new automap system.
 107  *
 108  * Revision 1.100  1995/01/28  16:55:48  john
 109  * Made keys draw in automap in the segments that you have
 110  * visited.
 111  *
 112  * Revision 1.99  1995/01/28  14:44:51  john
 113  * Made hostage doors show up on automap.
 114  *
 115  * Revision 1.98  1995/01/22  17:03:49  rob
 116  * Fixed problem drawing playerships in automap coop/team mode
 117  *
 118  * Revision 1.97  1995/01/21  17:23:11  john
 119  * Limited S movement in map. Made map bitmap load from disk
 120  * and then freed it.
 121  *
 122  * Revision 1.96  1995/01/19  18:55:38  john
 123  * Don't draw players in automap if not obj_player.
 124  *
 125  * Revision 1.95  1995/01/19  18:48:13  john
 126  * Made player colors better in automap.
 127  *
 128  * Revision 1.94  1995/01/19  17:34:52  rob
 129  * Added team colorizations in automap.
 130  *
 131  * Revision 1.93  1995/01/19  17:15:36  rob
 132  * Trying to add player ships into map for coop and team mode.
 133  *
 134  * Revision 1.92  1995/01/19  17:11:09  john
 135  * Added code for Rob to draw Multiplayer ships in automap.
 136  *
 137  * Revision 1.91  1995/01/12  13:35:20  john
 138  * Fixed bug with Segment 0 not getting displayed
 139  * in automap if you have EDITOR compiled in.
 140  *
 141  * Revision 1.90  1995/01/08  16:17:14  john
 142  * Added code to draw player's up vector while in automap.
 143  *
 144  * Revision 1.89  1995/01/08  16:09:41  john
 145  * Fixed problems with grate.
 146  *
 147  * Revision 1.88  1994/12/14  22:54:17  john
 148  * Fixed bug that didn't show hostages in automap.
 149  *
 150  * Revision 1.87  1994/12/09  00:41:03  mike
 151  * fix hang in automap print screen
 152  *
 153  * Revision 1.86  1994/12/05  23:37:15  matt
 154  * Took out calls to warning() function
 155  *
 156  * Revision 1.85  1994/12/03  22:35:28  yuan
 157  * Localization 412
 158  *
 159  * Revision 1.84  1994/12/02  15:05:45  matt
 160  * Added new "official" cheats
 161  *
 162  * Revision 1.83  1994/11/30  12:10:49  adam
 163  * added support for PCX titles/brief screens
 164  *
 165  * Revision 1.82  1994/11/27  23:15:12  matt
 166  * Made changes for new mprintf calling convention
 167  *
 168  * Revision 1.81  1994/11/27  15:35:52  matt
 169  * Enable screen shots even when debugging is turned off
 170  *
 171  * Revision 1.80  1994/11/26  22:51:43  matt
 172  * Removed editor-only fields from segment structure when editor is compiled
 173  * out, and padded segment structure to even multiple of 4 bytes.
 174  *
 175  * Revision 1.79  1994/11/26  16:22:48  matt
 176  * Reduced leave_time
 177  *
 178  * Revision 1.78  1994/11/23  22:00:10  mike
 179  * show level number.
 180  *
 181  * Revision 1.77  1994/11/21  11:40:33  rob
 182  * Tweaked the game-loop for automap in multiplayer games.
 183  *
 184  * Revision 1.76  1994/11/18  16:42:06  adam
 185  * removed a font
 186  *
 187  * Revision 1.75  1994/11/17  13:06:48  adam
 188  * changed font
 189  *
 190  * Revision 1.74  1994/11/14  20:47:17  john
 191  * Attempted to strip out all the code in the game
 192  * directory that uses any ui code.
 193  *
 194  */
 195
 196 #ifdef HAVE_CONFIG_H
 197 #include <conf.h>
 198 #endif
 199
 200 #include <stdio.h>
 201 #include <stdlib.h>
 202 #include <string.h>
 203
 204 #ifdef OGL
 205 #include "ogl_init.h"
 206 #endif
 207
 208 #include "pa_enabl.h"                   //$$POLY_ACC
 209 #include "error.h"
 210 #include "3d.h"
 211 #include "inferno.h"
 212 #include "u_mem.h"
 213 #include "render.h"
 214 #include "object.h"
 215 #include "vclip.h"
 216 #include "game.h"
 217 #include "mono.h"
 218 #include "polyobj.h"
 219 #include "sounds.h"
 220 #include "player.h"
 221 #include "bm.h"
 222 #include "key.h"
 223 #include "newmenu.h"
 224 #include "menu.h"
 225 #include "screens.h"
 226 #include "textures.h"
 227 #include "mouse.h"
 228 #include "timer.h"
 229 #include "segpoint.h"
 230 #include "joy.h"
 231 #include "iff.h"
 232 #include "pcx.h"
 233 #include "palette.h"
 234 #include "wall.h"
 235 #include "gameseq.h"
 236 #include "gamefont.h"
 237 #ifdef NETWORK
 238 #include "network.h"
 239 #endif
 240 #include "kconfig.h"
 241 #ifdef NETWORK
 242 #include "multi.h"
 243 #endif
 244 #include "endlevel.h"
 245 #include "text.h"
 246 #include "gauges.h"
 247 #include "songs.h"
 248 #include "powerup.h"
 249 #include "switch.h"
 250 #include "automap.h"
 251 #include "cntrlcen.h"
 252
 253 #if defined(POLY_ACC)
 254 #include "poly_acc.h"
 255 #endif
 256
 257 #ifdef OGL
 258 #define AUTOMAP_DIRECT_RENDER
 259 #endif
 260
 261 #define EF_USED     1   // This edge is used
 262 #define EF_DEFINING 2   // A structure defining edge that should always draw.
 263 #define EF_FRONTIER 4   // An edge between the known and the unknown.
 264 #define EF_SECRET   8   // An edge that is part of a secret wall.
 265 #define EF_GRATE    16  // A grate... draw it all the time.
 266 #define EF_NO_FADE  32  // An edge that doesn't fade with distance
 267 #define EF_TOO_FAR  64  // An edge that is too far away
 268
 269 void modex_printf(int x,int y,char *s,grs_font *font,int color);
 270
 271 typedef struct Edge_info {
 272         short verts[2];     // 4 bytes
 273         ubyte sides[4];     // 4 bytes
 274         short segnum[4];    // 8 bytes  // This might not need to be stored... If you can access the normals of a side.
 275         ubyte flags;        // 1 bytes  // See the EF_??? defines above.
 276         ubyte color;        // 1 bytes
 277         ubyte num_faces;    // 1 bytes  // 19 bytes...
 278 } Edge_info;
 279
 280 // OLD BUT GOOD -- #define MAX_EDGES_FROM_VERTS(v)   ((v*5)/2)
 281 // THE following was determined by John by loading levels 1-14 and recording
 282 // numbers on 10/26/94.
 283 //#define MAX_EDGES_FROM_VERTS(v)   (((v)*21)/10)
 284 #define MAX_EDGES_FROM_VERTS(v)     ((v)*4)
 285 //#define MAX_EDGES (MAX_EDGES_FROM_VERTS(MAX_VERTICES))
 286
 287 #define MAX_EDGES 6000  // Determined by loading all the levels by John & Mike, Feb 9, 1995
 288
 289 #define K_WALL_NORMAL_COLOR     BM_XRGB(29, 29, 29 )
 290 #define K_WALL_DOOR_COLOR       BM_XRGB(5, 27, 5 )
 291 #define K_WALL_DOOR_BLUE        BM_XRGB(0, 0, 31)
 292 #define K_WALL_DOOR_GOLD        BM_XRGB(31, 31, 0)
 293 #define K_WALL_DOOR_RED         BM_XRGB(31, 0, 0)
 294 #define K_WALL_REVEALED_COLOR   BM_XRGB(0, 0, 25 ) //what you see when you have the full map powerup
 295 #define K_HOSTAGE_COLOR         BM_XRGB(0, 31, 0 )
 296 #define K_FONT_COLOR_20         BM_XRGB(20, 20, 20 )
 297 #define K_GREEN_31              BM_XRGB(0, 31, 0)
 298
 299 int Wall_normal_color;
 300 int Wall_door_color;
 301 int Wall_door_blue;
 302 int Wall_door_gold;
 303 int Wall_door_red;
 304 int Wall_revealed_color;
 305 int Hostage_color;
 306 int Font_color_20;
 307 int Green_31;
 308 int White_63;
 309 int Blue_48;
 310 int Red_48;
 311
 312 void init_automap_colors(void)
 313 {
 314         Wall_normal_color = K_WALL_NORMAL_COLOR;
 315         Wall_door_color = K_WALL_DOOR_COLOR;
 316         Wall_door_blue = K_WALL_DOOR_BLUE;
 317         Wall_door_gold = K_WALL_DOOR_GOLD;
 318         Wall_door_red = K_WALL_DOOR_RED;
 319         Wall_revealed_color = K_WALL_REVEALED_COLOR;
 320         Hostage_color = K_HOSTAGE_COLOR;
 321         Font_color_20 = K_FONT_COLOR_20;
 322         Green_31 = K_GREEN_31;
 323
 324         White_63 = gr_find_closest_color_current(63,63,63);
 325         Blue_48 = gr_find_closest_color_current(0,0,48);
 326         Red_48 = gr_find_closest_color_current(48,0,0);
 327 }
 328
 329 // Segment visited list
 330 ubyte Automap_visited[MAX_SEGMENTS];
 331
 332 // Edge list variables
 333 static int Num_edges=0;
 334 static int Max_edges;           //set each frame
 335 static int Highest_edge_index = -1;
 336 static Edge_info Edges[MAX_EDGES];
 337 static short DrawingListBright[MAX_EDGES];
 338
 339 //static short DrawingListBright[MAX_EDGES];
 340 //static short Edge_used_list[MAX_EDGES];                               //which entries in edge_list have been used
 341
 342 // Map movement defines
 343 #define PITCH_DEFAULT 9000
 344 #define ZOOM_DEFAULT i2f(20*10)
 345 #define ZOOM_MIN_VALUE i2f(20*5)
 346 #define ZOOM_MAX_VALUE i2f(20*100)
 347
 348 #define SLIDE_SPEED                             (350)
 349 #define ZOOM_SPEED_FACTOR               500     //(1500)
 350 #define ROT_SPEED_DIVISOR               (115000)
 351
 352 #ifndef AUTOMAP_DIRECT_RENDER
 353 // Screen anvas variables
 354 static int current_page=0;
 355 #ifdef WINDOWS
 356 static dd_grs_canvas ddPages[2];
 357 static dd_grs_canvas ddDrawingPages[2];
 358
 359 #define ddPage ddPages[0]
 360 #define ddDrawingPage ddDrawingPages[0]
 361
 362 #endif
 363
 364 #if defined(MACINTOSH) && defined(POLY_ACC)
 365         grs_canvas Pages[2];                    // non static under rave so the backbuffer callback function can get at them
 366         grs_canvas DrawingPages[2];             // non static under rave so the backbuffer callback function can get at them
 367 #else
 368         static grs_canvas Pages[2];
 369         static grs_canvas DrawingPages[2];
 370 #endif
 371 #endif /* AUTOMAP_DIRECT_RENDER */
 372
 373 #define Page Pages[0]
 374 #define DrawingPage DrawingPages[0]
 375
 376 // Flags
 377 static int Automap_cheat = 0;           // If set, show everything
 378
 379 // Rendering variables
 380 static fix Automap_zoom = 0x9000;
 381 static vms_vector view_target;
 382 static fix Automap_farthest_dist = (F1_0 * 20 * 50);            // 50 segments away
 383 static vms_matrix       ViewMatrix;
 384 static fix ViewDist=0;
 385
 386 //      Function Prototypes
 387 void adjust_segment_limit(int SegmentLimit);
 388 void draw_all_edges(void);
 389 void automap_build_edge_list(void);
 390
 391 #define MAX_DROP_MULTI          2
 392 #define MAX_DROP_SINGLE 9
 393
 394 vms_vector MarkerPoint[NUM_MARKERS];            //these are only used in multi.c, and I'd get rid of them there, but when I tried to do that once, I caused some horrible bug. -MT
 395 int HighlightMarker=-1;
 396 char MarkerMessage[NUM_MARKERS][MARKER_MESSAGE_LEN];
 397 char MarkerOwner[NUM_MARKERS][CALLSIGN_LEN+1];
 398 float MarkerScale=2.0;
 399 int     MarkerObject[NUM_MARKERS];
 400
 401 extern vms_vector Matrix_scale;         //how the matrix is currently scaled
 402
 403
 404 #if defined(MACINTOSH) && defined(POLY_ACC)
 405 // icky hack.  automap draw context is no longer valid when this is called.
 406 // so we can not use the pa_draw_line function for rave
 407 bool automap_draw_line(g3s_point *p0, g3s_point *p1)
 408 {
 409         int savePAEnabledState = PAEnabled;
 410
 411         PAEnabled = 0;
 412         g3_draw_line(&FromPoint, &ToPoint);
 413         PAEnabled = savePAEnabledState;
 414 }
 415 #else
 416 # define automap_draw_line g3_draw_line
 417 #endif
 418
 419
 420 // -------------------------------------------------------------
 421
 422 void DrawMarkerNumber (int num)
 423  {
 424   int i;
 425   g3s_point BasePoint,FromPoint,ToPoint;
 426
 427   float ArrayX[10][20]={ {-.25, 0.0, 0.0, 0.0, -1.0, 1.0},
 428                          {-1.0, 1.0, 1.0, 1.0, -1.0, 1.0, -1.0, -1.0, -1.0, 1.0},
 429                          {-1.0, 1.0, 1.0, 1.0, -1.0, 1.0, 0.0, 1.0},
 430                          {-1.0, -1.0, -1.0, 1.0, 1.0, 1.0},
 431                          {-1.0, 1.0, -1.0, -1.0, -1.0, 1.0, 1.0, 1.0, -1.0, 1.0},
 432                          {-1.0, 1.0, -1.0, -1.0, -1.0, 1.0, 1.0, 1.0, -1.0, 1.0},
 433                          {-1.0, 1.0, 1.0, 1.0},
 434                          {-1.0, 1.0, 1.0, 1.0, -1.0, 1.0, -1.0, -1.0, -1.0, 1.0},
 435                          {-1.0, 1.0, 1.0, 1.0, -1.0, 1.0, -1.0, -1.0}
 436
 437                        };
 438   float ArrayY[10][20]={ {.75, 1.0, 1.0, -1.0, -1.0, -1.0},
 439                          {1.0, 1.0, 1.0, 0.0, 0.0, 0.0, 0.0, -1.0, -1.0, -1.0},
 440                          {1.0, 1.0, 1.0, -1.0, -1.0, -1.0, 0.0, 0.0},
 441                          {1.0, 0.0, 0.0, 0.0, 1.0, -1.0},
 442                          {1.0, 1.0, 1.0, 0.0, 0.0, 0.0, 0.0, -1.0, -1.0, -1.0},
 443                          {1.0, 1.0, 1.0, -1.0, -1.0, -1.0, -1.0, 0.0, 0.0, 0.0},
 444                          {1.0, 1.0, 1.0, -1.0},
 445                          {1.0, 1.0, 1.0, -1.0, -1.0, -1.0, -1.0, 1.0, 0.0, 0.0},
 446                          {1.0, 1.0, 1.0, -1.0, 0.0, 0.0, 0.0, 1.0}
 447                        };
 448   int NumOfPoints[]={6,10,8,6,10,10,4,10,8};
 449
 450   for (i=0;i<NumOfPoints[num];i++)
 451    {
 452     ArrayX[num][i]*=MarkerScale;
 453     ArrayY[num][i]*=MarkerScale;
 454    }
 455
 456   if (num==HighlightMarker)
 457    gr_setcolor (White_63);
 458   else
 459    gr_setcolor (Blue_48);
 460
 461
 462   g3_rotate_point(&BasePoint,&Objects[MarkerObject[(Player_num*2)+num]].pos);
 463
 464   for (i=0;i<NumOfPoints[num];i+=2)
 465    {
 466
 467     FromPoint=BasePoint;
 468     ToPoint=BasePoint;
 469
 470     FromPoint.p3_x+=fixmul ((fl2f (ArrayX[num][i])),Matrix_scale.x);
 471     FromPoint.p3_y+=fixmul ((fl2f (ArrayY[num][i])),Matrix_scale.y);
 472     g3_code_point (&FromPoint);
 473     g3_project_point (&FromPoint);
 474
 475     ToPoint.p3_x+=fixmul ((fl2f (ArrayX[num][i+1])),Matrix_scale.x);
 476     ToPoint.p3_y+=fixmul ((fl2f (ArrayY[num][i+1])),Matrix_scale.y);
 477     g3_code_point (&ToPoint);
 478     g3_project_point (&ToPoint);
 479
 480         automap_draw_line(&FromPoint, &ToPoint);
 481    }
 482  }
 483
 484 void DropMarker (int player_marker_num)
 485 {
 486         int marker_num = (Player_num*2)+player_marker_num;
 487         object *playerp = &Objects[Players[Player_num].objnum];
 488
 489         MarkerPoint[marker_num] = playerp->pos;
 490
 491         if (MarkerObject[marker_num] != -1)
 492                 obj_delete(MarkerObject[marker_num]);
 493
 494         MarkerObject[marker_num] = drop_marker_object(&playerp->pos,playerp->segnum,&playerp->orient,marker_num);
 495
 496 #ifdef NETWORK
 497         if (Game_mode & GM_MULTI)
 498                 multi_send_drop_marker (Player_num,playerp->pos,player_marker_num,MarkerMessage[marker_num]);
 499 #endif
 500
 501 }
 502
 503 extern char guidebot_name[];
 504
 505 void DropBuddyMarker(object *objp)
 506 {
 507         int     marker_num;
 508
 509         //      Find spare marker slot.  "if" code below should be an assert, but what if someone changes NUM_MARKERS or MAX_CROP_SINGLE and it never gets hit?
 510         marker_num = MAX_DROP_SINGLE+1;
 511         if (marker_num > NUM_MARKERS-1)
 512                 marker_num = NUM_MARKERS-1;
 513
 514    sprintf(MarkerMessage[marker_num], "RIP: %s",guidebot_name);
 515
 516         MarkerPoint[marker_num] = objp->pos;
 517
 518         if (MarkerObject[marker_num] != -1 && MarkerObject[marker_num] !=0)
 519                 obj_delete(MarkerObject[marker_num]);
 520
 521         MarkerObject[marker_num] = drop_marker_object(&objp->pos, objp->segnum, &objp->orient, marker_num);
 522
 523 }
 524
 525 #define MARKER_SPHERE_SIZE 0x58000
 526
 527 void DrawMarkers ()
 528  {
 529         int i,maxdrop;
 530         static int cyc=10,cycdir=1;
 531         g3s_point sphere_point;
 532
 533         if (Game_mode & GM_MULTI)
 534         maxdrop=2;
 535         else
 536         maxdrop=9;
 537
 538         for (i=0;i<maxdrop;i++)
 539                 if (MarkerObject[(Player_num*2)+i] != -1) {
 540
 541                         g3_rotate_point(&sphere_point,&Objects[MarkerObject[(Player_num*2)+i]].pos);
 542
 543                         gr_setcolor (gr_find_closest_color_current(cyc,0,0));
 544                         g3_draw_sphere(&sphere_point,MARKER_SPHERE_SIZE);
 545                         gr_setcolor (gr_find_closest_color_current(cyc+10,0,0));
 546                         g3_draw_sphere(&sphere_point,MARKER_SPHERE_SIZE/2);
 547                         gr_setcolor (gr_find_closest_color_current(cyc+20,0,0));
 548                         g3_draw_sphere(&sphere_point,MARKER_SPHERE_SIZE/4);
 549
 550                         DrawMarkerNumber (i);
 551                 }
 552
 553         if (cycdir)
 554                 cyc+=2;
 555         else
 556                 cyc-=2;
 557
 558         if (cyc>43)
 559          {
 560                 cyc=43;
 561                 cycdir=0;
 562          }
 563         else if (cyc<10)
 564          {
 565                 cyc=10;
 566                 cycdir=1;
 567          }
 568
 569  }
 570
 571 void ClearMarkers()
 572  {
 573         int i;
 574
 575         for (i=0;i<NUM_MARKERS;i++) {
 576                 MarkerMessage[i][0]=0;
 577                 MarkerObject[i]=-1;
 578         }
 579  }
 580
 581 void automap_clear_visited()
 582 {
 583         int i;
 584         for (i=0; i<MAX_SEGMENTS; i++ )
 585                 Automap_visited[i] = 0;
 586                           ClearMarkers();
 587 }
 588
 589 grs_canvas *name_canv_left,*name_canv_right;
 590
 591 void draw_player( object * obj )
 592 {
 593         vms_vector arrow_pos, head_pos;
 594         g3s_point sphere_point, arrow_point, head_point;
 595
 596         // Draw Console player -- shaped like a ellipse with an arrow.
 597         g3_rotate_point(&sphere_point,&obj->pos);
 598         g3_draw_sphere(&sphere_point,obj->size);
 599
 600         // Draw shaft of arrow
 601         vm_vec_scale_add( &arrow_pos, &obj->pos, &obj->orient.fvec, obj->size*3 );
 602         g3_rotate_point(&arrow_point,&arrow_pos);
 603         automap_draw_line(&sphere_point, &arrow_point);
 604
 605         // Draw right head of arrow
 606         vm_vec_scale_add( &head_pos, &obj->pos, &obj->orient.fvec, obj->size*2 );
 607         vm_vec_scale_add2( &head_pos, &obj->orient.rvec, obj->size*1 );
 608         g3_rotate_point(&head_point,&head_pos);
 609         automap_draw_line(&arrow_point, &head_point);
 610
 611         // Draw left head of arrow
 612         vm_vec_scale_add( &head_pos, &obj->pos, &obj->orient.fvec, obj->size*2 );
 613         vm_vec_scale_add2( &head_pos, &obj->orient.rvec, obj->size*(-1) );
 614         g3_rotate_point(&head_point,&head_pos);
 615         automap_draw_line(&arrow_point, &head_point);
 616
 617         // Draw player's up vector
 618         vm_vec_scale_add( &arrow_pos, &obj->pos, &obj->orient.uvec, obj->size*2 );
 619         g3_rotate_point(&arrow_point,&arrow_pos);
 620         automap_draw_line(&sphere_point, &arrow_point);
 621 }
 622
 623 int AutomapHires;
 624 #if defined(MACINTOSH) && defined(POLY_ACC)
 625
 626         void pa_mac_draw_automap_extras(void)
 627         {
 628                 int i;
 629                 int color;
 630                 object * objp;
 631                 g3s_point sphere_point;
 632
 633                 AutomapHires = 1;       // always on the mac
 634
 635                 // Draw player...
 636                 #ifdef NETWORK
 637                         if (Game_mode & GM_TEAM)
 638                                 color = get_team(Player_num);
 639                         else
 640                 #endif
 641                         color = Player_num;     // Note link to above if!
 642
 643                 gr_setcolor(gr_getcolor(player_rgb[color].r,player_rgb[color].g,player_rgb[color].b));
 644                 draw_player(&Objects[Players[Player_num].objnum]);
 645
 646                 DrawMarkers();
 647
 648                 if (HighlightMarker>-1 && MarkerMessage[HighlightMarker][0]!=0)
 649                  {
 650                         char msg[10+MARKER_MESSAGE_LEN+1];
 651
 652                         sprintf(msg,"Marker %d: %s",HighlightMarker+1,MarkerMessage[(Player_num*2)+HighlightMarker]);
 653
 654                         gr_setcolor (Red_48);
 655
 656                         modex_printf(5,20,msg,SMALL_FONT,Font_color_20);
 657                  }
 658
 659                 // Draw player(s)...
 660                 #ifdef NETWORK
 661                         if ( (Game_mode & (GM_TEAM | GM_MULTI_COOP)) || (Netgame.game_flags & NETGAME_FLAG_SHOW_MAP) )
 662                         {
 663                                 for (i=0; i<N_players; i++)
 664                                 {
 665                                         if ((i != Player_num) &&
 666                                                 ((Game_mode & GM_MULTI_COOP) || (get_team(Player_num) == get_team(i)) || (Netgame.game_flags & NETGAME_FLAG_SHOW_MAP)) )
 667                                         {
 668                                                 if ( Objects[Players[i].objnum].type == OBJ_PLAYER )
 669                                                 {
 670                                                         if (Game_mode & GM_TEAM)
 671                                                                 color = get_team(i);
 672                                                         else
 673                                                                 color = i;
 674                                                         gr_setcolor(gr_getcolor(player_rgb[color].r,player_rgb[color].g,player_rgb[color].b));
 675                                                         draw_player(&Objects[Players[i].objnum]);
 676                                                 }
 677                                         }
 678                                 }
 679                         }
 680                 #endif
 681
 682                 objp = &Objects[0];
 683                 for (i=0;i<=Highest_object_index;i++,objp++)
 684                 {
 685                         switch( objp->type )
 686                         {
 687                                 case OBJ_HOSTAGE:
 688                                         gr_setcolor(Hostage_color);
 689                                         g3_rotate_point(&sphere_point,&objp->pos);
 690                                         g3_draw_sphere(&sphere_point,objp->size);
 691                                         break;
 692                                 case OBJ_POWERUP:
 693                                         if ( Automap_visited[objp->segnum] )
 694                                         {
 695                                                 if ( (objp->id==POW_KEY_RED) || (objp->id==POW_KEY_BLUE) || (objp->id==POW_KEY_GOLD) )
 696                                                 {
 697                                                         switch (objp->id)
 698                                                         {
 699                                                                 case POW_KEY_RED:       gr_setcolor(gr_getcolor(63, 5, 5));     break;
 700                                                                 case POW_KEY_BLUE:      gr_setcolor(gr_getcolor(5, 5, 63)); break;
 701                                                                 case POW_KEY_GOLD:      gr_setcolor(gr_getcolor(63, 63, 10)); break;
 702                                                                 default:
 703                                                                         Error("Illegal key type: %i", objp->id);
 704                                                         }
 705                                                         g3_rotate_point(&sphere_point,&objp->pos);
 706                                                         g3_draw_sphere(&sphere_point,objp->size*4);
 707                                                 }
 708                                         }
 709                                         break;
 710                         }
 711                 }
 712
 713                 gr_bitmapm(AutomapHires?10:5, AutomapHires?10:5, &name_canv_left->cv_bitmap);
 714                 gr_bitmapm(grd_curcanv->cv_bitmap.bm_w-(AutomapHires?10:5)-name_canv_right->cv_bitmap.bm_w,AutomapHires?10:5,&name_canv_right->cv_bitmap);
 715         }
 716
 717         void pa_mac_draw_automap(void)
 718         {
 719                 vms_vector viewer_position;
 720
 721                 g3_start_frame();
 722                 render_start_frame();
 723                 pa_set_context(kAutoMapDrawContextID, NULL);
 724                 pa_render_start();
 725
 726                         vm_vec_scale_add(&viewer_position,&view_target,&ViewMatrix.fvec,-ViewDist );
 727                         g3_set_view_matrix(&viewer_position,&ViewMatrix,Automap_zoom);
 728
 729                         draw_all_edges();
 730
 731                 g3_end_frame();
 732                 pa_render_end();
 733         }
 734 #endif
 735
 736 void draw_automap()
 737 {
 738         int i;
 739         int color;
 740         object * objp;
 741         vms_vector viewer_position;
 742         g3s_point sphere_point;
 743
 744         #ifdef MACINTOSH
 745                 #ifdef POLY_ACC
 746                         if (PAEnabled)
 747                         {
 748                                 pa_mac_draw_automap();
 749                                 return;
 750                         }
 751                 #endif
 752         #endif
 753
 754 #ifndef AUTOMAP_DIRECT_RENDER
 755         if (!AutomapHires) {
 756                 WIN(mprintf((1, "Can't do lores automap in Windows!\n")));
 757                 WIN(Int3());
 758                 current_page ^= 1;
 759                 gr_set_current_canvas(&DrawingPages[current_page]);
 760         }
 761         else {
 762                 WINDOS(
 763                         dd_gr_set_current_canvas(&ddDrawingPage),
 764                         gr_set_current_canvas(&DrawingPage)
 765                 );
 766         }
 767 #endif
 768
 769 #if defined(POLY_ACC)
 770     pa_flush();
 771 #endif
 772
 773         WINDOS(
 774                 dd_gr_clear_canvas(BM_XRGB(0,0,0)),
 775                 gr_clear_canvas(BM_XRGB(0,0,0))
 776         );
 777
 778 WIN(DDGRLOCK(dd_grd_curcanv));
 779 {
 780         g3_start_frame();
 781         render_start_frame();
 782
 783         vm_vec_scale_add(&viewer_position,&view_target,&ViewMatrix.fvec,-ViewDist );
 784
 785         g3_set_view_matrix(&viewer_position,&ViewMatrix,Automap_zoom);
 786
 787 //      mprintf((0, "dd_grd_curcanv->canvas.cv_bitmap.bm_data= %x\n", dd_grd_curcanv->canvas.cv_bitmap.bm_data));
 788 //      mprintf((0, "grd_curcanv->cv_bitmap.bm_data= %x\n", grd_curcanv->cv_bitmap.bm_data));
 789
 790         draw_all_edges();
 791
 792         // Draw player...
 793 #ifdef NETWORK
 794         if (Game_mode & GM_TEAM)
 795                 color = get_team(Player_num);
 796         else
 797 #endif
 798                 color = Player_num;     // Note link to above if!
 799
 800         gr_setcolor(gr_getcolor(player_rgb[color].r,player_rgb[color].g,player_rgb[color].b));
 801         draw_player(&Objects[Players[Player_num].objnum]);
 802
 803         DrawMarkers();
 804
 805         if (HighlightMarker>-1 && MarkerMessage[HighlightMarker][0]!=0)
 806          {
 807                 char msg[10+MARKER_MESSAGE_LEN+1];
 808
 809                 sprintf(msg,"Marker %d: %s",HighlightMarker+1,MarkerMessage[(Player_num*2)+HighlightMarker]);
 810
 811                 gr_setcolor (Red_48);
 812
 813                 modex_printf(5,20,msg,SMALL_FONT,Font_color_20);
 814          }
 815
 816         // Draw player(s)...
 817 #ifdef NETWORK
 818         if ( (Game_mode & (GM_TEAM | GM_MULTI_COOP)) || (Netgame.game_flags & NETGAME_FLAG_SHOW_MAP) )  {
 819                 for (i=0; i<N_players; i++)             {
 820                         if ( (i != Player_num) && ((Game_mode & GM_MULTI_COOP) || (get_team(Player_num) == get_team(i)) || (Netgame.game_flags & NETGAME_FLAG_SHOW_MAP)) )      {
 821                                 if ( Objects[Players[i].objnum].type == OBJ_PLAYER )    {
 822                                         if (Game_mode & GM_TEAM)
 823                                                 color = get_team(i);
 824                                         else
 825                                                 color = i;
 826                                         gr_setcolor(gr_getcolor(player_rgb[color].r,player_rgb[color].g,player_rgb[color].b));
 827                                         draw_player(&Objects[Players[i].objnum]);
 828                                 }
 829                         }
 830                 }
 831         }
 832 #endif
 833
 834         objp = &Objects[0];
 835         for (i=0;i<=Highest_object_index;i++,objp++) {
 836                 switch( objp->type )    {
 837                 case OBJ_HOSTAGE:
 838                         gr_setcolor(Hostage_color);
 839                         g3_rotate_point(&sphere_point,&objp->pos);
 840                         g3_draw_sphere(&sphere_point,objp->size);
 841                         break;
 842                 case OBJ_POWERUP:
 843                         if ( Automap_visited[objp->segnum] )    {
 844                                 if ( (objp->id==POW_KEY_RED) || (objp->id==POW_KEY_BLUE) || (objp->id==POW_KEY_GOLD) )  {
 845                                         switch (objp->id) {
 846                                         case POW_KEY_RED:               gr_setcolor(gr_getcolor(63, 5, 5));     break;
 847                                         case POW_KEY_BLUE:      gr_setcolor(gr_getcolor(5, 5, 63)); break;
 848                                         case POW_KEY_GOLD:      gr_setcolor(gr_getcolor(63, 63, 10)); break;
 849                                         default:
 850                                                 Error("Illegal key type: %i", objp->id);
 851                                         }
 852                                         g3_rotate_point(&sphere_point,&objp->pos);
 853                                         g3_draw_sphere(&sphere_point,objp->size*4);
 854                                 }
 855                         }
 856                         break;
 857                 }
 858         }
 859
 860         g3_end_frame();
 861
 862         gr_bitmapm(AutomapHires?10:5, AutomapHires?10:5, &name_canv_left->cv_bitmap);
 863         gr_bitmapm(grd_curcanv->cv_bitmap.bm_w-(AutomapHires?10:5)-name_canv_right->cv_bitmap.bm_w,AutomapHires?10:5,&name_canv_right->cv_bitmap);
 864 }
 865 WIN(DDGRUNLOCK(dd_grd_curcanv));
 866
 867 #ifdef OGL
 868         ogl_swap_buffers();
 869 #else
 870 #ifndef AUTOMAP_DIRECT_RENDER
 871         if (!AutomapHires)
 872                 gr_show_canvas( &Pages[current_page] );
 873         else {
 874         #ifndef WINDOWS
 875                 //gr_bm_ubitblt( Page.cv_bitmap.bm_w, Page.cv_bitmap.bm_h, Page.cv_bitmap.bm_x, Page.cv_bitmap.bm_y, 0, 0, &Page.cv_bitmap, &VR_screen_pages[0].cv_bitmap );
 876                 gr_bm_ubitblt( Page.cv_bitmap.bm_w, Page.cv_bitmap.bm_h, Page.cv_bitmap.bm_x, Page.cv_bitmap.bm_y, 0, 0, &Page.cv_bitmap, &grd_curscreen->sc_canvas.cv_bitmap );
 877         #else
 878                 dd_gr_blt_screen(&ddPage, 0,0,0,0,0,0,0,0);
 879         #endif
 880         }
 881         gr_update();
 882 #endif
 883 #endif
 884 }
 885
 886 #ifdef WINDOWS
 887 #define LEAVE_TIME 0x00010000
 888 #else
 889 #define LEAVE_TIME 0x4000
 890 #endif
 891
 892 #define WINDOW_WIDTH            288
 893
 894
 895 //print to canvas & double height
 896 grs_canvas *print_to_canvas(char *s,grs_font *font, int fc, int bc, int double_flag)
 897 {
 898         int y;
 899         ubyte *data;
 900         int rs;
 901         grs_canvas *temp_canv;
 902         grs_font *save_font;
 903         int w,h,aw;
 904
 905 WINDOS(
 906         dd_grs_canvas *save_canv,
 907         grs_canvas *save_canv
 908 );
 909
 910 WINDOS(
 911         save_canv = dd_grd_curcanv,
 912         save_canv = grd_curcanv
 913 );
 914
 915         save_font = grd_curcanv->cv_font;
 916         gr_set_curfont(font);                                   //set the font we're going to use
 917         gr_get_string_size(s,&w,&h,&aw);                //now get the string size
 918         gr_set_curfont(save_font);                              //restore real font
 919
 920         //temp_canv = gr_create_canvas(font->ft_w*strlen(s),font->ft_h*2);
 921         temp_canv = gr_create_canvas(w,font->ft_h*2);
 922
 923         gr_set_current_canvas(temp_canv);
 924         gr_set_curfont(font);
 925         gr_clear_canvas(TRANSPARENCY_COLOR);                                            //trans color
 926         gr_set_fontcolor(fc,bc);
 927         gr_printf(0,0,s);
 928
 929         //now double it, since we're drawing to 400-line modex screen
 930
 931         if (double_flag) {
 932                 data = temp_canv->cv_bitmap.bm_data;
 933                 rs = temp_canv->cv_bitmap.bm_rowsize;
 934
 935                 for (y=temp_canv->cv_bitmap.bm_h/2;y--;) {
 936                         memcpy(data+(rs*y*2),data+(rs*y),temp_canv->cv_bitmap.bm_w);
 937                         memcpy(data+(rs*(y*2+1)),data+(rs*y),temp_canv->cv_bitmap.bm_w);
 938                 }
 939         }
 940
 941 WINDOS(
 942         dd_gr_set_current_canvas(save_canv),
 943         gr_set_current_canvas(save_canv)
 944 );
 945
 946         return temp_canv;
 947 }
 948
 949 //print to buffer, double heights, and blit bitmap to screen
 950 void modex_printf(int x,int y,char *s,grs_font *font,int color)
 951 {
 952         grs_canvas *temp_canv;
 953
 954         temp_canv = print_to_canvas(s, font, color, -1, !AutomapHires);
 955
 956         gr_bitmapm(x,y,&temp_canv->cv_bitmap);
 957
 958         gr_free_canvas(temp_canv);
 959 }
 960
 961 //name for each group.  maybe move somewhere else
 962 char *system_name[] = {
 963                         "Zeta Aquilae",
 964                         "Quartzon System",
 965                         "Brimspark System",
 966                         "Limefrost Spiral",
 967                         "Baloris Prime",
 968                         "Omega System"};
 969
 970 void create_name_canv()
 971 {
 972         char    name_level_left[128],name_level_right[128];
 973
 974         if (Current_level_num > 0)
 975                 sprintf(name_level_left, "%s %i",TXT_LEVEL, Current_level_num);
 976         else
 977                 sprintf(name_level_left, "Secret Level %i",-Current_level_num);
 978
 979         if (Current_mission_num == Builtin_mission_num && Current_level_num>0)          //built-in mission
 980                 sprintf(name_level_right,"%s %d: ",system_name[(Current_level_num-1)/4],((Current_level_num-1)%4)+1);
 981         else
 982                 strcpy(name_level_right, " ");
 983
 984         strcat(name_level_right, Current_level_name);
 985
 986         gr_set_fontcolor(Green_31,-1);
 987         name_canv_left = print_to_canvas(name_level_left, SMALL_FONT, Green_31, -1, !AutomapHires);
 988         name_canv_right = print_to_canvas(name_level_right,SMALL_FONT, Green_31, -1, !AutomapHires);
 989
 990 }
 991
 992
 993 extern void GameLoop(int, int );
 994 extern int set_segment_depths(int start_seg, ubyte *segbuf);
 995
 996 int Automap_active = 0;
 997
 998 #ifdef RELEASE
 999 #define MAP_BACKGROUND_FILENAME (AutomapHires?"\x01MAPB.PCX":"\x01MAP.PCX")     //load only from hog file
1000 #else
1001 #define MAP_BACKGROUND_FILENAME ((AutomapHires && cfexist("mapb.pcx"))?"MAPB.PCX":"MAP.PCX")
1002 #endif
1003
1004 int Automap_always_hires=0;
1005 extern int MenuHiresAvailable;
1006
1007 extern int Current_display_mode;
1008
1009 u_int32_t automap_mode = SM(640,480);
1010 int automap_width = 640;
1011 int automap_height = 480;
1012 int automap_use_game_res=0;
1013
1014 void do_automap( int key_code ) {
1015         int done=0;
1016         vms_matrix      tempm;
1017         vms_angvec      tangles;
1018         int leave_mode=0;
1019         int first_time=1;
1020         int pcx_error;
1021 #if !defined(AUTOMAP_DIRECT_RENDER) || !defined(NDEBUG)
1022         int i;
1023 #endif
1024         int c, marker_num;
1025         fix entry_time;
1026         int pause_game=1;               // Set to 1 if everything is paused during automap...No pause during net.
1027         fix t1, t2;
1028         control_info saved_control_info;
1029         grs_bitmap Automap_background;
1030         int Max_segments_away = 0;
1031         int SegmentLimit = 1;
1032         ubyte pal[256*3];
1033         char maxdrop;
1034         int must_free_canvas=0;
1035
1036         WIN(int dd_VR_screen_mode_save);
1037         WIN(int redraw_screen=0);
1038
1039         Automap_active = 1;
1040
1041         init_automap_colors();
1042
1043         key_code = key_code;    // disable warning...
1044
1045         if ((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence))
1046                 pause_game = 0;
1047
1048         if (pause_game) {
1049                 stop_time();
1050                 digi_pause_digi_sounds();
1051         }
1052
1053         Max_edges = min(MAX_EDGES_FROM_VERTS(Num_vertices),MAX_EDGES);                  //make maybe smaller than max
1054
1055         mprintf( (0, "Num_vertices=%d, Max_edges=%d, (MAX:%d)\n", Num_vertices, Max_edges, MAX_EDGES ));
1056         mprintf( (0, "Allocated %d K for automap edge list\n", (sizeof(Edge_info)+sizeof(short))*Max_edges/1024 ));
1057
1058         #if !defined (WINDOWS) && !defined(MACINTOSH)
1059         if ((Current_display_mode!=0 && Current_display_mode!=2) || (Automap_always_hires && MenuHiresAvailable)) {
1060 #if !defined(POLY_ACC)
1061                 //edit 4/23/99 Matt Mueller - don't switch res unless we need to
1062                 if (grd_curscreen->sc_mode != AUTOMAP_MODE)
1063                         gr_set_mode( AUTOMAP_MODE );
1064                 else
1065                         gr_set_current_canvas(NULL);
1066                 //end edit -MM
1067                 automap_width=grd_curscreen->sc_canvas.cv_bitmap.bm_w;
1068                 automap_height=grd_curscreen->sc_canvas.cv_bitmap.bm_h;
1069 #endif
1070                 PA_DFX (pa_set_frontbuffer_current());
1071                 AutomapHires = 1;
1072         }
1073         else {
1074                 gr_set_mode( SM(320, 400));
1075                 AutomapHires = 0;
1076         }
1077         #else
1078                 AutomapHires = 1;               //Mac & Windows(?) always in hires
1079         #endif
1080
1081         #ifdef WINDOWS
1082                 dd_VR_screen_mode_save = VR_screen_mode;
1083                 VR_screen_mode = SM95_640x480x8;        // HACK! Forcing reinit of 640x480
1084                 set_screen_mode(SCREEN_GAME);
1085         #endif
1086
1087         FontHires = FontHiresAvailable && AutomapHires;
1088
1089         create_name_canv();
1090
1091         gr_palette_clear();
1092
1093 WIN(AutomapRedraw:)
1094         if (!AutomapHires) {
1095 #ifndef MACINTOSH
1096 #ifndef AUTOMAP_DIRECT_RENDER
1097                 gr_init_sub_canvas(&Pages[0],grd_curcanv,0,0,320,400);
1098                 gr_init_sub_canvas(&Pages[1],grd_curcanv,0,401,320,400);
1099                 gr_init_sub_canvas(&DrawingPages[0],&Pages[0],16,69,WINDOW_WIDTH,272);
1100                 gr_init_sub_canvas(&DrawingPages[1],&Pages[1],16,69,WINDOW_WIDTH,272);
1101 #endif
1102
1103                 gr_init_bitmap_data (&Automap_background);
1104 //              pcx_error = pcx_read_bitmap(MAP_BACKGROUND_FILENAME,&Automap_background,BM_LINEAR,pal);
1105 //              if ( pcx_error != PCX_ERROR_NONE )
1106 //                      Error("File %s - PCX error: %s",MAP_BACKGROUND_FILENAME,pcx_errormsg(pcx_error));
1107 //              gr_remap_bitmap_good( &Automap_background, pal, -1, -1 );
1108
1109 #ifndef AUTOMAP_DIRECT_RENDER
1110                 for (i=0; i<2; i++ )    {
1111                         gr_set_current_canvas(&Pages[i]);
1112 //                      gr_bitmap( 0, 0, &Automap_background );
1113 //                      modex_printf( 40, 22,TXT_AUTOMAP,HUGE_FONT,Font_color_20);
1114 //                      modex_printf( 30,353,TXT_TURN_SHIP,SMALL_FONT,Font_color_20);
1115 //                      modex_printf( 30,369,TXT_SLIDE_UPDOWN,SMALL_FONT,Font_color_20);
1116 //                      modex_printf( 30,385,TXT_VIEWING_DISTANCE,SMALL_FONT,Font_color_20);
1117                 }
1118                 gr_free_bitmap_data(&Automap_background);
1119                 gr_set_current_canvas(&DrawingPages[current_page]);
1120 #endif /* AUTOMAP_DIRECT_RENDER */
1121 #endif /* MACINTOSH */
1122         }
1123         else {
1124 #ifndef AUTOMAP_DIRECT_RENDER
1125                 if (VR_render_buffer[0].cv_w >= automap_width && VR_render_buffer[0].cv_h >= automap_height)
1126                 {
1127                         WIN(dd_gr_init_sub_canvas(&ddPage, &dd_VR_render_buffer[0], 0, 0, automap_width,automap_height));
1128
1129                         #if defined(MACINTOSH) && defined(POLY_ACC)
1130                                 if (PAEnabled)
1131                                 {
1132                                         // we want all the automap border stuff to be drawn straight to the screen
1133                                         gr_init_sub_canvas(&Page,&(grd_curscreen->sc_canvas),0, 0, automap_width, automap_height);
1134                                 }
1135                                 else
1136                                 {
1137                                         gr_init_sub_canvas(&Page,&VR_render_buffer[0],0, 0, automap_width, automap_height);
1138                                 }
1139                         #else
1140                                 gr_init_sub_canvas(&Page,&VR_render_buffer[0],0, 0, automap_width, automap_height);
1141                         #endif
1142
1143                 }
1144                 else {
1145                 #ifndef WINDOWS
1146                         void *raw_data;
1147                         MALLOC(raw_data,ubyte,automap_width*automap_height);
1148                         gr_init_canvas(&Page,raw_data,BM_LINEAR,automap_width,automap_height);
1149                 #else
1150                         dd_gr_init_canvas(&ddPage, BM_LINEAR, automap_width,automap_height);
1151                         gr_init_canvas(&Page,NULL,BM_LINEAR,automap_width,automap_height);
1152                 #endif
1153                         must_free_canvas = 1;
1154                 }
1155
1156                 WIN(dd_gr_init_sub_canvas(&ddDrawingPage, &ddPage, 0,0,automap_width,automap_height));
1157                 gr_init_sub_canvas(&DrawingPage,&Page, 0,0,automap_width,automap_height);
1158
1159                 WINDOS(
1160                         dd_gr_set_current_canvas(&ddPage),
1161                         gr_set_current_canvas(&Page)
1162                 );
1163 #endif
1164
1165 #if defined(POLY_ACC)
1166
1167                 #ifndef MACINTOSH
1168                 pcx_error = pcx_read_bitmap(MAP_BACKGROUND_FILENAME,&(grd_curcanv->cv_bitmap),BM_LINEAR15,pal);
1169         #else
1170                 if ( PAEnabled )
1171                 {
1172                         pcx_error = pcx_read_bitmap(MAP_BACKGROUND_FILENAME,&(grd_curcanv->cv_bitmap),BM_LINEAR15,pal);
1173                                 if ( pcx_error != PCX_ERROR_NONE )
1174                                 {
1175                                         Error("File %s - PCX error: %s",MAP_BACKGROUND_FILENAME,pcx_errormsg(pcx_error));
1176                                         return;
1177                                 }
1178                     }
1179                     else
1180                     {
1181                                 pcx_error = pcx_read_bitmap(MAP_BACKGROUND_FILENAME,&(grd_curcanv->cv_bitmap),BM_LINEAR,pal);
1182                                 if ( pcx_error != PCX_ERROR_NONE )
1183                                 {
1184                                         Error("File %s - PCX error: %s",MAP_BACKGROUND_FILENAME,pcx_errormsg(pcx_error));
1185                                         return;
1186                                 }
1187
1188                                 gr_remap_bitmap_good( &(grd_curcanv->cv_bitmap), pal, -1, -1 );
1189                     }
1190             #endif
1191 #else
1192
1193                 WIN(DDGRLOCK(dd_grd_curcanv));
1194                         pcx_error = pcx_read_bitmap(MAP_BACKGROUND_FILENAME,&(grd_curcanv->cv_bitmap),BM_LINEAR,pal);
1195                         if ( pcx_error != PCX_ERROR_NONE )      {
1196                                 //printf("File %s - PCX error: %s",MAP_BACKGROUND_FILENAME,pcx_errormsg(pcx_error));
1197                                 Error("File %s - PCX error: %s",MAP_BACKGROUND_FILENAME,pcx_errormsg(pcx_error));
1198                                 return;
1199                         }
1200
1201                         gr_remap_bitmap_good( &(grd_curcanv->cv_bitmap), pal, -1, -1 );
1202 #endif
1203
1204                         gr_set_curfont(HUGE_FONT);
1205                         gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
1206                         gr_printf( 80, 36,TXT_AUTOMAP,HUGE_FONT);
1207                         gr_set_curfont(SMALL_FONT);
1208                         gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
1209                         gr_printf( 60, 426,TXT_TURN_SHIP);
1210                         gr_printf( 60, 443,TXT_SLIDE_UPDOWN);
1211                         gr_printf( 60, 460,TXT_VIEWING_DISTANCE);
1212                 WIN(DDGRUNLOCK(dd_grd_curcanv));
1213
1214 #ifndef AUTOMAP_DIRECT_RENDER
1215                 WINDOS(
1216                         dd_gr_set_current_canvas(&ddDrawingPage),
1217                         gr_set_current_canvas(&DrawingPage)
1218                 );
1219 #endif
1220         }
1221
1222
1223 WIN(if (!redraw_screen) {)
1224         automap_build_edge_list();
1225
1226         if ( ViewDist==0 )
1227                 ViewDist = ZOOM_DEFAULT;
1228         ViewMatrix = Objects[Players[Player_num].objnum].orient;
1229
1230         tangles.p = PITCH_DEFAULT;
1231         tangles.h  = 0;
1232         tangles.b  = 0;
1233
1234         done = 0;
1235
1236         view_target = Objects[Players[Player_num].objnum].pos;
1237
1238         t1 = entry_time = timer_get_fixed_seconds();
1239         t2 = t1;
1240
1241         //Fill in Automap_visited from Objects[Players[Player_num].objnum].segnum
1242         Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
1243         SegmentLimit = Max_segments_away;
1244
1245         adjust_segment_limit(SegmentLimit);
1246 WIN(})
1247
1248 WIN(if (redraw_screen) redraw_screen = 0);
1249
1250         while(!done)    {
1251                 if ( leave_mode==0 && Controls.automap_state && (timer_get_fixed_seconds()-entry_time)>LEAVE_TIME)
1252                         leave_mode = 1;
1253
1254                 if ( !Controls.automap_state && (leave_mode==1) )
1255                         done=1;
1256
1257                 if (!pause_game)        {
1258                         ushort old_wiggle;
1259                         saved_control_info = Controls;                          // Save controls so we can zero them
1260                         memset(&Controls,0,sizeof(control_info));       // Clear everything...
1261                         old_wiggle = ConsoleObject->mtype.phys_info.flags & PF_WIGGLE;  // Save old wiggle
1262                         ConsoleObject->mtype.phys_info.flags &= ~PF_WIGGLE;             // Turn off wiggle
1263                         #ifdef NETWORK
1264                         if (multi_menu_poll())
1265                                 done = 1;
1266                         #endif
1267 //                      GameLoop( 0, 0 );               // Do game loop with no rendering and no reading controls.
1268                         ConsoleObject->mtype.phys_info.flags |= old_wiggle;     // Restore wiggle
1269                         Controls = saved_control_info;
1270                 }
1271
1272         #ifndef WINDOWS
1273                 controls_read_all();
1274         #else
1275                 controls_read_all_win();
1276         #endif
1277
1278                 if ( Controls.automap_down_count )      {
1279                         if (leave_mode==0)
1280                                 done = 1;
1281                         c = 0;
1282                 }
1283
1284                 //see if redbook song needs to be restarted
1285                 songs_check_redbook_repeat();
1286
1287                 #ifdef WINDOWS
1288                 {
1289                         MSG msg;
1290                         DoMessageStuff(&msg);
1291                         if (_RedrawScreen) {
1292                                 _RedrawScreen = FALSE;
1293                                 redraw_screen = 1;
1294                                 goto AutomapRedraw;
1295                         }
1296
1297                         if (msg.message == WM_QUIT) exit(1);
1298
1299                         DDGRRESTORE;
1300                 }
1301                 #endif
1302
1303
1304                 while( (c=key_inkey()) )        {
1305                         switch( c ) {
1306                         #ifndef NDEBUG
1307                         case KEY_BACKSP: Int3(); break;
1308                         #endif
1309
1310                         case KEY_PRINT_SCREEN: {
1311                                 if (AutomapHires) {
1312                                 WINDOS(
1313                                         dd_gr_set_current_canvas(NULL),
1314                                                 gr_set_current_canvas(NULL)
1315                                 );
1316                                 }
1317 #ifndef AUTOMAP_DIRECT_RENDER
1318                                 else
1319                                         gr_set_current_canvas(&Pages[current_page]);
1320 #endif
1321                                 save_screen_shot(1);
1322                                 break;
1323                         }
1324
1325                         case KEY_ESC:
1326                                 if (leave_mode==0)
1327                                         done = 1;
1328                                  break;
1329
1330                         #ifndef NDEBUG
1331                         case KEY_DEBUGGED+KEY_F:        {
1332                                 for (i=0; i<=Highest_segment_index; i++ )
1333                                         Automap_visited[i] = 1;
1334                                 automap_build_edge_list();
1335                                 Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
1336                                 SegmentLimit = Max_segments_away;
1337                                 adjust_segment_limit(SegmentLimit);
1338                                 }
1339                                 break;
1340                         #endif
1341
1342                         case KEY_MINUS:
1343                                 if (SegmentLimit > 1)           {
1344                                         SegmentLimit--;
1345                                         adjust_segment_limit(SegmentLimit);
1346                                 }
1347                                 break;
1348                         case KEY_EQUAL:
1349                                 if (SegmentLimit < Max_segments_away)   {
1350                                         SegmentLimit++;
1351                                         adjust_segment_limit(SegmentLimit);
1352                                 }
1353                                 break;
1354                         case KEY_1:
1355                         case KEY_2:
1356                         case KEY_3:
1357                         case KEY_4:
1358                         case KEY_5:
1359                         case KEY_6:
1360                         case KEY_7:
1361                         case KEY_8:
1362                         case KEY_9:
1363                         case KEY_0:
1364                                 if (Game_mode & GM_MULTI)
1365                                 maxdrop=2;
1366                                 else
1367                                 maxdrop=9;
1368
1369                         #ifndef MACINTOSH
1370                         marker_num = c-KEY_1;
1371                         #else
1372                         switch(c) {             // god this is stupid.....
1373                                 case KEY_1: marker_num = 0; break;
1374                                 case KEY_2: marker_num = 1; break;
1375                                 case KEY_3: marker_num = 2; break;
1376                                 case KEY_4: marker_num = 3; break;
1377                                 case KEY_5: marker_num = 4; break;
1378                                 case KEY_6: marker_num = 5; break;
1379                                 case KEY_7: marker_num = 6; break;
1380                                 case KEY_8: marker_num = 7; break;
1381                                 case KEY_9: marker_num = 8; break;
1382                                 case KEY_0: marker_num = 9; break;
1383                         }
1384                         #endif
1385             if (marker_num<=maxdrop)
1386                                  {
1387                                         if (MarkerObject[marker_num] != -1)
1388                                                 HighlightMarker=marker_num;
1389                                  }
1390                           break;
1391
1392                         case KEY_D+KEY_CTRLED:
1393 #ifndef AUTOMAP_DIRECT_RENDER
1394                                 if (current_page)               //menu will only work on page 0
1395                                         draw_automap(); //..so switch from 1 to 0
1396 #endif
1397
1398                                 if (HighlightMarker > -1 && MarkerObject[HighlightMarker] != -1) {
1399 #ifndef AUTOMAP_DIRECT_RENDER
1400                                         WINDOS(
1401                                                 dd_gr_set_current_canvas(&ddPages[current_page]),
1402                                                 gr_set_current_canvas(&Pages[current_page])
1403                                         );
1404 #endif
1405
1406                                         if (nm_messagebox( NULL, 2, TXT_YES, TXT_NO, "Delete Marker?" ) == 0) {
1407                                                 obj_delete(MarkerObject[HighlightMarker]);
1408                                                 MarkerObject[HighlightMarker]=-1;
1409                                                 MarkerMessage[HighlightMarker][0]=0;
1410                                                 HighlightMarker = -1;
1411                                         }
1412                                 }
1413                                 break;
1414
1415                         #ifndef RELEASE
1416                         case KEY_COMMA:
1417                                 if (MarkerScale>.5)
1418                                         MarkerScale-=.5;
1419                                 break;
1420                         case KEY_PERIOD:
1421                                 if (MarkerScale<30.0)
1422                                         MarkerScale+=.5;
1423                                 break;
1424                         #endif
1425
1426 //added 8/23/99 by Matt Mueller for hot key res/fullscreen changing, and menu access
1427 #if 0
1428                         case KEY_CTRLED+KEY_SHIFTED+KEY_PADDIVIDE:
1429                         case KEY_ALTED+KEY_CTRLED+KEY_PADDIVIDE:
1430                         case KEY_ALTED+KEY_SHIFTED+KEY_PADDIVIDE:
1431                                 d1x_options_menu();
1432                                 break;
1433                         case KEY_CTRLED+KEY_SHIFTED+KEY_PADMULTIPLY:
1434                         case KEY_ALTED+KEY_CTRLED+KEY_PADMULTIPLY:
1435                         case KEY_ALTED+KEY_SHIFTED+KEY_PADMULTIPLY:
1436                                 change_res();
1437                                 break;
1438                         case KEY_CTRLED+KEY_SHIFTED+KEY_PADMINUS:
1439                         case KEY_ALTED+KEY_CTRLED+KEY_PADMINUS:
1440                         case KEY_ALTED+KEY_SHIFTED+KEY_PADMINUS:
1441                                 //lower res
1442                                 //should we just cycle through the list that is displayed in the res change menu?
1443                                 // what if their card/X/etc can't handle that mode? hrm.
1444                                 //well, the quick access to the menu is good enough for now.
1445                                 break;
1446                         case KEY_CTRLED+KEY_SHIFTED+KEY_PADPLUS:
1447                         case KEY_ALTED+KEY_CTRLED+KEY_PADPLUS:
1448                         case KEY_ALTED+KEY_SHIFTED+KEY_PADPLUS:
1449                                 //increase res
1450                                 break;
1451 #endif
1452                         case KEY_ALTED+KEY_ENTER:
1453                         case KEY_ALTED+KEY_PADENTER:
1454                                 gr_toggle_fullscreen_game();
1455                                 break;
1456 //end addition -MM
1457
1458               }
1459                 }
1460
1461                 if ( Controls.fire_primary_down_count ) {
1462                         // Reset orientation
1463                         ViewDist = ZOOM_DEFAULT;
1464                         tangles.p = PITCH_DEFAULT;
1465                         tangles.h  = 0;
1466                         tangles.b  = 0;
1467                         view_target = Objects[Players[Player_num].objnum].pos;
1468                 }
1469
1470                 ViewDist -= Controls.forward_thrust_time*ZOOM_SPEED_FACTOR;
1471
1472                 tangles.p += fixdiv( Controls.pitch_time, ROT_SPEED_DIVISOR );
1473                 tangles.h  += fixdiv( Controls.heading_time, ROT_SPEED_DIVISOR );
1474                 tangles.b  += fixdiv( Controls.bank_time, ROT_SPEED_DIVISOR*2 );
1475
1476                 if ( Controls.vertical_thrust_time || Controls.sideways_thrust_time )   {
1477                         vms_angvec      tangles1;
1478                         vms_vector      old_vt;
1479                         old_vt = view_target;
1480                         tangles1 = tangles;
1481                         vm_angles_2_matrix(&tempm,&tangles1);
1482                         vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
1483                         vm_vec_scale_add2( &view_target, &ViewMatrix.uvec, Controls.vertical_thrust_time*SLIDE_SPEED );
1484                         vm_vec_scale_add2( &view_target, &ViewMatrix.rvec, Controls.sideways_thrust_time*SLIDE_SPEED );
1485                         if ( vm_vec_dist_quick( &view_target, &Objects[Players[Player_num].objnum].pos) > i2f(1000) )   {
1486                                 view_target = old_vt;
1487                         }
1488                 }
1489
1490                 vm_angles_2_matrix(&tempm,&tangles);
1491                 vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
1492
1493                 if ( ViewDist < ZOOM_MIN_VALUE ) ViewDist = ZOOM_MIN_VALUE;
1494                 if ( ViewDist > ZOOM_MAX_VALUE ) ViewDist = ZOOM_MAX_VALUE;
1495
1496                 draw_automap();
1497
1498                 if ( first_time )       {
1499                         first_time = 0;
1500                         gr_palette_load( gr_palette );
1501                 }
1502
1503                 t2 = timer_get_fixed_seconds();
1504                 if (pause_game)
1505                         FrameTime=t2-t1;
1506                 t1 = t2;
1507         }
1508
1509         //d_free(Edges);
1510         //d_free(DrawingListBright);
1511
1512         gr_free_canvas(name_canv_left);  name_canv_left=NULL;
1513         gr_free_canvas(name_canv_right);  name_canv_right=NULL;
1514
1515         if (must_free_canvas)   {
1516 #ifndef AUTOMAP_DIRECT_RENDER
1517         WINDOS(
1518                 DDFreeSurface(ddPages[0].lpdds),
1519                 d_free(Page.cv_bitmap.bm_data)
1520         );
1521 #endif
1522         }
1523
1524         mprintf( (0, "Automap memory freed\n" ));
1525
1526         game_flush_inputs();
1527
1528         #if defined(POLY_ACC) && defined(MACINTOSH)
1529                 if (PAEnabled)
1530                 {
1531                         pa_set_context(kGamePlayDrawContextID, NULL);
1532                 }
1533         #endif
1534
1535         if (pause_game)
1536         {
1537                 start_time();
1538                 digi_resume_digi_sounds();
1539         }
1540
1541 #ifdef WINDOWS
1542         VR_screen_mode = dd_VR_screen_mode_save;
1543 #endif
1544
1545         Automap_active = 0;
1546 }
1547
1548 void adjust_segment_limit(int SegmentLimit)
1549 {
1550         int i,e1;
1551         Edge_info * e;
1552
1553         mprintf(( 0, "Seglimit: %d\n", SegmentLimit ));
1554
1555         for (i=0; i<=Highest_edge_index; i++ )  {
1556                 e = &Edges[i];
1557                 e->flags |= EF_TOO_FAR;
1558                 for (e1=0; e1<e->num_faces; e1++ )      {
1559                         if ( Automap_visited[e->segnum[e1]] <= SegmentLimit )   {
1560                                 e->flags &= (~EF_TOO_FAR);
1561                                 break;
1562                         }
1563                 }
1564         }
1565
1566 }
1567
1568 void draw_all_edges()
1569 {
1570         g3s_codes cc;
1571         int i,j,nbright;
1572         ubyte nfacing,nnfacing;
1573         Edge_info *e;
1574         vms_vector *tv1;
1575         fix distance;
1576         fix min_distance = 0x7fffffff;
1577         g3s_point *p1, *p2;
1578
1579
1580         nbright=0;
1581
1582         for (i=0; i<=Highest_edge_index; i++ )  {
1583                 //e = &Edges[Edge_used_list[i]];
1584                 e = &Edges[i];
1585                 if (!(e->flags & EF_USED)) continue;
1586
1587                 if ( e->flags & EF_TOO_FAR) continue;
1588
1589                 if (e->flags&EF_FRONTIER)       {                                               // A line that is between what we have seen and what we haven't
1590                         if ( (!(e->flags&EF_SECRET))&&(e->color==Wall_normal_color))
1591                                 continue;               // If a line isn't secret and is normal color, then don't draw it
1592                 }
1593
1594                 cc=rotate_list(2,e->verts);
1595                 distance = Segment_points[e->verts[1]].p3_z;
1596
1597                 if (min_distance>distance )
1598                         min_distance = distance;
1599
1600                 if (!cc.and)    {       //all off screen?
1601                         nfacing = nnfacing = 0;
1602                         tv1 = &Vertices[e->verts[0]];
1603                         j = 0;
1604                         while( j<e->num_faces && (nfacing==0 || nnfacing==0) )  {
1605                                 #ifdef COMPACT_SEGS
1606                                 vms_vector temp_v;
1607                                 get_side_normal(&Segments[e->segnum[j]], e->sides[j], 0, &temp_v );
1608                                 if (!g3_check_normal_facing( tv1, &temp_v ) )
1609                                 #else
1610                                 if (!g3_check_normal_facing( tv1, &Segments[e->segnum[j]].sides[e->sides[j]].normals[0] ) )
1611                                 #endif
1612                                         nfacing++;
1613                                 else
1614                                         nnfacing++;
1615                                 j++;
1616                         }
1617
1618                         if ( nfacing && nnfacing )      {
1619                                 // a contour line
1620                                 DrawingListBright[nbright++] = e-Edges;
1621                         } else if ( e->flags&(EF_DEFINING|EF_GRATE) )   {
1622                                 if ( nfacing == 0 )     {
1623                                         if ( e->flags & EF_NO_FADE )
1624                                                 gr_setcolor( e->color );
1625                                         else
1626                                                 gr_setcolor( gr_fade_table[e->color+256*8] );
1627                                         g3_draw_line( &Segment_points[e->verts[0]], &Segment_points[e->verts[1]] );
1628                                 }       else {
1629                                         DrawingListBright[nbright++] = e-Edges;
1630                                 }
1631                         }
1632                 }
1633         }
1634
1635 ///     mprintf( (0, "Min distance=%.2f, ViewDist=%.2f, Delta=%.2f\n", f2fl(min_distance), f2fl(ViewDist), f2fl(min_distance)- f2fl(ViewDist) ));
1636
1637         if ( min_distance < 0 ) min_distance = 0;
1638
1639         // Sort the bright ones using a shell sort
1640         {
1641                 int t;
1642                 int i, j, incr, v1, v2;
1643
1644                 incr = nbright / 2;
1645                 while( incr > 0 )       {
1646                         for (i=incr; i<nbright; i++ )   {
1647                                 j = i - incr;
1648                                 while (j>=0 )   {
1649                                         // compare element j and j+incr
1650                                         v1 = Edges[DrawingListBright[j]].verts[0];
1651                                         v2 = Edges[DrawingListBright[j+incr]].verts[0];
1652
1653                                         if (Segment_points[v1].p3_z < Segment_points[v2].p3_z) {
1654                                                 // If not in correct order, them swap 'em
1655                                                 t=DrawingListBright[j+incr];
1656                                                 DrawingListBright[j+incr]=DrawingListBright[j];
1657                                                 DrawingListBright[j]=t;
1658                                                 j -= incr;
1659                                         }
1660                                         else
1661                                                 break;
1662                                 }
1663                         }
1664                         incr = incr / 2;
1665                 }
1666         }
1667
1668         // Draw the bright ones
1669         for (i=0; i<nbright; i++ )      {
1670                 int color;
1671                 fix dist;
1672                 e = &Edges[DrawingListBright[i]];
1673                 p1 = &Segment_points[e->verts[0]];
1674                 p2 = &Segment_points[e->verts[1]];
1675                 dist = p1->p3_z - min_distance;
1676                 // Make distance be 1.0 to 0.0, where 0.0 is 10 segments away;
1677                 if ( dist < 0 ) dist=0;
1678                 if ( dist >= Automap_farthest_dist ) continue;
1679
1680                 if ( e->flags & EF_NO_FADE )    {
1681                         gr_setcolor( e->color );
1682                 } else {
1683                         dist = F1_0 - fixdiv( dist, Automap_farthest_dist );
1684                         color = f2i( dist*31 );
1685                         gr_setcolor( gr_fade_table[e->color+color*256] );
1686                 }
1687                 g3_draw_line( p1, p2 );
1688         }
1689
1690 }
1691
1692
1693 //==================================================================
1694 //
1695 // All routines below here are used to build the Edge list
1696 //
1697 //==================================================================
1698
1699
1700 //finds edge, filling in edge_ptr. if found old edge, returns index, else return -1
1701 static int automap_find_edge(int v0,int v1,Edge_info **edge_ptr)
1702 {
1703         long vv, evv;
1704         short hash,oldhash;
1705         int ret, ev0, ev1;
1706
1707         vv = (v1<<16) + v0;
1708
1709         oldhash = hash = ((v0*5+v1) % Max_edges);
1710
1711         ret = -1;
1712
1713         while (ret==-1) {
1714                 ev0 = (int)(Edges[hash].verts[0]);
1715                 ev1 = (int)(Edges[hash].verts[1]);
1716                 evv = (ev1<<16)+ev0;
1717                 if (Edges[hash].num_faces == 0 ) ret=0;
1718                 else if (evv == vv) ret=1;
1719                 else {
1720                         if (++hash==Max_edges) hash=0;
1721                         if (hash==oldhash) Error("Edge list full!");
1722                 }
1723         }
1724
1725         *edge_ptr = &Edges[hash];
1726
1727         if (ret == 0)
1728                 return -1;
1729         else
1730                 return hash;
1731
1732 }
1733
1734
1735 void add_one_edge( short va, short vb, ubyte color, ubyte side, short segnum, int hidden, int grate, int no_fade )      {
1736         int found;
1737         Edge_info *e;
1738         short tmp;
1739
1740         if ( Num_edges >= Max_edges)    {
1741                 // GET JOHN! (And tell him that his
1742                 // MAX_EDGES_FROM_VERTS formula is hosed.)
1743                 // If he's not around, save the mine,
1744                 // and send him  mail so he can look
1745                 // at the mine later. Don't modify it.
1746                 // This is important if this happens.
1747                 Int3();         // LOOK ABOVE!!!!!!
1748                 return;
1749         }
1750
1751         if ( va > vb )  {
1752                 tmp = va;
1753                 va = vb;
1754                 vb = tmp;
1755         }
1756
1757         found = automap_find_edge(va,vb,&e);
1758
1759         if (found == -1) {
1760                 e->verts[0] = va;
1761                 e->verts[1] = vb;
1762                 e->color = color;
1763                 e->num_faces = 1;
1764                 e->flags = EF_USED | EF_DEFINING;                       // Assume a normal line
1765                 e->sides[0] = side;
1766                 e->segnum[0] = segnum;
1767                 //Edge_used_list[Num_edges] = e-Edges;
1768                 if ( (e-Edges) > Highest_edge_index )
1769                         Highest_edge_index = e - Edges;
1770                 Num_edges++;
1771         } else {
1772                 //Assert(e->num_faces < 8 );
1773
1774                 if ( color != Wall_normal_color )
1775                         if (color != Wall_revealed_color)
1776                                 e->color = color;
1777
1778                 if ( e->num_faces < 4 ) {
1779                         e->sides[e->num_faces] = side;
1780                         e->segnum[e->num_faces] = segnum;
1781                         e->num_faces++;
1782                 }
1783         }
1784
1785         if ( grate )
1786                 e->flags |= EF_GRATE;
1787
1788         if ( hidden )
1789                 e->flags|=EF_SECRET;            // Mark this as a hidden edge
1790         if ( no_fade )
1791                 e->flags |= EF_NO_FADE;
1792 }
1793
1794 void add_one_unknown_edge( short va, short vb ) {
1795         int found;
1796         Edge_info *e;
1797         short tmp;
1798
1799         if ( va > vb )  {
1800                 tmp = va;
1801                 va = vb;
1802                 vb = tmp;
1803         }
1804
1805         found = automap_find_edge(va,vb,&e);
1806         if (found != -1)
1807                 e->flags|=EF_FRONTIER;          // Mark as a border edge
1808 }
1809
1810 #ifndef _GAMESEQ_H
1811 extern obj_position Player_init[];
1812 #endif
1813
1814 void add_segment_edges(segment *seg)
1815 {
1816         int     is_grate, no_fade;
1817         ubyte   color;
1818         int     sn;
1819         int     segnum = seg-Segments;
1820         int     hidden_flag;
1821         int ttype,trigger_num;
1822
1823         for (sn=0;sn<MAX_SIDES_PER_SEGMENT;sn++) {
1824                 short   vertex_list[4];
1825
1826                 hidden_flag = 0;
1827
1828                 is_grate = 0;
1829                 no_fade = 0;
1830
1831                 color = 255;
1832                 if (seg->children[sn] == -1) {
1833                         color = Wall_normal_color;
1834                 }
1835
1836                 switch( Segment2s[segnum].special )     {
1837                 case SEGMENT_IS_FUELCEN:
1838                         color = BM_XRGB( 29, 27, 13 );
1839                         break;
1840                 case SEGMENT_IS_CONTROLCEN:
1841                         if (Control_center_present)
1842                                 color = BM_XRGB( 29, 0, 0 );
1843                         break;
1844                 case SEGMENT_IS_ROBOTMAKER:
1845                         color = BM_XRGB( 29, 0, 31 );
1846                         break;
1847                 }
1848
1849                 if (seg->sides[sn].wall_num > -1)       {
1850
1851                         trigger_num = Walls[seg->sides[sn].wall_num].trigger;
1852                         ttype = Triggers[trigger_num].type;
1853                         if (ttype==TT_SECRET_EXIT)
1854                                 {
1855                             color = BM_XRGB( 29, 0, 31 );
1856                                  no_fade=1;
1857                                  goto Here;
1858                                 }
1859
1860                         switch( Walls[seg->sides[sn].wall_num].type )   {
1861                         case WALL_DOOR:
1862                                 if (Walls[seg->sides[sn].wall_num].keys == KEY_BLUE) {
1863                                         no_fade = 1;
1864                                         color = Wall_door_blue;
1865                                         //mprintf((0, "Seg %i, side %i has BLUE wall\n", segnum, sn));
1866                                 } else if (Walls[seg->sides[sn].wall_num].keys == KEY_GOLD) {
1867                                         no_fade = 1;
1868                                         color = Wall_door_gold;
1869                                         //mprintf((0, "Seg %i, side %i has GOLD wall\n", segnum, sn));
1870                                 } else if (Walls[seg->sides[sn].wall_num].keys == KEY_RED) {
1871                                         no_fade = 1;
1872                                         color = Wall_door_red;
1873                                         //mprintf((0, "Seg %i, side %i has RED wall\n", segnum, sn));
1874                                 } else if (!(WallAnims[Walls[seg->sides[sn].wall_num].clip_num].flags & WCF_HIDDEN)) {
1875                                         int     connected_seg = seg->children[sn];
1876                                         if (connected_seg != -1) {
1877                                                 int connected_side = find_connect_side(seg, &Segments[connected_seg]);
1878                                                 int     keytype = Walls[Segments[connected_seg].sides[connected_side].wall_num].keys;
1879                                                 if ((keytype != KEY_BLUE) && (keytype != KEY_GOLD) && (keytype != KEY_RED))
1880                                                         color = Wall_door_color;
1881                                                 else {
1882                                                         switch (Walls[Segments[connected_seg].sides[connected_side].wall_num].keys) {
1883                                                                 case KEY_BLUE:  color = Wall_door_blue; no_fade = 1; break;
1884                                                                 case KEY_GOLD:  color = Wall_door_gold; no_fade = 1; break;
1885                                                                 case KEY_RED:   color = Wall_door_red;  no_fade = 1; break;
1886                                                                 default:        Error("Inconsistent data.  Supposed to be a colored wall, but not blue, gold or red.\n");
1887                                                         }
1888                                                         //mprintf((0, "Seg %i, side %i has a colored door on the other side.\n", segnum, sn));
1889                                                 }
1890
1891                                         }
1892                                 } else {
1893                                         color = Wall_normal_color;
1894                                         hidden_flag = 1;
1895                                         //mprintf((0, "Wall at seg:side %i:%i is hidden.\n", seg-Segments, sn));
1896                                 }
1897                                 break;
1898                         case WALL_CLOSED:
1899                                 // Make grates draw properly
1900                                 if (WALL_IS_DOORWAY(seg,sn) & WID_RENDPAST_FLAG)
1901                                         is_grate = 1;
1902                                 else
1903                                         hidden_flag = 1;
1904                                 color = Wall_normal_color;
1905                                 break;
1906                         case WALL_BLASTABLE:
1907                                 // Hostage doors
1908                                 color = Wall_door_color;
1909                                 break;
1910                         }
1911                 }
1912
1913                 if (segnum==Player_init[Player_num].segnum)
1914                         color = BM_XRGB(31,0,31);
1915
1916                 if ( color != 255 )     {
1917                         // If they have a map powerup, draw unvisited areas in dark blue.
1918                         if (Players[Player_num].flags & PLAYER_FLAGS_MAP_ALL && (!Automap_visited[segnum]))
1919                                 color = Wall_revealed_color;
1920
1921
1922                         Here:
1923
1924                         get_side_verts(vertex_list,segnum,sn);
1925                         add_one_edge( vertex_list[0], vertex_list[1], color, sn, segnum, hidden_flag, 0, no_fade );
1926                         add_one_edge( vertex_list[1], vertex_list[2], color, sn, segnum, hidden_flag, 0, no_fade );
1927                         add_one_edge( vertex_list[2], vertex_list[3], color, sn, segnum, hidden_flag, 0, no_fade );
1928                         add_one_edge( vertex_list[3], vertex_list[0], color, sn, segnum, hidden_flag, 0, no_fade );
1929
1930                         if ( is_grate ) {
1931                                 add_one_edge( vertex_list[0], vertex_list[2], color, sn, segnum, hidden_flag, 1, no_fade );
1932                                 add_one_edge( vertex_list[1], vertex_list[3], color, sn, segnum, hidden_flag, 1, no_fade );
1933                         }
1934                 }
1935         }
1936
1937 }
1938
1939
1940 // Adds all the edges from a segment we haven't visited yet.
1941
1942 void add_unknown_segment_edges(segment *seg)
1943 {
1944         int sn;
1945         int segnum = seg-Segments;
1946
1947         for (sn=0;sn<MAX_SIDES_PER_SEGMENT;sn++) {
1948                 short   vertex_list[4];
1949
1950                 // Only add edges that have no children
1951                 if (seg->children[sn] == -1) {
1952                         get_side_verts(vertex_list,segnum,sn);
1953
1954                         add_one_unknown_edge( vertex_list[0], vertex_list[1] );
1955                         add_one_unknown_edge( vertex_list[1], vertex_list[2] );
1956                         add_one_unknown_edge( vertex_list[2], vertex_list[3] );
1957                         add_one_unknown_edge( vertex_list[3], vertex_list[0] );
1958                 }
1959
1960
1961         }
1962
1963 }
1964
1965 void automap_build_edge_list()
1966 {
1967         int     i,e1,e2,s;
1968         Edge_info * e;
1969
1970         Automap_cheat = 0;
1971
1972         if ( Players[Player_num].flags & PLAYER_FLAGS_MAP_ALL_CHEAT )
1973                 Automap_cheat = 1;              // Damn cheaters...
1974
1975         // clear edge list
1976         for (i=0; i<Max_edges; i++) {
1977                 Edges[i].num_faces = 0;
1978                 Edges[i].flags = 0;
1979         }
1980         Num_edges = 0;
1981         Highest_edge_index = -1;
1982
1983         if (Automap_cheat || (Players[Player_num].flags & PLAYER_FLAGS_MAP_ALL) )       {
1984                 // Cheating, add all edges as visited
1985                 for (s=0; s<=Highest_segment_index; s++)
1986                         #ifdef EDITOR
1987                         if (Segments[s].segnum != -1)
1988                         #endif
1989                         {
1990                                 add_segment_edges(&Segments[s]);
1991                         }
1992         } else {
1993                 // Not cheating, add visited edges, and then unvisited edges
1994                 for (s=0; s<=Highest_segment_index; s++)
1995                         #ifdef EDITOR
1996                         if (Segments[s].segnum != -1)
1997                         #endif
1998                                 if (Automap_visited[s]) {
1999                                         add_segment_edges(&Segments[s]);
2000                                 }
2001
2002                 for (s=0; s<=Highest_segment_index; s++)
2003                         #ifdef EDITOR
2004                         if (Segments[s].segnum != -1)
2005                         #endif
2006                                 if (!Automap_visited[s]) {
2007                                         add_unknown_segment_edges(&Segments[s]);
2008                                 }
2009         }
2010
2011         // Find unnecessary lines (These are lines that don't have to be drawn because they have small curvature)
2012         for (i=0; i<=Highest_edge_index; i++ )  {
2013                 e = &Edges[i];
2014                 if (!(e->flags&EF_USED)) continue;
2015
2016                 for (e1=0; e1<e->num_faces; e1++ )      {
2017                         for (e2=1; e2<e->num_faces; e2++ )      {
2018                                 if ( (e1 != e2) && (e->segnum[e1] != e->segnum[e2]) )   {
2019                                         #ifdef COMPACT_SEGS
2020                                         vms_vector v1, v2;
2021                                         get_side_normal(&Segments[e->segnum[e1]], e->sides[e1], 0, &v1 );
2022                                         get_side_normal(&Segments[e->segnum[e2]], e->sides[e2], 0, &v2 );
2023                                         if ( vm_vec_dot(&v1,&v2) > (F1_0-(F1_0/10))  )  {
2024                                         #else
2025                                         if ( vm_vec_dot( &Segments[e->segnum[e1]].sides[e->sides[e1]].normals[0], &Segments[e->segnum[e2]].sides[e->sides[e2]].normals[0] ) > (F1_0-(F1_0/10))  )       {
2026                                         #endif
2027                                                 e->flags &= (~EF_DEFINING);
2028                                                 break;
2029                                         }
2030                                 }
2031                         }
2032                         if (!(e->flags & EF_DEFINING))
2033                                 break;
2034                 }
2035         }
2036
2037         mprintf( (0, "Automap used %d / %d edges\n", Num_edges, Max_edges  ));
2038
2039 }
2040
2041 char Marker_input [40];
2042 int Marker_index=0;
2043 ubyte DefiningMarkerMessage=0;
2044 ubyte MarkerBeingDefined;
2045 ubyte LastMarkerDropped;
2046
2047 void InitMarkerInput ()
2048  {
2049         int maxdrop,i;
2050
2051         //find free marker slot
2052
2053         if (Game_mode & GM_MULTI)
2054         maxdrop=MAX_DROP_MULTI;
2055         else
2056         maxdrop=MAX_DROP_SINGLE;
2057
2058         for (i=0;i<maxdrop;i++)
2059                 if (MarkerObject[(Player_num*2)+i] == -1)               //found free slot!
2060                         break;
2061
2062         if (i==maxdrop)         //no free slot
2063         {
2064                 if (Game_mode & GM_MULTI)
2065                         i = !LastMarkerDropped;         //in multi, replace older of two
2066                 else {
2067                         HUD_init_message("No free marker slots");
2068                         return;
2069                 }
2070         }
2071
2072         //got a free slot.  start inputting marker message
2073
2074         Marker_input[0]=0;
2075         Marker_index=0;
2076         DefiningMarkerMessage=1;
2077         MarkerBeingDefined = i;
2078  }
2079
2080 void MarkerInputMessage (int key)
2081  {
2082         switch( key )   {
2083         case KEY_F8:
2084         case KEY_ESC:
2085                 DefiningMarkerMessage = 0;
2086                 game_flush_inputs();
2087                 break;
2088         case KEY_LEFT:
2089         case KEY_BACKSP:
2090         case KEY_PAD4:
2091                 if (Marker_index > 0)
2092                         Marker_index--;
2093                 Marker_input[Marker_index] = 0;
2094                 break;
2095         case KEY_ENTER:
2096                 strcpy (MarkerMessage[(Player_num*2)+MarkerBeingDefined],Marker_input);
2097                 if (Game_mode & GM_MULTI)
2098                  strcpy (MarkerOwner[(Player_num*2)+MarkerBeingDefined],Players[Player_num].callsign);
2099                 DropMarker(MarkerBeingDefined);
2100                 LastMarkerDropped = MarkerBeingDefined;
2101                 game_flush_inputs();
2102                 DefiningMarkerMessage = 0;
2103                 break;
2104         default:
2105                 if ( key > 0 )
2106                  {
2107                   int ascii = key_to_ascii(key);
2108                   if ((ascii < 255 ))
2109                     if (Marker_index < 38 )
2110                       {
2111                         Marker_input[Marker_index++] = ascii;
2112                         Marker_input[Marker_index] = 0;
2113                       }
2114                  }
2115                 break;
2116
2117         }
2118  }
2119
2120
2121
2122