main/bm.c

   1 /*
   2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   3 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   6 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   8 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
   9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  12 */
  13
  14 /*
  15  * $Source: /cvs/cvsroot/d2x/main/bm.c,v $
  16  * $Revision: 1.5 $
  17  * $Author: bradleyb $
  18  * $Date: 2001-10-25 02:15:55 $
  19  *
  20  * Bitmap and palette loading functions.
  21  *
  22  * $Log: not supported by cvs2svn $
  23  * Revision 1.4  2001/10/19 08:06:20  bradleyb
  24  * Partial application of linux/alpha patch.  Courtesy of Falk Hueffner <falk.hueffner@student.uni-tuebingen.de>
  25  *
  26  *
  27  */
  28
  29 #ifdef HAVE_CONFIG_H
  30 #include <conf.h>
  31 #endif
  32
  33 #include <stdio.h>
  34 #include <stdlib.h>
  35
  36 #include "pstypes.h"
  37 #include "inferno.h"
  38 #include "gr.h"
  39 #include "bm.h"
  40 #include "u_mem.h"
  41 #include "mono.h"
  42 #include "error.h"
  43 #include "object.h"
  44 #include "vclip.h"
  45 #include "effects.h"
  46 #include "polyobj.h"
  47 #include "wall.h"
  48 #include "textures.h"
  49 #include "game.h"
  50 #ifdef NETWORK
  51 #include "multi.h"
  52 #endif
  53 #include "iff.h"
  54 #include "cfile.h"
  55 #include "powerup.h"
  56 #include "sounds.h"
  57 #include "piggy.h"
  58 #include "aistruct.h"
  59 #include "robot.h"
  60 #include "weapon.h"
  61 #include "gauges.h"
  62 #include "player.h"
  63 #include "endlevel.h"
  64 #include "cntrlcen.h"
  65 #include "byteswap.h"
  66
  67 ubyte Sounds[MAX_SOUNDS];
  68 ubyte AltSounds[MAX_SOUNDS];
  69
  70 #ifdef EDITOR
  71 int Num_total_object_types;
  72 byte    ObjType[MAX_OBJTYPE];
  73 byte    ObjId[MAX_OBJTYPE];
  74 fix     ObjStrength[MAX_OBJTYPE];
  75 #endif
  76
  77 //for each model, a model number for dying & dead variants, or -1 if none
  78 int Dying_modelnums[MAX_POLYGON_MODELS];
  79 int Dead_modelnums[MAX_POLYGON_MODELS];
  80
  81 //the polygon model number to use for the marker
  82 int     Marker_model_num = -1;
  83
  84 //right now there's only one player ship, but we can have another by
  85 //adding an array and setting the pointer to the active ship.
  86 player_ship only_player_ship,*Player_ship=&only_player_ship;
  87
  88 //----------------- Miscellaneous bitmap pointers ---------------
  89 int                                     Num_cockpits = 0;
  90 bitmap_index            cockpit_bitmap[N_COCKPIT_BITMAPS];
  91
  92 //---------------- Variables for wall textures ------------------
  93 int                                     Num_tmaps;
  94 tmap_info                       TmapInfo[MAX_TEXTURES];
  95
  96 //---------------- Variables for object textures ----------------
  97
  98 int                                     First_multi_bitmap_num=-1;
  99
 100 bitmap_index            ObjBitmaps[MAX_OBJ_BITMAPS];
 101 ushort                          ObjBitmapPtrs[MAX_OBJ_BITMAPS];         // These point back into ObjBitmaps, since some are used twice.
 102
 103 #ifdef PORTABLE_LOADER
 104 void read_tmap_info(CFILE *fp, int inNumTexturesToRead, int inOffset)
 105 {
 106         int i;
 107
 108         for (i = inOffset; i < (inNumTexturesToRead + inOffset); i++)
 109         {
 110                 TmapInfo[i].flags = cfile_read_byte(fp);
 111                 TmapInfo[i].pad[0] = cfile_read_byte(fp);
 112                 TmapInfo[i].pad[1] = cfile_read_byte(fp);
 113                 TmapInfo[i].pad[2] = cfile_read_byte(fp);
 114                 TmapInfo[i].lighting = cfile_read_fix(fp);
 115                 TmapInfo[i].damage = cfile_read_fix(fp);
 116                 TmapInfo[i].eclip_num = cfile_read_short(fp);
 117                 TmapInfo[i].destroyed = cfile_read_short(fp);
 118                 TmapInfo[i].slide_u = cfile_read_short(fp);
 119                 TmapInfo[i].slide_v = cfile_read_short(fp);
 120         }
 121 }
 122
 123 void read_vclip_info(CFILE *fp, int inNumVClipsToRead, int inOffset)
 124 {
 125         int i, j;
 126
 127         for (i = inOffset; i < (inNumVClipsToRead + inOffset); i++)
 128         {
 129                 Vclip[i].play_time = cfile_read_fix(fp);
 130                 Vclip[i].num_frames = cfile_read_int(fp);
 131                 Vclip[i].frame_time = cfile_read_fix(fp);
 132                 Vclip[i].flags = cfile_read_int(fp);
 133                 Vclip[i].sound_num = cfile_read_short(fp);
 134                 for (j = 0; j < VCLIP_MAX_FRAMES; j++)
 135                         Vclip[i].frames[j].index = cfile_read_short(fp);
 136                 Vclip[i].light_value = cfile_read_fix(fp);
 137         }
 138 }
 139
 140 void read_effect_info(CFILE *fp, int inNumEffectsToRead, int inOffset)
 141 {
 142         int i, j;
 143
 144
 145         for (i = inOffset; i < (inNumEffectsToRead + inOffset); i++)
 146         {
 147                 Effects[i].vc.play_time = cfile_read_fix(fp);
 148                 Effects[i].vc.num_frames = cfile_read_int(fp);
 149                 Effects[i].vc.frame_time = cfile_read_fix(fp);
 150                 Effects[i].vc.flags = cfile_read_int(fp);
 151                 Effects[i].vc.sound_num = cfile_read_short(fp);
 152                 for (j = 0; j < VCLIP_MAX_FRAMES; j++)
 153                         Effects[i].vc.frames[j].index = cfile_read_short(fp);
 154                 Effects[i].vc.light_value = cfile_read_fix(fp);
 155                 Effects[i].time_left = cfile_read_fix(fp);
 156                 Effects[i].frame_count = cfile_read_int(fp);
 157                 Effects[i].changing_wall_texture = cfile_read_short(fp);
 158                 Effects[i].changing_object_texture = cfile_read_short(fp);
 159                 Effects[i].flags = cfile_read_int(fp);
 160                 Effects[i].crit_clip = cfile_read_int(fp);
 161                 Effects[i].dest_bm_num = cfile_read_int(fp);
 162                 Effects[i].dest_vclip = cfile_read_int(fp);
 163                 Effects[i].dest_eclip = cfile_read_int(fp);
 164                 Effects[i].dest_size = cfile_read_fix(fp);
 165                 Effects[i].sound_num = cfile_read_int(fp);
 166                 Effects[i].segnum = cfile_read_int(fp);
 167                 Effects[i].sidenum = cfile_read_int(fp);
 168         }
 169 }
 170
 171 void read_wallanim_info(CFILE *fp, int inNumWallAnimsToRead, int inOffset)
 172 {
 173         int i, j;
 174
 175         for (i = inOffset; i < (inNumWallAnimsToRead + inOffset); i++)
 176         {
 177                 WallAnims[i].play_time = cfile_read_fix(fp);;
 178                 WallAnims[i].num_frames = cfile_read_short(fp);;
 179                 for (j = 0; j < MAX_CLIP_FRAMES; j++)
 180                         WallAnims[i].frames[j] = cfile_read_short(fp);
 181                 WallAnims[i].open_sound = cfile_read_short(fp);
 182                 WallAnims[i].close_sound = cfile_read_short(fp);
 183                 WallAnims[i].flags = cfile_read_short(fp);
 184                 cfread(WallAnims[i].filename, 13, 1, fp);
 185                 WallAnims[i].pad = cfile_read_byte(fp);
 186         }
 187 }
 188
 189 void read_robot_info(CFILE *fp, int inNumRobotsToRead, int inOffset)
 190 {
 191         int i, j, k;
 192
 193         for (i = inOffset; i < (inNumRobotsToRead + inOffset); i++)
 194         {
 195                 Robot_info[i].model_num = cfile_read_int(fp);
 196                 for (j = 0; j < MAX_GUNS; j++)
 197                         cfile_read_vector(&(Robot_info[i].gun_points[j]), fp);
 198                 for (j = 0; j < MAX_GUNS; j++)
 199                         Robot_info[i].gun_submodels[j] = cfile_read_byte(fp);
 200
 201                 Robot_info[i].exp1_vclip_num = cfile_read_short(fp);
 202                 Robot_info[i].exp1_sound_num = cfile_read_short(fp);
 203
 204                 Robot_info[i].exp2_vclip_num = cfile_read_short(fp);
 205                 Robot_info[i].exp2_sound_num = cfile_read_short(fp);
 206
 207                 Robot_info[i].weapon_type = cfile_read_byte(fp);
 208                 Robot_info[i].weapon_type2 = cfile_read_byte(fp);
 209                 Robot_info[i].n_guns = cfile_read_byte(fp);
 210                 Robot_info[i].contains_id = cfile_read_byte(fp);
 211
 212                 Robot_info[i].contains_count = cfile_read_byte(fp);
 213                 Robot_info[i].contains_prob = cfile_read_byte(fp);
 214                 Robot_info[i].contains_type = cfile_read_byte(fp);
 215                 Robot_info[i].kamikaze = cfile_read_byte(fp);
 216
 217                 Robot_info[i].score_value = cfile_read_short(fp);
 218                 Robot_info[i].badass = cfile_read_byte(fp);
 219                 Robot_info[i].energy_drain = cfile_read_byte(fp);
 220
 221                 Robot_info[i].lighting = cfile_read_fix(fp);
 222                 Robot_info[i].strength = cfile_read_fix(fp);
 223
 224                 Robot_info[i].mass = cfile_read_fix(fp);
 225                 Robot_info[i].drag = cfile_read_fix(fp);
 226
 227                 for (j = 0; j < NDL; j++)
 228                         Robot_info[i].field_of_view[j] = cfile_read_fix(fp);
 229                 for (j = 0; j < NDL; j++)
 230                         Robot_info[i].firing_wait[j] = cfile_read_fix(fp);
 231                 for (j = 0; j < NDL; j++)
 232                         Robot_info[i].firing_wait2[j] = cfile_read_fix(fp);
 233                 for (j = 0; j < NDL; j++)
 234                         Robot_info[i].turn_time[j] = cfile_read_fix(fp);
 235                 for (j = 0; j < NDL; j++)
 236                         Robot_info[i].max_speed[j] = cfile_read_fix(fp);
 237                 for (j = 0; j < NDL; j++)
 238                         Robot_info[i].circle_distance[j] = cfile_read_fix(fp);
 239                 for (j = 0; j < NDL; j++)
 240                         cfread(&(Robot_info[i].rapidfire_count[j]), sizeof(byte), 1, fp);
 241                 for (j = 0; j < NDL; j++)
 242                         cfread(&(Robot_info[i].evade_speed[j]), sizeof(byte), 1, fp);
 243                 Robot_info[i].cloak_type = cfile_read_byte(fp);
 244                 Robot_info[i].attack_type = cfile_read_byte(fp);
 245
 246                 Robot_info[i].see_sound = cfile_read_byte(fp);
 247                 Robot_info[i].attack_sound = cfile_read_byte(fp);
 248                 Robot_info[i].claw_sound = cfile_read_byte(fp);
 249                 Robot_info[i].taunt_sound = cfile_read_byte(fp);
 250
 251                 Robot_info[i].boss_flag = cfile_read_byte(fp);
 252                 Robot_info[i].companion = cfile_read_byte(fp);
 253                 Robot_info[i].smart_blobs = cfile_read_byte(fp);
 254                 Robot_info[i].energy_blobs = cfile_read_byte(fp);
 255
 256                 Robot_info[i].thief = cfile_read_byte(fp);
 257                 Robot_info[i].pursuit = cfile_read_byte(fp);
 258                 Robot_info[i].lightcast = cfile_read_byte(fp);
 259                 Robot_info[i].death_roll = cfile_read_byte(fp);
 260
 261                 Robot_info[i].flags = cfile_read_byte(fp);
 262                 Robot_info[i].pad[0] = cfile_read_byte(fp);
 263                 Robot_info[i].pad[1] = cfile_read_byte(fp);
 264                 Robot_info[i].pad[2] = cfile_read_byte(fp);
 265
 266                 Robot_info[i].deathroll_sound = cfile_read_byte(fp);
 267                 Robot_info[i].glow = cfile_read_byte(fp);
 268                 Robot_info[i].behavior = cfile_read_byte(fp);
 269                 Robot_info[i].aim = cfile_read_byte(fp);
 270
 271                 for (j = 0; j < MAX_GUNS + 1; j++) {
 272                         for (k = 0; k < N_ANIM_STATES; k++) {
 273                                 Robot_info[i].anim_states[j][k].n_joints = cfile_read_short(fp);
 274                                 Robot_info[i].anim_states[j][k].offset = cfile_read_short(fp);
 275                         }
 276                 }
 277
 278                 Robot_info[i].always_0xabcd = cfile_read_int(fp);
 279         }
 280 }
 281
 282 void read_robot_joint_info(CFILE *fp, int inNumRobotJointsToRead, int inOffset)
 283 {
 284         int i;
 285
 286         for (i = inOffset; i < (inNumRobotJointsToRead + inOffset); i++)
 287         {
 288                 Robot_joints[i].jointnum = cfile_read_short(fp);
 289                 cfile_read_angvec(&(Robot_joints[i].angles), fp);
 290         }
 291 }
 292
 293 void read_weapon_info(CFILE *fp, int inNumWeaponsToRead, int inOffset)
 294 {
 295         int i, j;
 296
 297         for (i = inOffset; i < (inNumWeaponsToRead + inOffset); i++)
 298         {
 299                 Weapon_info[i].render_type = cfile_read_byte(fp);
 300                 Weapon_info[i].persistent = cfile_read_byte(fp);
 301                 Weapon_info[i].model_num = cfile_read_short(fp);
 302                 Weapon_info[i].model_num_inner = cfile_read_short(fp);
 303
 304                 Weapon_info[i].flash_vclip = cfile_read_byte(fp);
 305                 Weapon_info[i].robot_hit_vclip = cfile_read_byte(fp);
 306                 Weapon_info[i].flash_sound = cfile_read_short(fp);
 307
 308                 Weapon_info[i].wall_hit_vclip = cfile_read_byte(fp);
 309                 Weapon_info[i].fire_count = cfile_read_byte(fp);
 310                 Weapon_info[i].robot_hit_sound = cfile_read_short(fp);
 311
 312                 Weapon_info[i].ammo_usage = cfile_read_byte(fp);
 313                 Weapon_info[i].weapon_vclip = cfile_read_byte(fp);
 314                 Weapon_info[i].wall_hit_sound = cfile_read_short(fp);
 315
 316                 Weapon_info[i].destroyable = cfile_read_byte(fp);
 317                 Weapon_info[i].matter = cfile_read_byte(fp);
 318                 Weapon_info[i].bounce = cfile_read_byte(fp);
 319                 Weapon_info[i].homing_flag = cfile_read_byte(fp);
 320
 321                 Weapon_info[i].speedvar = cfile_read_byte(fp);
 322                 Weapon_info[i].flags = cfile_read_byte(fp);
 323                 Weapon_info[i].flash = cfile_read_byte(fp);
 324                 Weapon_info[i].afterburner_size = cfile_read_byte(fp);
 325
 326                 Weapon_info[i].children = cfile_read_byte(fp);
 327
 328                 Weapon_info[i].energy_usage = cfile_read_fix(fp);
 329                 Weapon_info[i].fire_wait = cfile_read_fix(fp);
 330
 331                 Weapon_info[i].multi_damage_scale = cfile_read_fix(fp);
 332
 333                 Weapon_info[i].bitmap.index = cfile_read_short(fp);     // bitmap_index = short
 334
 335                 Weapon_info[i].blob_size = cfile_read_fix(fp);
 336                 Weapon_info[i].flash_size = cfile_read_fix(fp);
 337                 Weapon_info[i].impact_size = cfile_read_fix(fp);
 338                 for (j = 0; j < NDL; j++)
 339                         Weapon_info[i].strength[j] = cfile_read_fix(fp);
 340                 for (j = 0; j < NDL; j++)
 341                         Weapon_info[i].speed[j] = cfile_read_fix(fp);
 342                 Weapon_info[i].mass = cfile_read_fix(fp);
 343                 Weapon_info[i].drag = cfile_read_fix(fp);
 344                 Weapon_info[i].thrust = cfile_read_fix(fp);
 345                 Weapon_info[i].po_len_to_width_ratio = cfile_read_fix(fp);
 346                 Weapon_info[i].light = cfile_read_fix(fp);
 347                 Weapon_info[i].lifetime = cfile_read_fix(fp);
 348                 Weapon_info[i].damage_radius = cfile_read_fix(fp);
 349                 Weapon_info[i].picture.index = cfile_read_short(fp);            // bitmap_index is a short
 350                 Weapon_info[i].hires_picture.index = cfile_read_short(fp);              // bitmap_index is a short
 351         }
 352 }
 353
 354 void read_powerup_info(CFILE *fp, int inNumPowerupsToRead, int inOffset)
 355 {
 356         int i;
 357
 358         for (i = inOffset; i < (inNumPowerupsToRead + inOffset); i++)
 359         {
 360                 Powerup_info[i].vclip_num = cfile_read_int(fp);
 361                 Powerup_info[i].hit_sound = cfile_read_int(fp);
 362                 Powerup_info[i].size = cfile_read_fix(fp);
 363                 Powerup_info[i].light = cfile_read_fix(fp);
 364         }
 365 }
 366
 367 void read_polygon_models(CFILE *fp, int inNumPolygonModelsToRead, int inOffset)
 368 {
 369         int i, j;
 370
 371         for (i = inOffset; i < (inNumPolygonModelsToRead + inOffset); i++)
 372         {
 373                 Polygon_models[i].n_models = cfile_read_int(fp);
 374                 Polygon_models[i].model_data_size = cfile_read_int(fp);
 375                 Polygon_models[i].model_data = (ubyte *) cfile_read_int(fp);
 376                 for (j = 0; j < MAX_SUBMODELS; j++)
 377                         Polygon_models[i].submodel_ptrs[j] = cfile_read_int(fp);
 378                 for (j = 0; j < MAX_SUBMODELS; j++)
 379                         cfile_read_vector(&(Polygon_models[i].submodel_offsets[j]), fp);
 380                 for (j = 0; j < MAX_SUBMODELS; j++)
 381                         cfile_read_vector(&(Polygon_models[i].submodel_norms[j]), fp);
 382                 for (j = 0; j < MAX_SUBMODELS; j++)
 383                         cfile_read_vector(&(Polygon_models[i].submodel_pnts[j]), fp);
 384                 for (j = 0; j < MAX_SUBMODELS; j++)
 385                         Polygon_models[i].submodel_rads[j] = cfile_read_fix(fp);
 386                 for (j = 0; j < MAX_SUBMODELS; j++)
 387                         Polygon_models[i].submodel_parents[j] = cfile_read_byte(fp);
 388                 for (j = 0; j < MAX_SUBMODELS; j++)
 389                         cfile_read_vector(&(Polygon_models[i].submodel_mins[j]), fp);
 390                 for (j = 0; j < MAX_SUBMODELS; j++)
 391                         cfile_read_vector(&(Polygon_models[i].submodel_maxs[j]), fp);
 392                 cfile_read_vector(&(Polygon_models[i].mins), fp);
 393                 cfile_read_vector(&(Polygon_models[i].maxs), fp);
 394                 Polygon_models[i].rad = cfile_read_fix(fp);
 395                 Polygon_models[i].n_textures = cfile_read_byte(fp);
 396                 Polygon_models[i].first_texture = cfile_read_short(fp);
 397                 Polygon_models[i].simpler_model = cfile_read_byte(fp);
 398         }
 399 }
 400
 401 void read_player_ship(CFILE *fp)
 402 {
 403         int i;
 404
 405         only_player_ship.model_num = cfile_read_int(fp);
 406         only_player_ship.expl_vclip_num = cfile_read_int(fp);
 407         only_player_ship.mass = cfile_read_fix(fp);
 408         only_player_ship.drag = cfile_read_fix(fp);
 409         only_player_ship.max_thrust = cfile_read_fix(fp);
 410         only_player_ship.reverse_thrust = cfile_read_fix(fp);
 411         only_player_ship.brakes = cfile_read_fix(fp);
 412         only_player_ship.wiggle = cfile_read_fix(fp);
 413         only_player_ship.max_rotthrust = cfile_read_fix(fp);
 414         for (i = 0; i < N_PLAYER_GUNS; i++)
 415                 cfile_read_vector(&(only_player_ship.gun_points[i]), fp);
 416 }
 417
 418 void read_reactor_info(CFILE *fp, int inNumReactorsToRead, int inOffset)
 419 {
 420         int i, j;
 421
 422         for (i = inOffset; i < (inNumReactorsToRead + inOffset); i++)
 423         {
 424                 Reactors[i].model_num = cfile_read_int(fp);
 425                 Reactors[i].n_guns = cfile_read_int(fp);
 426                 for (j = 0; j < MAX_CONTROLCEN_GUNS; j++)
 427                         cfile_read_vector(&(Reactors[i].gun_points[j]), fp);
 428                 for (j = 0; j < MAX_CONTROLCEN_GUNS; j++)
 429                         cfile_read_vector(&(Reactors[i].gun_dirs[j]), fp);
 430         }
 431 }
 432
 433 #ifdef SHAREWARE
 434 extern int exit_modelnum,destroyed_exit_modelnum, Num_bitmap_files;
 435 int N_ObjBitmaps, extra_bitmap_num;
 436
 437 bitmap_index exitmodel_bm_load_sub( char * filename )
 438 {
 439         bitmap_index bitmap_num;
 440         grs_bitmap * new;
 441         ubyte newpal[256*3];
 442         int i, iff_error;               //reference parm to avoid warning message
 443
 444         bitmap_num.index = 0;
 445
 446         MALLOC( new, grs_bitmap, 1 );
 447         iff_error = iff_read_bitmap(filename,new,BM_LINEAR,newpal);
 448         new->bm_handle=0;
 449         if (iff_error != IFF_NO_ERROR)          {
 450                 Error("Error loading exit model bitmap <%s> - IFF error: %s",filename,iff_errormsg(iff_error));
 451         }
 452
 453         if ( iff_has_transparency )
 454                 gr_remap_bitmap_good( new, newpal, iff_transparent_color, 254 );
 455         else
 456                 gr_remap_bitmap_good( new, newpal, -1, 254 );
 457
 458         new->avg_color = 0;     //compute_average_pixel(new);
 459
 460         bitmap_num.index = extra_bitmap_num;
 461
 462         GameBitmaps[extra_bitmap_num++] = *new;
 463
 464         d_free( new );
 465         return bitmap_num;
 466 }
 467
 468 grs_bitmap *load_exit_model_bitmap(char *name)
 469 {
 470         Assert(N_ObjBitmaps < MAX_OBJ_BITMAPS);
 471
 472         {
 473                 ObjBitmaps[N_ObjBitmaps] = exitmodel_bm_load_sub(name);
 474                 if (GameBitmaps[ObjBitmaps[N_ObjBitmaps].index].bm_w!=64 || GameBitmaps[ObjBitmaps[N_ObjBitmaps].index].bm_h!=64)
 475                         Error("Bitmap <%s> is not 64x64",name);
 476                 ObjBitmapPtrs[N_ObjBitmaps] = N_ObjBitmaps;
 477                 N_ObjBitmaps++;
 478                 Assert(N_ObjBitmaps < MAX_OBJ_BITMAPS);
 479                 return &GameBitmaps[ObjBitmaps[N_ObjBitmaps-1].index];
 480         }
 481 }
 482
 483 void load_exit_models()
 484 {
 485         CFILE *exit_hamfile;
 486         int i, j;
 487         ubyte pal[768];
 488         int start_num;
 489
 490         start_num = N_ObjBitmaps;
 491         extra_bitmap_num = Num_bitmap_files;
 492         load_exit_model_bitmap("steel1.bbm");
 493         load_exit_model_bitmap("rbot061.bbm");
 494         load_exit_model_bitmap("rbot062.bbm");
 495
 496         load_exit_model_bitmap("steel1.bbm");
 497         load_exit_model_bitmap("rbot061.bbm");
 498         load_exit_model_bitmap("rbot063.bbm");
 499
 500         exit_hamfile = cfopen(":Data:exit.ham","rb");
 501
 502         exit_modelnum = N_polygon_models++;
 503         destroyed_exit_modelnum = N_polygon_models++;
 504
 505 #ifndef PORTABLE_LOADER
 506         cfread( &Polygon_models[exit_modelnum], sizeof(polymodel), 1, exit_hamfile );
 507         cfread( &Polygon_models[destroyed_exit_modelnum], sizeof(polymodel), 1, exit_hamfile );
 508         #else
 509         for (i = exit_modelnum; i <= destroyed_exit_modelnum; i++) {
 510                 Polygon_models[i].n_models = cfile_read_int(exit_hamfile);
 511                 Polygon_models[i].model_data_size = cfile_read_int(exit_hamfile);
 512                 Polygon_models[i].model_data = (ubyte *)read_int_swap(exit_hamfile);
 513                 for (j = 0; j < MAX_SUBMODELS; j++)
 514                         Polygon_models[i].submodel_ptrs[j] = cfile_read_int(exit_hamfile);
 515                 for (j = 0; j < MAX_SUBMODELS; j++)
 516                         cfile_read_vector(&(Polygon_models[i].submodel_offsets), exit_hamfile);
 517                 for (j = 0; j < MAX_SUBMODELS; j++)
 518                         cfile_read_vector(&(Polygon_models[i].submodel_norms), exit_hamfile);
 519                 for (j = 0; j < MAX_SUBMODELS; j++)
 520                         cfile_read_vector(&(Polygon_models[i].submodel_pnts), exit_hamfile);
 521                 for (j = 0; j < MAX_SUBMODELS; j++)
 522                         Polygon_models[i].submodel_rads[j] = cfile_read_fix(exit_hamfile);
 523                 for (j = 0; j < MAX_SUBMODELS; j++)
 524                         Polygon_models[i].submodel_parents[j] = cfile_read_byte(exit_hamfile);
 525                 for (j = 0; j < MAX_SUBMODELS; j++)
 526                         cfile_read_vector(&(Polygon_models[i].submodel_mins), exit_hamfile);
 527                 for (j = 0; j < MAX_SUBMODELS; j++)
 528                         cfile_read_vector(&(Polygon_models[i].submodel_maxs), exit_hamfile);
 529                 cfile_read_vector(&(Polygon_models[i].mins), exit_hamfile);
 530                 cfile_read_vector(&(Polygon_models[i].maxs), exit_hamfile);
 531                 Polygon_models[i].rad = cfile_read_fix(exit_hamfile);
 532                 Polygon_models[i].n_textures = cfile_read_byte(exit_hamfile);
 533                 Polygon_models[i].first_texture = cfile_read_short(exit_hamfile);
 534                 Polygon_models[i].simpler_model = cfile_read_byte(exit_hamfile);
 535         }
 536         Polygon_models[exit_modelnum].first_texture = start_num;
 537         Polygon_models[destroyed_exit_modelnum].first_texture = start_num+3;
 538         #endif
 539
 540         Polygon_models[exit_modelnum].model_data = d_malloc(Polygon_models[exit_modelnum].model_data_size);
 541         Assert( Polygon_models[exit_modelnum].model_data != NULL );
 542         cfread( Polygon_models[exit_modelnum].model_data, sizeof(ubyte), Polygon_models[exit_modelnum].model_data_size, exit_hamfile );
 543         #ifdef MACINTOSH
 544         swap_polygon_model_data(Polygon_models[exit_modelnum].model_data);
 545         #endif
 546         g3_init_polygon_model(Polygon_models[exit_modelnum].model_data);
 547
 548         Polygon_models[destroyed_exit_modelnum].model_data = d_malloc(Polygon_models[destroyed_exit_modelnum].model_data_size);
 549         Assert( Polygon_models[destroyed_exit_modelnum].model_data != NULL );
 550         cfread( Polygon_models[destroyed_exit_modelnum].model_data, sizeof(ubyte), Polygon_models[destroyed_exit_modelnum].model_data_size, exit_hamfile );
 551         #ifdef MACINTOSH
 552         swap_polygon_model_data(Polygon_models[destroyed_exit_modelnum].model_data);
 553         #endif
 554         g3_init_polygon_model(Polygon_models[destroyed_exit_modelnum].model_data);
 555
 556         cfclose(exit_hamfile);
 557
 558 }
 559 #endif          // SHAREWARE
 560
 561 #endif          // PORTABLE_LOADER
 562
 563 //-----------------------------------------------------------------
 564 // Read data from piggy.
 565 // This is called when the editor is OUT.
 566 // If editor is in, bm_init_use_table() is called.
 567 int bm_init()
 568 {
 569         init_polygon_models();
 570         if (! piggy_init())                             // This calls bm_read_all
 571                 Error("Cannot open pig and/or ham file");
 572
 573         piggy_read_sounds();
 574
 575         #ifdef SHAREWARE
 576         init_endlevel();                //this is in bm_init_use_tbl(), so I gues it goes here
 577         #endif
 578
 579         return 0;
 580 }
 581
 582 void bm_read_all(CFILE * fp)
 583 {
 584         int i,t;
 585
 586         NumTextures = cfile_read_int(fp);
 587 #ifndef PORTABLE_LOADER
 588         cfread( Textures, sizeof(bitmap_index), NumTextures, fp );
 589         cfread( TmapInfo, sizeof(tmap_info), NumTextures, fp );
 590 #else
 591         for (i = 0; i < NumTextures; i++)
 592                 Textures[i].index = cfile_read_short(fp);
 593         read_tmap_info(fp, NumTextures, 0);
 594 #endif
 595
 596         t = cfile_read_int(fp);
 597         cfread( Sounds, sizeof(ubyte), t, fp );
 598         cfread( AltSounds, sizeof(ubyte), t, fp );
 599
 600         Num_vclips = cfile_read_int(fp);
 601 #ifndef PORTABLE_LOADER
 602         cfread( Vclip, sizeof(vclip), Num_vclips, fp );
 603 #else
 604         read_vclip_info(fp, Num_vclips, 0);
 605 #endif
 606
 607         Num_effects = cfile_read_int(fp);
 608 #ifndef PORTABLE_LOADER
 609         cfread( Effects, sizeof(eclip), Num_effects, fp );
 610 #else
 611         read_effect_info(fp, Num_effects, 0);
 612 #endif
 613
 614         Num_wall_anims = cfile_read_int(fp);
 615 #ifndef PORTABLE_LOADER
 616         cfread( WallAnims, sizeof(wclip), Num_wall_anims, fp );
 617 #else
 618         read_wallanim_info(fp, Num_wall_anims, 0);
 619 #endif
 620
 621         N_robot_types = cfile_read_int(fp);
 622 #ifndef PORTABLE_LOADER
 623         cfread( Robot_info, sizeof(robot_info), N_robot_types, fp );
 624 #else
 625         read_robot_info(fp, N_robot_types, 0);
 626 #endif
 627         N_robot_joints = cfile_read_int(fp);
 628 #ifndef PORTABLE_LOADER
 629         cfread( Robot_joints, sizeof(jointpos), N_robot_joints, fp );
 630 #else
 631         read_robot_joint_info(fp, N_robot_joints, 0);
 632 #endif
 633
 634         N_weapon_types = cfile_read_int(fp);
 635 #ifndef PORTABLE_LOADER
 636         cfread( Weapon_info, sizeof(weapon_info), N_weapon_types, fp );
 637 #else
 638         read_weapon_info(fp, N_weapon_types, 0);
 639 #endif
 640
 641         N_powerup_types = cfile_read_int(fp);
 642 #ifndef PORTABLE_LOADER
 643         cfread( Powerup_info, sizeof(powerup_type_info), N_powerup_types, fp );
 644 #else
 645         read_powerup_info(fp, N_powerup_types, 0);
 646 #endif
 647
 648         N_polygon_models = cfile_read_int(fp);
 649 #ifndef PORTABLE_LOADER
 650         cfread( Polygon_models, sizeof(polymodel), N_polygon_models, fp );
 651 #else
 652         read_polygon_models(fp, N_polygon_models, 0);
 653 #endif
 654
 655         for (i=0; i<N_polygon_models; i++ )     {
 656                 Polygon_models[i].model_data = d_malloc(Polygon_models[i].model_data_size);
 657                 Assert( Polygon_models[i].model_data != NULL );
 658                 cfread( Polygon_models[i].model_data, sizeof(ubyte), Polygon_models[i].model_data_size, fp );
 659 #ifdef MACINTOSH
 660                 swap_polygon_model_data(Polygon_models[i].model_data);
 661 #endif
 662                 g3_init_polygon_model(Polygon_models[i].model_data);
 663         }
 664
 665         cfread( Dying_modelnums, sizeof(int), N_polygon_models, fp );
 666         cfread( Dead_modelnums, sizeof(int), N_polygon_models, fp );
 667 #ifdef MACINTOSH
 668         for (i = 0; i < N_polygon_models; i++)
 669                 Dying_modelnums[i]= SWAPINT(Dying_modelnums[i]);
 670         for (i = 0; i < N_polygon_models; i++)
 671                 Dead_modelnums[i]= SWAPINT(Dead_modelnums[i]);
 672 #endif
 673
 674         t = cfile_read_int(fp);
 675         cfread( Gauges, sizeof(bitmap_index), t, fp );
 676         cfread( Gauges_hires, sizeof(bitmap_index), t, fp );
 677 #ifdef MACINTOSH
 678         for (i = 0; i < t; i++) {
 679                 Gauges[i].index = SWAPSHORT(Gauges[i].index);
 680                 Gauges_hires[i].index = SWAPSHORT(Gauges_hires[i].index);
 681         }
 682 #endif
 683
 684         t = cfile_read_int(fp);
 685         cfread( ObjBitmaps, sizeof(bitmap_index), t, fp );
 686         cfread( ObjBitmapPtrs, sizeof(ushort), t, fp );
 687
 688 #ifdef MACINTOSH
 689 #ifdef SHAREWARE
 690         N_ObjBitmaps = t;
 691 #endif
 692         for (i = 0; i < t; i++) {
 693                 ObjBitmaps[i].index = SWAPSHORT(ObjBitmaps[i].index);
 694                 ObjBitmapPtrs[i] = SWAPSHORT(ObjBitmapPtrs[i]);
 695         }
 696 #endif
 697
 698 #ifndef PORTABLE_LOADER
 699         cfread( &only_player_ship, sizeof(player_ship), 1, fp );
 700 #else
 701         read_player_ship(fp);
 702 #endif
 703
 704         Num_cockpits = cfile_read_int(fp);
 705         cfread( cockpit_bitmap, sizeof(bitmap_index), Num_cockpits, fp );
 706 #ifdef PORTABLE_LOADER
 707         for (i = 0; i < Num_cockpits; i++)
 708                 cockpit_bitmap[i].index = SWAPSHORT(cockpit_bitmap[i].index);
 709 #endif
 710
 711 //@@    cfread( &Num_total_object_types, sizeof(int), 1, fp );
 712 //@@    cfread( ObjType, sizeof(byte), Num_total_object_types, fp );
 713 //@@    cfread( ObjId, sizeof(byte), Num_total_object_types, fp );
 714 //@@    cfread( ObjStrength, sizeof(fix), Num_total_object_types, fp );
 715
 716         First_multi_bitmap_num = cfile_read_int(fp);
 717
 718         Num_reactors = cfile_read_int(fp);
 719 #ifndef MACINTOSH
 720         cfread( Reactors, sizeof(*Reactors), Num_reactors, fp);
 721 #else
 722         read_reactor_info(fp, Num_reactors, 0);
 723 #endif
 724
 725         Marker_model_num = cfile_read_int(fp);
 726
 727         //@@cfread( &N_controlcen_guns, sizeof(int), 1, fp );
 728         //@@cfread( controlcen_gun_points, sizeof(vms_vector), N_controlcen_guns, fp );
 729         //@@cfread( controlcen_gun_dirs, sizeof(vms_vector), N_controlcen_guns, fp );
 730
 731         #ifdef SHAREWARE
 732         exit_modelnum = cfile_read_int(fp);
 733         destroyed_exit_modelnum = cfile_read_int(fp);
 734         #endif
 735
 736 }
 737
 738
 739 //these values are the number of each item in the release of d2
 740 //extra items added after the release get written in an additional hamfile
 741 #define N_D2_ROBOT_TYPES                66
 742 #define N_D2_ROBOT_JOINTS               1145
 743 #define N_D2_POLYGON_MODELS             166
 744 #define N_D2_OBJBITMAPS                 422
 745 #define N_D2_OBJBITMAPPTRS              502
 746 #define N_D2_WEAPON_TYPES               62
 747
 748 //type==1 means 1.1, type==2 means 1.2 (with weaons)
 749 void bm_read_extra_robots(char *fname,int type)
 750 {
 751         CFILE *fp;
 752         int t,i;
 753         int version;
 754
 755         #ifdef MACINTOSH
 756                 ulong varSave = 0;
 757         #endif
 758
 759         fp = cfopen(fname,"rb");
 760
 761         if (type == 2) {
 762                 int sig;
 763
 764                 sig = cfile_read_int(fp);
 765                 if (sig != 0x5848414d) /* 'XHAM' */
 766                         return;
 767                 version = cfile_read_int(fp);
 768         }
 769         else
 770                 version = 0;
 771
 772         //read extra weapons
 773
 774         t = cfile_read_int(fp);
 775         N_weapon_types = N_D2_WEAPON_TYPES+t;
 776         if (N_weapon_types >= MAX_WEAPON_TYPES)
 777                 Error("Too many weapons (%d) in <%s>.  Max is %d.",t,fname,MAX_WEAPON_TYPES-N_D2_WEAPON_TYPES);
 778         #ifdef MACINTOSH
 779                 read_weapon_info(fp, t, N_D2_WEAPON_TYPES);
 780         #else
 781                 cfread( &Weapon_info[N_D2_WEAPON_TYPES], sizeof(weapon_info), t, fp );
 782         #endif
 783
 784         //now read robot info
 785
 786         t = cfile_read_int(fp);
 787         N_robot_types = N_D2_ROBOT_TYPES+t;
 788         if (N_robot_types >= MAX_ROBOT_TYPES)
 789                 Error("Too many robots (%d) in <%s>.  Max is %d.",t,fname,MAX_ROBOT_TYPES-N_D2_ROBOT_TYPES);
 790         #ifdef MACINTOSH
 791                 read_robot_info(fp, t, N_D2_ROBOT_TYPES);
 792         #else
 793                 cfread( &Robot_info[N_D2_ROBOT_TYPES], sizeof(robot_info), t, fp );
 794         #endif
 795
 796         t = cfile_read_int(fp);
 797         N_robot_joints = N_D2_ROBOT_JOINTS+t;
 798         if (N_robot_joints >= MAX_ROBOT_JOINTS)
 799                 Error("Too many robot joints (%d) in <%s>.  Max is %d.",t,fname,MAX_ROBOT_JOINTS-N_D2_ROBOT_JOINTS);
 800         #ifdef MACINTOSH
 801                 read_robot_joint_info(fp, t, N_D2_ROBOT_JOINTS);
 802         #else
 803                 cfread( &Robot_joints[N_D2_ROBOT_JOINTS], sizeof(jointpos), t, fp );
 804         #endif
 805
 806         t = cfile_read_int(fp);
 807         N_polygon_models = N_D2_POLYGON_MODELS+t;
 808         if (N_polygon_models >= MAX_POLYGON_MODELS)
 809                 Error("Too many polygon models (%d) in <%s>.  Max is %d.",t,fname,MAX_POLYGON_MODELS-N_D2_POLYGON_MODELS);
 810         #ifdef MACINTOSH
 811                 read_polygon_models(fp, t, N_D2_POLYGON_MODELS);
 812         #else
 813                 cfread( &Polygon_models[N_D2_POLYGON_MODELS], sizeof(polymodel), t, fp );
 814         #endif
 815
 816         for (i=N_D2_POLYGON_MODELS; i<N_polygon_models; i++ )
 817         {
 818                 Polygon_models[i].model_data = d_malloc(Polygon_models[i].model_data_size);
 819                 Assert( Polygon_models[i].model_data != NULL );
 820                 cfread( Polygon_models[i].model_data, sizeof(ubyte), Polygon_models[i].model_data_size, fp );
 821
 822                 #ifdef MACINTOSH
 823                         swap_polygon_model_data(Polygon_models[i].model_data);
 824                 #endif
 825
 826                 g3_init_polygon_model(Polygon_models[i].model_data);
 827         }
 828
 829         cfread( &Dying_modelnums[N_D2_POLYGON_MODELS], sizeof(int), t, fp );
 830         cfread( &Dead_modelnums[N_D2_POLYGON_MODELS], sizeof(int), t, fp );
 831
 832         #ifdef MACINTOSH
 833                 for (i = N_D2_POLYGON_MODELS; i < N_polygon_models; i++)
 834                 {
 835                         Dying_modelnums[i]= SWAPINT(Dying_modelnums[i]);
 836                         Dead_modelnums[i]= SWAPINT(Dead_modelnums[i]);
 837                 }
 838         #endif
 839
 840         t = cfile_read_int(fp);
 841         if (N_D2_OBJBITMAPS+t >= MAX_OBJ_BITMAPS)
 842                 Error("Too many object bitmaps (%d) in <%s>.  Max is %d.",t,fname,MAX_OBJ_BITMAPS-N_D2_OBJBITMAPS);
 843         cfread( &ObjBitmaps[N_D2_OBJBITMAPS], sizeof(bitmap_index), t, fp );
 844         #ifdef MACINTOSH
 845                 for (i = N_D2_OBJBITMAPS; i < (N_D2_OBJBITMAPS + t); i++)
 846                 {
 847                         ObjBitmaps[i].index = SWAPSHORT(ObjBitmaps[i].index);
 848                 }
 849         #endif
 850
 851         t = cfile_read_int(fp);
 852         if (N_D2_OBJBITMAPPTRS+t >= MAX_OBJ_BITMAPS)
 853                 Error("Too many object bitmap pointers (%d) in <%s>.  Max is %d.",t,fname,MAX_OBJ_BITMAPS-N_D2_OBJBITMAPPTRS);
 854         cfread( &ObjBitmapPtrs[N_D2_OBJBITMAPPTRS], sizeof(ushort), t, fp );
 855         #ifdef MACINTOSH
 856                 for (i = N_D2_OBJBITMAPPTRS; i < (N_D2_OBJBITMAPPTRS + t); i++)
 857                 {
 858                         ObjBitmapPtrs[i] = SWAPSHORT(ObjBitmapPtrs[i]);
 859                 }
 860         #endif
 861
 862         cfclose(fp);
 863 }
 864
 865 extern void change_filename_extension( char *dest, char *src, char *new_ext );
 866
 867 int Robot_replacements_loaded = 0;
 868
 869 void load_robot_replacements(char *level_name)
 870 {
 871         CFILE *fp;
 872         int t,i,j;
 873         char ifile_name[FILENAME_LEN];
 874
 875         change_filename_extension(ifile_name, level_name, ".HXM" );
 876
 877         fp = cfopen(ifile_name,"rb");
 878
 879         if (!fp)                //no robot replacement file
 880                 return;
 881
 882         t = cfile_read_int(fp);                 //read id "HXM!"
 883         if (t!= 0x21584d48)
 884                 Error("ID of HXM! file incorrect");
 885
 886         t = cfile_read_int(fp);                 //read version
 887         if (t<1)
 888                 Error("HXM! version too old (%d)",t);
 889
 890         t = cfile_read_int(fp);                 //read number of robots
 891         for (j=0;j<t;j++) {
 892                 i = cfile_read_int(fp);         //read robot number
 893            if (i<0 || i>=N_robot_types)
 894                         Error("Robots number (%d) out of range in (%s).  Range = [0..%d].",i,level_name,N_robot_types-1);
 895                 #ifdef MACINTOSH
 896                         read_robot_info(fp, 1, i);
 897                 #else
 898                         cfread( &Robot_info[i], sizeof(robot_info), 1, fp );
 899                 #endif
 900         }
 901
 902         t = cfile_read_int(fp);                 //read number of joints
 903         for (j=0;j<t;j++) {
 904                 i = cfile_read_int(fp);         //read joint number
 905                 if (i<0 || i>=N_robot_joints)
 906                         Error("Robots joint (%d) out of range in (%s).  Range = [0..%d].",i,level_name,N_robot_joints-1);
 907                 #ifdef MACINTOSH
 908                         read_robot_joint_info(fp, 1, i);
 909                 #else
 910                         cfread( &Robot_joints[i], sizeof(jointpos), 1, fp );
 911                 #endif
 912         }
 913
 914         t = cfile_read_int(fp);                 //read number of polygon models
 915         for (j=0;j<t;j++)
 916         {
 917                 i = cfile_read_int(fp);         //read model number
 918                 if (i<0 || i>=N_polygon_models)
 919                         Error("Polygon model (%d) out of range in (%s).  Range = [0..%d].",i,level_name,N_polygon_models-1);
 920
 921                 #ifdef MACINTOSH
 922                         read_polygon_models(fp, 1, i);
 923                 #else
 924                         cfread( &Polygon_models[i], sizeof(polymodel), 1, fp );
 925                 #endif
 926
 927                 d_free(Polygon_models[i].model_data);
 928                 Polygon_models[i].model_data = d_malloc(Polygon_models[i].model_data_size);
 929                 Assert( Polygon_models[i].model_data != NULL );
 930
 931                 cfread( Polygon_models[i].model_data, sizeof(ubyte), Polygon_models[i].model_data_size, fp );
 932                 #ifdef MACINTOSH
 933                         swap_polygon_model_data(Polygon_models[i].model_data);
 934                 #endif
 935                 g3_init_polygon_model(Polygon_models[i].model_data);
 936
 937                 Dying_modelnums[i] = cfile_read_int(fp);
 938                 Dead_modelnums[i] = cfile_read_int(fp);
 939         }
 940
 941         t = cfile_read_int(fp);                 //read number of objbitmaps
 942         for (j=0;j<t;j++) {
 943                 i = cfile_read_int(fp);         //read objbitmap number
 944                 if (i<0 || i>=MAX_OBJ_BITMAPS)
 945                         Error("Object bitmap number (%d) out of range in (%s).  Range = [0..%d].",i,level_name,MAX_OBJ_BITMAPS-1);
 946                 ObjBitmaps[i].index = cfile_read_short(fp);
 947         }
 948
 949         t = cfile_read_int(fp);                 //read number of objbitmapptrs
 950         for (j=0;j<t;j++) {
 951                 i = cfile_read_int(fp);         //read objbitmapptr number
 952                 if (i<0 || i>=MAX_OBJ_BITMAPS)
 953                         Error("Object bitmap pointer (%d) out of range in (%s).  Range = [0..%d].",i,level_name,MAX_OBJ_BITMAPS-1);
 954                 ObjBitmapPtrs[i] = cfile_read_short(fp);
 955         }
 956
 957         cfclose(fp);
 958 }