fix texture loading mistake.

[taylor/freespace2.git] / src / nebula / neb.cpp

/*
 * $Logfile: /Freespace2/code/Nebula/Neb.cpp $
 * $Revision$
 * $Date$
 * $Author$
 *
 * Nebula effect
 *
 * $Log$
 * Revision 1.5  2002/06/01 03:32:00  relnev
 * fix texture loading mistake.
 *
 * enable some d3d stuff for opengl also
 *
 * Revision 1.4  2002/05/26 20:22:48  theoddone33
 * Most of network/ works
 *
 * Revision 1.3  2002/05/07 03:16:47  theoddone33
 * The Great Newline Fix
 *
 * Revision 1.2  2002/05/04 04:36:56  theoddone33
 * More changes, took out a lot of the sound stuff which will bite later but
 * I don't care.
 *
 * Revision 1.1.1.1  2002/05/03 03:28:10  root
 * Initial import.
 * 
 * 
 * 50    8/30/99 5:01p Dave
 * Made d3d do less state changing in the nebula. Use new chat server for
 * PXO.
 * 
 * 49    8/10/99 6:54p Dave
 * Mad optimizations. Added paging to the nebula effect.
 * 
 * 48    8/05/99 2:05a Dave
 * Whee.
 * 
 * 47    7/30/99 10:55a Anoop
 * Hmm. Fixed release build problem again, with area-rotated bitmaps.
 * 
 * 46    7/29/99 10:47p Dave
 * Standardized D3D fogging using vertex fog. Shook out Savage 4 bugs.
 * 
 * 44    7/29/99 12:05a Dave
 * Nebula speed optimizations.
 * 
 * 43    7/19/99 7:20p Dave
 * Beam tooling. Specialized player-killed-self messages. Fixed d3d nebula
 * pre-rendering.
 * 
 * 42    7/18/99 5:20p Dave
 * Jump node icon. Fixed debris fogging. Framerate warning stuff.
 * 
 * 41    7/13/99 1:15p Dave
 * 32 bit support. Whee!
 * 
 * 40    7/09/99 5:54p Dave
 * Seperated cruiser types into individual types. Added tons of new
 * briefing icons. Campaign screen.
 * 
 * 39    7/07/99 10:44a Jamesa
 * Make sure the nebula regens properly after loading a mission.
 * 
 * 38    6/11/99 2:32p Dave
 * Toned down nebula brightness a bit.
 * 
 * 37    5/26/99 3:39p Dave
 * Fixed nebula regeneration problem. Removed optimizations from
 * neblightning.cpp
 * 
 * 36    5/26/99 11:46a Dave
 * Added ship-blasting lighting and made the randomization of lighting
 * much more customizable.
 * 
 * 35    5/24/99 5:45p Dave
 * Added detail levels to the nebula, with a decent speedup. Split nebula
 * lightning into its own section.
 * 
 * $NoKeywords: $
 */

#include "neb.h"
#include "vecmat.h"
#include "3d.h"
#include "bmpman.h"
#include "2d.h"
#include "object.h"
#ifndef PLAT_UNIX
#include "glide.h"
#endif
#include "timer.h"
#include "multi.h"
#include "freespace.h"
#include "key.h"
#include "nebula.h"
#include "starfield.h"
#include "parselo.h"
#include "beam.h"
#include "sound.h"
#include "gamesnd.h"
#include "grinternal.h"

#include "alphacolors.h"

// --------------------------------------------------------------------------------------------------------
// NEBULA DEFINES/VARS
//

// #define NEB2_THUMBNAIL

/*
3D CARDS THAT FOG PROPERLY
Voodoo1
Voodoo2
G200
TNT

3D CARDS THAT DON'T FOG PROPERLY
Permedia2
AccelStar II
*/

// if nebula rendering is active (DCF stuff - not mission specific)
int Neb2_render_mode = NEB2_RENDER_NONE;

// array of neb2 poofs
char Neb2_poof_filenames[MAX_NEB2_POOFS][MAX_FILENAME_LEN] = {
        "", "", "", "", "", ""
};
int Neb2_poofs[MAX_NEB2_POOFS] = { -1, -1, -1, -1, -1, -1 };
int Neb2_poof_flags = ( (1<<0) | (1<<1) | (1<<2) | (1<<3) | (1<<4) | (1<<5) );
int Neb2_poof_count = 0;

// array of neb2 bitmaps
char Neb2_bitmap_filenames[MAX_NEB2_BITMAPS][MAX_FILENAME_LEN] = {
        "", "", "", "", "", ""
};
int Neb2_bitmap[MAX_NEB2_BITMAPS] = { -1, -1, -1, -1, -1, -1 };
int Neb2_bitmap_count = 0;

// texture to use for this level
char Neb2_texture_name[MAX_FILENAME_LEN] = "";

// nebula flags
#define NF_USED                                         (1<<0)          // if this nebula slot is used

float max_rotation = 3.75f;
float neb2_flash_fade = 0.3f;

// fog values for different ship types
float Neb_ship_fog_vals_glide[MAX_SHIP_TYPE_COUNTS][2] = {
        {0.0f, 0.0f},                           // SHIP_TYPE_NONE
        {10.0f, 500.0f},                        // SHIP_TYPE_CARGO
        {10.0f, 500.0f},                        // SHIP_TYPE_FIGHTER_BOMBER
        {10.0f, 600.0f},                        // SHIP_TYPE_CRUISER
        {10.0f, 600.0f},                        // SHIP_TYPE_FREIGHTER
        {10.0f, 750.0f},                        // SHIP_TYPE_CAPITAL
        {10.0f, 500.0f},                        // SHIP_TYPE_TRANSPORT
        {10.0f, 500.0f},                        // SHIP_TYPE_REPAIR_REARM
        {10.0f, 500.0f},                        // SHIP_TYPE_NAVBUOY
        {10.0f, 500.0f},                        // SHIP_TYPE_SENTRYGUN
        {10.0f, 600.0f},                        // SHIP_TYPE_ESCAPEPOD
        {10.0f, 1000.0f},                       // SHIP_TYPE_SUPERCAP
        {10.0f, 500.0f},                        // SHIP_TYPE_STEALTH
        {10.0f, 500.0f},                        // SHIP_TYPE_FIGHTER
        {10.0f, 500.0f},                        // SHIP_TYPE_BOMBER
        {10.0f, 750.0f},                        // SHIP_TYPE_DRYDOCK
        {10.0f, 600.0f},                        // SHIP_TYPE_AWACS
        {10.0f, 600.0f},                        // SHIP_TYPE_GAS_MINER
        {10.0f, 600.0f},                        // SHIP_TYPE_CORVETTE
        {10.0f, 1000.0f},                       // SHIP_TYPE_KNOSSOS_DEVICE
};
float Neb_ship_fog_vals_d3d[MAX_SHIP_TYPE_COUNTS][2] = {
        {0.0f, 0.0f},                           // SHIP_TYPE_NONE
        {10.0f, 500.0f},                        // SHIP_TYPE_CARGO
        {10.0f, 500.0f},                        // SHIP_TYPE_FIGHTER_BOMBER
        {10.0f, 600.0f},                        // SHIP_TYPE_CRUISER
        {10.0f, 600.0f},                        // SHIP_TYPE_FREIGHTER
        {10.0f, 750.0f},                        // SHIP_TYPE_CAPITAL
        {10.0f, 500.0f},                        // SHIP_TYPE_TRANSPORT
        {10.0f, 500.0f},                        // SHIP_TYPE_REPAIR_REARM
        {10.0f, 500.0f},                        // SHIP_TYPE_NAVBUOY
        {10.0f, 500.0f},                        // SHIP_TYPE_SENTRYGUN
        {10.0f, 600.0f},                        // SHIP_TYPE_ESCAPEPOD
        {10.0f, 1000.0f},                       // SHIP_TYPE_SUPERCAP
        {10.0f, 500.0f},                        // SHIP_TYPE_STEALTH
        {10.0f, 500.0f},                        // SHIP_TYPE_FIGHTER
        {10.0f, 500.0f},                        // SHIP_TYPE_BOMBER
        {10.0f, 750.0f},                        // SHIP_TYPE_DRYDOCK
        {10.0f, 600.0f},                        // SHIP_TYPE_AWACS
        {10.0f, 600.0f},                        // SHIP_TYPE_GAS_MINER
        {10.0f, 600.0f},                        // SHIP_TYPE_CORVETTE
        {10.0f, 1000.0f},                       // SHIP_TYPE_KNOSSOS_DEVICE
};

// fog near and far values for rendering the background nebula
#define NEB_BACKG_FOG_NEAR_GLIDE                                2.5f
#define NEB_BACKG_FOG_NEAR_D3D                          4.5f
#define NEB_BACKG_FOG_FAR_GLIDE                         10.0f
#define NEB_BACKG_FOG_FAR_D3D                                   10.0f
float Neb_backg_fog_near = NEB_BACKG_FOG_NEAR_GLIDE;
float Neb_backg_fog_far = NEB_BACKG_FOG_FAR_GLIDE;

// stats
int pneb_tried = 0;                             // total pnebs tried to render
int pneb_tossed_alpha = 0;              // pnebs tossed because of alpha optimization
int pneb_tossed_dot = 0;                // pnebs tossed because of dot product
int pneb_tossed_off = 0;                // pnebs tossed because of being offscree
int neb_tried = 0;                              // total nebs tried
int neb_tossed_alpha = 0;               // nebs tossed because of alpha
int neb_tossed_dot = 0;                 // nebs tossed because of dot product
int neb_tossed_count = 0;               // nebs tossed because of max render count 

// the AWACS suppresion level for the nebula
float Neb2_awacs = -1.0f;

// how many "slices" are in the current player nebuls
int Neb2_slices = 5;

cube_poof Neb2_cubes[MAX_CPTS][MAX_CPTS][MAX_CPTS];

// nebula detail level
typedef struct neb2_detail {
        float max_alpha_glide;                                  // max alpha for this detail level in Glide
        float max_alpha_d3d;                                            // max alpha for this detail level in D3d
        float break_alpha;                                              // break alpha (below which, poofs don't draw). this affects the speed and visual quality a lot
        float break_x, break_y;                                 // x and y alpha fade/break values. adjust alpha on the polys as they move offscreen 
        float cube_dim;                                                 // total dimension of player poof cube
        float cube_inner;                                                       // inner radius of the player poof cube
        float cube_outer;                                                       // outer radius of the player pood cube
        float prad;                                                                     // radius of the poofs
        float wj, hj, dj;                                                       // width, height, depth jittering. best left at 1.0     
} neb2_detail;
neb2_detail     Neb2_detail[MAX_DETAIL_LEVEL] = {
        { // lowest detail level
                0.575f,                                                                         // max alpha for this detail level in Glide
                0.71f,                                                                  // max alpha for this detail level in D3d
                0.13f,                                                                  // break alpha (below which, poofs don't draw). this affects the speed and visual quality a lot
                150.0f, 150.0f / 1.3333f,                       // x and y alpha fade/break values. adjust alpha on the polys as they move offscreen 
                510.0f,                                                                 // total dimension of player poof cube
                50.0f,                                                                  // inner radius of the player poof cube
                250.0f,                                                                 // outer radius of the player pood cube
                120.0f,                                                                 // radius of the poofs
                1.0f, 1.0f, 1.0f                                                // width, height, depth jittering. best left at 1.0     
        },      
        { // 2nd lowest detail level
                0.575f,                                                                         // max alpha for this detail level in Glide
                0.71f,                                                                  // max alpha for this detail level in D3d
                0.125f,                                                                 // break alpha (below which, poofs don't draw). this affects the speed and visual quality a lot
                300.0f, 300.0f / 1.3333f,                       // x and y alpha fade/break values. adjust alpha on the polys as they move offscreen 
                550.0f,                                                                 // total dimension of player poof cube
                100.0f,                                                                 // inner radius of the player poof cube
                250.0f,                                                                 // outer radius of the player pood cube
                125.0f,                                                                 // radius of the poofs
                1.0f, 1.0f, 1.0f                                                // width, height, depth jittering. best left at 1.0     
        },
        { // 2nd highest detail level
                0.575f,                                                                         // max alpha for this detail level in Glide
                0.71f,                                                                  // max alpha for this detail level in D3d
                0.1f,                                                                           // break alpha (below which, poofs don't draw). this affects the speed and visual quality a lot
                300.0f, 300.0f / 1.3333f,                       // x and y alpha fade/break values. adjust alpha on the polys as they move offscreen 
                550.0f,                                                                 // total dimension of player poof cube
                150.0f,                                                                 // inner radius of the player poof cube
                250.0f,                                                                 // outer radius of the player pood cube
                125.0f,                                                                 // radius of the poofs
                1.0f, 1.0f, 1.0f                                                // width, height, depth jittering. best left at 1.0     
        },
        { // higest detail level
                0.475f,                                                                 // max alpha for this detail level in Glide
                0.575f,                                                                 // max alpha for this detail level in D3d
                0.05f,                                                                  // break alpha (below which, poofs don't draw). this affects the speed and visual quality a lot
                200.0f, 200.0f / 1.3333f,                       // x and y alpha fade/break values. adjust alpha on the polys as they move offscreen 
                750.0f,                                                                 // total dimension of player poof cube
                200.0f,                                                                 // inner radius of the player poof cube
                360.0f,                                                                 // outer radius of the player pood cube
                150.0f,                                                                 // radius of the poofs
                1.0f, 1.0f, 1.0f                                                // width, height, depth jittering. best left at 1.0     
        },              
};
neb2_detail *Nd = &Neb2_detail[MAX_DETAIL_LEVEL - 2];

int Neb2_background_color[3] = {0, 0, 255};                     // rgb background color (used for lame rendering)

int Neb2_regen = 0;

// --------------------------------------------------------------------------------------------------------
// NEBULA FORWARD DECLARATIONS
//

// return the alpha the passed poof should be rendered with, for a 2 shell nebula
float neb2_get_alpha_2shell(float inner_radius, float outer_radius, float magic_num, vector *v);

// return an alpha value for a bitmap offscreen based upon "break" value
float neb2_get_alpha_offscreen(float sx, float sy, float incoming_alpha);

// do a pre-render of the background nebula
void neb2_pre_render(vector *eye_pos, matrix *eye_orient);

// fill in the position of the eye for this frame
void neb2_get_eye_pos(vector *eye);

// fill in the eye orient for this frame
void neb2_get_eye_orient(matrix *eye);

// get a (semi) random bitmap to use for a poof
int neb2_get_bitmap();

// regenerate the player nebula
void neb2_regen();


// --------------------------------------------------------------------------------------------------------
// NEBULA FUNCTIONS
//

// initialize neb2 stuff at game startup
void neb2_init()
{       
        char name[255] = "";

        // read in the nebula.tbl
        read_file_text("nebula.tbl");
        reset_parse();

        // background bitmaps
        Neb2_bitmap_count = 0;
        while(!optional_string("#end")){
                // nebula
                required_string("+Nebula:");
                stuff_string(name, F_NAME, NULL);

                if(Neb2_bitmap_count < MAX_NEB2_BITMAPS){
                        strcpy(Neb2_bitmap_filenames[Neb2_bitmap_count++], name);
                }
        }

        // poofs
        Neb2_poof_count = 0;
        while(!optional_string("#end")){
                // nebula
                required_string("+Poof:");
                stuff_string(name, F_NAME, NULL);

                if(Neb2_poof_count < MAX_NEB2_POOFS){
                        strcpy(Neb2_poof_filenames[Neb2_poof_count++], name);
                }
        }

        // should always have 6 neb poofs
        Assert(Neb2_poof_count == 6);
}

// set detail level
void neb2_set_detail_level(int level)
{
        // sanity
        if(level < 0){
                Nd = &Neb2_detail[0];
                return;
        }
        if(level >= MAX_DETAIL_LEVEL){
                Nd = &Neb2_detail[MAX_DETAIL_LEVEL-1];
                return;
        }

        Nd = &Neb2_detail[level];

        // regen the player neb
        Neb2_regen = 1;
}

// initialize nebula stuff - call from game_post_level_init(), so the mission has been loaded
void neb2_level_init()
{
        int idx;                

        // standalone servers can bail here
        if(Game_mode & GM_STANDALONE_SERVER){
                return;
        }

        // if the mission is not a fullneb mission, skip
        if(!(The_mission.flags & MISSION_FLAG_FULLNEB)){
                Neb2_render_mode = NEB2_RENDER_NONE;
                Neb2_awacs = -1.0f;
                return;
        }

        /*
        if(gr_screen.mode == GR_DIRECT3D){
                max_alpha_player = NEB2_MAX_ALPHA_D3D;
        } else {
                max_alpha_player = NEB2_MAX_ALPHA_GLIDE;
        }
        */

        // by default we'll use pof rendering
        Neb2_render_mode = NEB2_RENDER_POF;
        stars_set_background_model(BACKGROUND_MODEL_FILENAME, Neb2_texture_name);

        // load in all nebula bitmaps
        for(idx=0; idx<Neb2_poof_count; idx++){
                if(Neb2_poofs[idx] < 0){
                        Neb2_poofs[idx] = bm_load(Neb2_poof_filenames[idx]);
                }
        }

        pneb_tried = 0;         
        pneb_tossed_alpha = 0;          
        pneb_tossed_dot = 0;
        neb_tried = 0;          
        neb_tossed_alpha = 0;           
        neb_tossed_dot = 0;
        neb_tossed_count = 0;

        // setup proper fogging values
        switch(gr_screen.mode){
        case GR_GLIDE:
                Neb_backg_fog_near = NEB_BACKG_FOG_NEAR_GLIDE;
                Neb_backg_fog_far = NEB_BACKG_FOG_FAR_GLIDE;                            
                break;
        case GR_OPENGL:
        case GR_DIRECT3D:
                Neb_backg_fog_near = NEB_BACKG_FOG_NEAR_D3D;
                Neb_backg_fog_far = NEB_BACKG_FOG_FAR_D3D;                                      
                break;
        case GR_SOFTWARE:
                Assert(Fred_running);
                break;
        default :
                Int3();
        }       

        // regen the nebula
        neb2_eye_changed();
}

// shutdown nebula stuff
void neb2_level_close()
{
        int idx;
        
        // standalone servers can bail here
        if(Game_mode & GM_STANDALONE_SERVER){
                return;
        }

        // if the mission is not a fullneb mission, skip
        if(!(The_mission.flags & MISSION_FLAG_FULLNEB)){
                return;
        }

        // unload all nebula bitmaps
        for(idx=0; idx<Neb2_poof_count; idx++){
                if(Neb2_poofs[idx] >= 0){
                        bm_unload(Neb2_poofs[idx]);
                        Neb2_poofs[idx] = -1;
                }
        }       

        // unflag the mission as being fullneb so stuff doesn't fog in the techdata room :D
        The_mission.flags &= ~MISSION_FLAG_FULLNEB;
}

// call before beginning all rendering
void neb2_render_setup(vector *eye_pos, matrix *eye_orient)
{
        // standalone servers can bail here
        if(Game_mode & GM_STANDALONE_SERVER){
                return;
        }

        // if the mission is not a fullneb mission, skip
        if(!(The_mission.flags & MISSION_FLAG_FULLNEB)){                
                return;
        }

        // pre-render the real background nebula
        neb2_pre_render(eye_pos, eye_orient);           
}

// level paging code
void neb2_page_in()
{
        int idx;

        // load in all nebula bitmaps
        for(idx=0; idx<Neb2_poof_count; idx++){
                if((Neb2_poofs[idx] >= 0) && (Neb2_poof_flags & (1<<idx))){
                        bm_page_in_texture(Neb2_poofs[idx]);
                }
        }
}

// should we not render this object because its obscured by the nebula?
int neb_skip_opt = 1;
DCF(neb_skip, "")
{
        neb_skip_opt = !neb_skip_opt;
        if(neb_skip_opt){
                dc_printf("Using neb object skipping!\n");
        } else {
                dc_printf("Not using neb object skipping!\n");
        }
}
int neb2_skip_render(object *objp, float z_depth)
{
        float fog_near, fog_far;                

        // if we're never skipping
        if(!neb_skip_opt){
                return 0;
        }

        // lame rendering
        if(Neb2_render_mode == NEB2_RENDER_LAME){
                return 0;
        }

        // get near and far fog values based upon object type and rendering mode
        neb2_get_fog_values(&fog_near, &fog_far, objp);

        // by object type
        switch( objp->type )    {
        // some objects we always render
        case OBJ_SHOCKWAVE:
        case OBJ_JUMP_NODE:
        case OBJ_NONE:
        case OBJ_GHOST:
        case OBJ_BEAM:
                return 0;                       
                
        // any weapon over 500 meters away 
        case OBJ_WEAPON:                
                if(z_depth >= 500.0f){
                        return 1;
                }
                break;

        // any small ship over the fog limit, or any cruiser 50% further than the fog limit
        case OBJ_SHIP:  
                ship_info *sip;
                if((objp->instance >= 0) && (Ships[objp->instance].ship_info_index >= 0)){
                        sip = &Ship_info[Ships[objp->instance].ship_info_index];
                } else {
                        return 0;
                }

                // small ships over the fog limit by a small factor
                if((sip->flags & SIF_SMALL_SHIP) && (z_depth >= (fog_far * 1.3f))){
                        return 1;
                }

                // big ships
                if((sip->flags & SIF_BIG_SHIP) && (z_depth >= (fog_far * 2.0f))){
                        return 1;
                }

                // huge ships
                if((sip->flags & SIF_HUGE_SHIP) && (z_depth >= (fog_far * 3.0f))){
                        return 1;
                }
                break;

        // any fireball over the fog limit for small ships
        case OBJ_FIREBALL:              
                /*
                if(z_depth >= fog_far){
                        return 1;
                }
                */
                return 0;
                break;  

        // any debris over the fog limit for small ships
        case OBJ_DEBRIS:                
                /*
                if(z_depth >= fog_far){
                        return 1;
                }
                */
                return 0;
                break;

        // any asteroids 50% farther than the fog limit for small ships
        case OBJ_ASTEROID:              
                if(z_depth >= (fog_far * 1.5f)){
                        return 1;
                }
                break;

        // any countermeasures over 100 meters away
        case OBJ_CMEASURE:              
                if(z_depth >= 100.0f){
                        return 1;
                }
                break;  

        // hmmm. unknown object type - should probably let it through
        default:
                return 0;
        }

        return 0;
}

// extend LOD 
float neb2_get_lod_scale(int objnum)
{       
        ship *shipp;
        ship_info *sip;

        // bogus
        if((objnum < 0) || (objnum >= MAX_OBJECTS) || (Objects[objnum].type != OBJ_SHIP) || (Objects[objnum].instance < 0) || (Objects[objnum].instance >= MAX_SHIPS)){
                return 1.0f;
        }
        shipp = &Ships[Objects[objnum].instance];
        sip = &Ship_info[shipp->ship_info_index];

        // small ship?
        if(sip->flags & SIF_SMALL_SHIP){
                return 1.8f;
        } else if(sip->flags & SIF_BIG_SHIP){
                return 1.4f;
        }       

        // hmm
        return 1.0f;
}


// --------------------------------------------------------------------------------------------------------
// NEBULA FORWARD DEFINITIONS
//

// return the alpha the passed poof should be rendered with, for a 2 shell nebula
float neb2_get_alpha_2shell(float inner_radius, float outer_radius, float magic_num, vector *v)
{                       
        float dist;
        float alpha;
        vector eye_pos;

        // get the eye position
        neb2_get_eye_pos(&eye_pos);
        
        // determine what alpha to draw this bitmap with
        // higher alpha the closer the bitmap gets to the eye
        dist = vm_vec_dist_quick(&eye_pos, v);  

        // if the point is inside the inner radius, alpha is based on distance to the player's eye, 
        // becoming more transparent as it gets close
        if(dist <= inner_radius){
                // alpha per meter between the magic # and the inner radius
                alpha = Nd->max_alpha_glide / (inner_radius - magic_num);

                // above value times the # of meters away we are
                alpha *= (dist - magic_num);
                return alpha < 0.0f ? 0.0f : alpha;
        }
        // if the point is outside the inner radius, it starts out as completely transparent at max     
        // outer radius, and becomes more opaque as it moves towards inner radius       
        else if(dist <= outer_radius){                          
                // alpha per meter between the outer radius and the inner radius
                alpha = Nd->max_alpha_glide / (outer_radius - inner_radius);

                // above value times the range between the outer radius and the poof
                return alpha < 0.0f ? 0.0f : alpha * (outer_radius - dist);
        }

        // otherwise transparent
        return 0.0f;    
}

// return an alpha value for a bitmap offscreen based upon "break" value
float neb2_get_alpha_offscreen(float sx, float sy, float incoming_alpha)
{       
        float alpha = 0.0f;
        float per_pixel_x = incoming_alpha / (float)Nd->break_x;
        float per_pixel_y = incoming_alpha / (float)Nd->break_y;
        int off_x = ((sx < 0.0f) || (sx > (float)gr_screen.max_w));     
        int off_y = ((sy < 0.0f) || (sy > (float)gr_screen.max_h));
        float off_x_amount = 0.0f;
        float off_y_amount = 0.0f;

        // determine how many pixels outside we are
        if(off_x){
                if(sx < 0.0f){
                        off_x_amount = fl_abs(sx);
                } else {
                        off_x_amount = sx - (float)gr_screen.max_w;
                }
        }
        if(off_y){
                if(sy < 0.0f){
                        off_y_amount = fl_abs(sy);
                } else {
                        off_y_amount = sy - (float)gr_screen.max_h;
                }
        }

        // if offscreen X
        if(off_x){
                // offscreen X and Y - and Y is greater
                if(off_y && (off_y_amount > off_x_amount)){                     
                        alpha = incoming_alpha - (off_y_amount * per_pixel_y);
                } else {
                        alpha = incoming_alpha - (off_x_amount * per_pixel_x);
                }
        }
        // offscreen y
        else if(off_y){
                alpha = incoming_alpha - (off_y_amount * per_pixel_y);
        }
        // should never get here
        else {          
                Int3();
        }

        return alpha < 0.0f ? 0.0f : alpha;                     
}

// -------------------------------------------------------------------------------------------------
// WACKY LOCAL PLAYER NEBULA STUFF
//

vector cube_cen;

int crossed_border()
{
        vector eye_pos;
        float ws = Nd->cube_dim / (float)Neb2_slices;
        float hs = Nd->cube_dim / (float)Neb2_slices;
        float ds = Nd->cube_dim / (float)Neb2_slices;

        // get the eye position
        neb2_get_eye_pos(&eye_pos);

        // check left, right (0, and 1, x and -x)
        if(cube_cen.x - eye_pos.x > ws){
                // -x
                return 0;
        } else if(eye_pos.x - cube_cen.x > ws){
                // +x
                return 1;
        }

        // check up, down (2, and 3, y and -y)
        if(cube_cen.y - eye_pos.y > hs){
                // -y
                return 2;
        } else if(eye_pos.y - cube_cen.y > hs){
                // +y
                return 3;
        }

        // check front, back (4, and 5, z and -z)
        if(cube_cen.z - eye_pos.z > ds){
                // -z
                return 4;
        } else if(eye_pos.z - cube_cen.z > ds){
                // +z
                return 5;
        }

        // nothing
        return -1;
}

void neb2_copy(int xyz, int src, int dest)
{
        int idx1, idx2;

        switch(xyz){
        case 0:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){
                                Neb2_cubes[dest][idx1][idx2] = Neb2_cubes[src][idx1][idx2];                             
                        }
                }
                break;
        case 1:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){                          
                                Neb2_cubes[idx1][dest][idx2] = Neb2_cubes[idx1][src][idx2];                             
                        }
                }
                break;
        case 2:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){
                                Neb2_cubes[idx1][idx2][dest] = Neb2_cubes[idx1][idx2][src];                             
                        }
                }
                break;
        default:
                Int3();
                break;
        }
}

void neb2_gen_slice(int xyz, int src, vector *cube_center)
{
        int idx1, idx2; 
        float h_incw, h_inch, h_incd;
        float ws, hs, ds;
        vector cube_corner;     
        vector *v;

        ws = Nd->cube_dim / (float)Neb2_slices;
        h_incw = ws / 2.0f;
        hs = Nd->cube_dim / (float)Neb2_slices;
        h_inch = hs / 2.0f;
        ds = Nd->cube_dim / (float)Neb2_slices; 
        h_incd = ds / 2.0f;
        cube_corner = *cube_center;             
        cube_corner.x -= (Nd->cube_dim / 2.0f);                 
        cube_corner.y -= (Nd->cube_dim / 2.0f); 
        cube_corner.z -= (Nd->cube_dim / 2.0f); 
        switch(xyz){
        case 0:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){
                                v = &Neb2_cubes[src][idx1][idx2].pt;

                                v->x = h_incw + (ws * (float)src) + frand_range(-Nd->wj, Nd->wj);
                                v->y = h_inch + (hs * (float)idx1) + frand_range(-Nd->hj, Nd->hj);
                                v->z = h_incd + (ds * (float)idx2) + frand_range(-Nd->dj, Nd->dj);
                                vm_vec_add2(v, &cube_corner);

                                // set the bitmap
                                Neb2_cubes[src][idx1][idx2].bmap = neb2_get_bitmap();

                                // set the rotation speed
                                Neb2_cubes[src][idx1][idx2].rot = 0.0f;
                                Neb2_cubes[src][idx1][idx2].rot_speed = frand_range(-max_rotation, max_rotation);
                                Neb2_cubes[src][idx1][idx2].flash = 0.0f;
                        }
                }
                break;
        case 1:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){
                                v = &Neb2_cubes[idx1][src][idx2].pt;
                                
                                v->x = h_incw + (ws * (float)idx1) + frand_range(-Nd->wj, Nd->wj);
                                v->y = h_inch + (hs * (float)src) + frand_range(-Nd->hj, Nd->hj);
                                v->z = h_incd + (ds * (float)idx2) + frand_range(-Nd->dj, Nd->dj);
                                vm_vec_add2(v, &cube_corner);

                                // set the bitmap
                                Neb2_cubes[idx1][src][idx2].bmap = neb2_get_bitmap();

                                // set the rotation speed
                                Neb2_cubes[idx1][src][idx2].rot = 0.0f;
                                Neb2_cubes[idx1][src][idx2].rot_speed = frand_range(-max_rotation, max_rotation);
                                Neb2_cubes[src][idx1][idx2].flash = 0.0f;
                        }
                }
                break;
        case 2:
                for(idx1=0; idx1<Neb2_slices; idx1++){
                        for(idx2=0; idx2<Neb2_slices; idx2++){
                                v = &Neb2_cubes[idx1][idx2][src].pt;

                                v->x = h_incw + (ws * (float)idx1) + frand_range(-Nd->wj, Nd->wj);
                                v->y = h_inch + (hs * (float)idx2) + frand_range(-Nd->hj, Nd->hj);
                                v->z = h_incd + (ds * (float)src) + frand_range(-Nd->dj, Nd->dj);
                                vm_vec_add2(v, &cube_corner);
                                
                                // set the bitmap
                                Neb2_cubes[idx1][idx2][src].bmap = neb2_get_bitmap();

                                // set the rotation speed
                                Neb2_cubes[idx1][idx2][src].rot = 0.0f;
                                Neb2_cubes[idx1][idx2][src].rot_speed = frand_range(-max_rotation, max_rotation);
                                Neb2_cubes[src][idx1][idx2].flash = 0.0f;
                        }
                }
                break;
        default:
                Int3();
                break;
        }
}

// regenerate the player nebula
void neb2_regen()
{
        int idx;
        vector eye_pos; 
        matrix eye_orient;

        mprintf(("Regenerating local nebula!\n"));

        // get eye position and orientation
        neb2_get_eye_pos(&eye_pos);
        neb2_get_eye_orient(&eye_orient);       

        // determine the corner of the cube
        cube_cen = eye_pos;
                
        // generate slices of the cube
        for(idx=0; idx<Neb2_slices; idx++){
                neb2_gen_slice(0, idx, &cube_cen);
        }
}

float max_area = 100000000.0f;
DCF(max_area, "")
{
        dc_get_arg(ARG_FLOAT);
        max_area = Dc_arg_float;
}

float g3_draw_rotated_bitmap_area(vertex *pnt, float angle, float rad, uint tmap_flags, float area);
int neb_mode = 1;
int frames_total = 0;
int frame_count = 0;
float frame_avg;
void neb2_render_player()
{       
        vertex p, ptemp;
        int idx1, idx2, idx3;
        float alpha;
        int frame_rendered;     
        vector eye_pos;
        matrix eye_orient;

#ifndef NDEBUG
        float this_area;
        float frame_area = max_area;
        float total_area = 0.0f;
#endif

        // standalone servers can bail here
        if(Game_mode & GM_STANDALONE_SERVER){
                return;
        }

        // if the mission is not a fullneb mission, skip
        if(!(The_mission.flags & MISSION_FLAG_FULLNEB)){
                return;
        }               

        if(Neb2_regen){
                neb2_regen();
                Neb2_regen = 0;
        }

        // don't render in lame mode
        if((Neb2_render_mode == NEB2_RENDER_LAME) || (Neb2_render_mode == NEB2_RENDER_NONE)){
                return;
        }

        // get eye position and orientation
        neb2_get_eye_pos(&eye_pos);
        neb2_get_eye_orient(&eye_orient);
        
        // maybe swap stuff around if the player crossed a "border"     
        for(idx2=0; idx2<3; idx2++){
                switch(crossed_border()){
                case -1:
                        break;
                // -x
                case 0 :
                        cube_cen.x -= Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=Neb2_slices-1; idx1>0; idx1--){
                                neb2_copy(0, idx1-1, idx1);
                        }
                        neb2_gen_slice(0, 0, &cube_cen);                                
                        break;
                // x
                case 1 :
                        cube_cen.x += Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=0; idx1<Neb2_slices-1; idx1++){
                                neb2_copy(0, idx1+1, idx1);
                        }                               
                        neb2_gen_slice(0, Neb2_slices - 1, &cube_cen);                          
                        break;
                // -y
                case 2 :                        
                        cube_cen.y -= Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=Neb2_slices-1; idx1>0; idx1--){
                                neb2_copy(1, idx1-1, idx1);
                        }                               
                        neb2_gen_slice(1, 0, &cube_cen);                                
                        break;
                // y
                case 3 :                                                
                        cube_cen.y += Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=0; idx1<Neb2_slices-1; idx1++){
                                neb2_copy(1, idx1+1, idx1);
                        }                               
                        neb2_gen_slice(1, Neb2_slices - 1, &cube_cen);                          
                        break;
                // -z
                case 4 :                        
                        cube_cen.z -= Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=Neb2_slices-1; idx1>0; idx1--){
                                neb2_copy(2, idx1-1, idx1);
                        }                                                               
                        neb2_gen_slice(2, 0, &cube_cen);                                
                        break;
                // z
                case 5 :                                                
                        cube_cen.z += Nd->cube_dim / (float)Neb2_slices;
                        for(idx1=0; idx1<Neb2_slices-1; idx1++){
                                neb2_copy(2, idx1+1, idx1);
                        }                                                                                               
                        neb2_gen_slice(2, Neb2_slices - 1, &cube_cen);                          
                        break;
                }       
        }       

        // if we've switched nebula rendering off
        if(Neb2_render_mode == NEB2_RENDER_NONE){
                return;
        }       
        
        frame_rendered = 0;
        // render the nebula
        for(idx1=0; idx1<Neb2_slices; idx1++){
                for(idx2=0; idx2<Neb2_slices; idx2++){
                        for(idx3=0; idx3<Neb2_slices; idx3++){
                                pneb_tried++;                           

                                // rotate the poof
                                Neb2_cubes[idx1][idx2][idx3].rot += (Neb2_cubes[idx1][idx2][idx3].rot_speed * flFrametime);
                                if(Neb2_cubes[idx1][idx2][idx3].rot >= 360.0f){
                                        Neb2_cubes[idx1][idx2][idx3].rot = 0.0f;
                                }                               
                                
                                // optimization 1 - don't draw backfacing poly's
                                // useless
                                if(vm_vec_dot_to_point(&eye_orient.fvec, &eye_pos, &Neb2_cubes[idx1][idx2][idx3].pt) <= 0.0f){
                                        pneb_tossed_dot++;
                                        continue;
                                }

                                // rotate and project the vertex into viewspace
                                g3_rotate_vertex(&p, &Neb2_cubes[idx1][idx2][idx3].pt);
                                ptemp = p;
                                g3_project_vertex(&ptemp);

                                // get the proper alpha value                           
                                alpha = neb2_get_alpha_2shell(Nd->cube_inner, Nd->cube_outer, Nd->prad/4.0f, &Neb2_cubes[idx1][idx2][idx3].pt);

                                // optimization 2 - don't draw 0.0f or less poly's
                                // this amounts to big savings
                                if(alpha <= Nd->break_alpha){
                                        pneb_tossed_alpha++;
                                        continue;
                                }

                                // drop poly's which are offscreen at all                               
                                // if the poly's are offscreen                                          
                                if((ptemp.sx < 0.0f) || (ptemp.sx > (float)gr_screen.max_w) || (ptemp.sy < 0.0f) || (ptemp.sy > (float)gr_screen.max_h) ){
                                        alpha = neb2_get_alpha_offscreen(ptemp.sx, ptemp.sy, alpha);
                                }                               

                                // optimization 2 - don't draw 0.0f or less poly's
                                // this amounts to big savings
                                if(alpha <= Nd->break_alpha){
                                        pneb_tossed_alpha++;
                                        continue;
                                }
        
                                // set the bitmap and render                            
                                gr_set_bitmap(Neb2_cubes[idx1][idx2][idx3].bmap, GR_ALPHABLEND_FILTER, GR_BITBLT_MODE_NORMAL, alpha + Neb2_cubes[idx1][idx2][idx3].flash);

#ifndef NDEBUG
                                this_area = g3_draw_rotated_bitmap_area(&p, fl_radian(Neb2_cubes[idx1][idx2][idx3].rot), Nd->prad, TMAP_FLAG_TEXTURED, max_area);                               
                                total_area += this_area;
                                frame_area -= this_area;
                                frame_rendered++;                       
#else 
                                g3_draw_rotated_bitmap(&p, fl_radian(Neb2_cubes[idx1][idx2][idx3].rot), Nd->prad, TMAP_FLAG_TEXTURED);
#endif
                        }
                }
        }       

        frames_total += frame_rendered;
        frame_count++;
        frame_avg = (float)frames_total / (float)frame_count;   

        // gr_set_color_fast(&Color_bright_red);
        // gr_printf(30, 100, "Area %.3f", total_area);
#ifdef NEB2_THUMBNAIL
        extern int tbmap;
        if(tbmap != -1){
                gr_set_bitmap(tbmap);
                gr_bitmap(0, 0);
        }
#endif
}       

// call this when the player's viewpoint has changed, this will cause the code to properly reset
// the eye's local poofs
void neb2_eye_changed()
{
        Neb2_regen = 1;
}

// get near and far fog values based upon object type and rendering mode
void neb2_get_fog_values(float *fnear, float *ffar, object *objp)
{
        int fog_index;

        // default values in case something truly nasty happens
        *fnear = 10.0f;
        *ffar = 1000.0f;

        // determine what fog index to use
        if(objp->type == OBJ_SHIP){
                Assert((objp->instance >= 0) && (objp->instance < MAX_SHIPS));
                if((objp->instance < 0) || (objp->instance >= MAX_SHIPS)){
                        fog_index = SHIP_TYPE_FIGHTER_BOMBER;
                } else {
                        fog_index = ship_query_general_type(objp->instance);
                        Assert(fog_index >= 0);
                        if(fog_index < 0){
                                fog_index = SHIP_TYPE_FIGHTER_BOMBER;
                        }
                }
        }
        // fog everything else like a fighter
        else {
                fog_index = SHIP_TYPE_FIGHTER_BOMBER;
        }

        // get the values
        switch(gr_screen.mode){
        case GR_GLIDE:
                *fnear = Neb_ship_fog_vals_glide[fog_index][0];
                *ffar = Neb_ship_fog_vals_glide[fog_index][1];
                break;

        case GR_OPENGL:
        case GR_DIRECT3D:
                *fnear = Neb_ship_fog_vals_d3d[fog_index][0];
                *ffar = Neb_ship_fog_vals_d3d[fog_index][1];
                break;

        default:
                Int3();
        }
}

// given a position in space, return a value from 0.0 to 1.0 representing the fog level 
float neb2_get_fog_intensity(object *obj)
{
        float f_near, f_far, pct;

        // get near and far fog values based upon object type and rendering mode
        neb2_get_fog_values(&f_near, &f_far, obj);

        // get the fog pct
        pct = vm_vec_dist_quick(&Eye_position, &obj->pos) / (f_far - f_near);
        if(pct < 0.0f){
                return 0.0f;
        } else if(pct > 1.0f){
                return 1.0f;
        }

        return pct;
}

// fogging stuff --------------------------------------------------------------------

// do a pre-render of the background nebula
#define ESIZE                                   32
ubyte tpixels[ESIZE * ESIZE * 4];               // for 32 bits
int last_esize = -1;
int this_esize = ESIZE;
extern float Viewer_zoom;
float ex_scale, ey_scale;
int tbmap = -1;
void neb2_pre_render(vector *eye_pos, matrix *eye_orient)
{       
        // bail early in lame and poly modes
        if(Neb2_render_mode != NEB2_RENDER_POF){
                return;
        }

        // set the view clip
        gr_screen.clip_width = this_esize;
        gr_screen.clip_height = this_esize;
        g3_start_frame(1);                                                      // Turn on zbuffering
        g3_set_view_matrix(eye_pos, eye_orient, Viewer_zoom);
        gr_set_clip(0, 0, this_esize, this_esize);              

        // render the background properly
        // hack - turn off nebula stuff
        int neb_save = Neb2_render_mode;
        Neb2_render_mode = NEB2_RENDER_NONE;

        // draw background stuff nebula                 
        extern void stars_draw_background();
        stars_draw_background();                

        Neb2_render_mode = neb_save;    

        // HACK - flush d3d here so everything is rendered
        if(gr_screen.mode == GR_DIRECT3D){
                extern void d3d_flush();
                d3d_flush();
        }

        // grab the region
        gr_get_region(0, this_esize, this_esize, (ubyte*)tpixels);      

#ifdef NEB2_THUMBNAIL
        if(tbmap == -1){
                tbmap = bm_create(16, this_esize, this_esize, tpixels, 0);
                bm_lock(tbmap, 16, 0);
                bm_unlock(tbmap);
        }
#endif

        // maybe do some swizzling
        
        // end the frame
        g3_end_frame();
        
        gr_clear();     

        // HACK - flush d3d here so everything is properly cleared
        if(gr_screen.mode == GR_DIRECT3D){
                extern void d3d_flush();
                d3d_flush();
        }

        // if the size has changed between frames, make a new bitmap
        if(this_esize != last_esize){
                last_esize = this_esize;                                                
                
                // recalculate ex_scale and ey_scale values for looking up color values
                ex_scale = (float)this_esize / (float)gr_screen.max_w;
                ey_scale = (float)this_esize / (float)gr_screen.max_h;
        }       
                
        // restore the game clip stuff
        extern void game_set_view_clip();
        game_set_view_clip();   
}

// wacky scheme for smoothing colors
int wacky_scheme = 3;

// get the color of the pixel in the small pre-rendered background nebula
#define PIXEL_INDEX_SMALL(xv, yv)       ( (this_esize * (yv) * gr_screen.bytes_per_pixel) + ((xv) * gr_screen.bytes_per_pixel) )
void neb2_get_pixel(int x, int y, int *r, int *g, int *b)
{       
        int ra, ga, ba;
        ubyte rv, gv, bv;       
        int avg_count;
        int xs, ys;

        // if we're in lame rendering mode, return a constant value
        if(Neb2_render_mode == NEB2_RENDER_LAME){
                *r = Neb2_background_color[0];
                *g = Neb2_background_color[1];
                *b = Neb2_background_color[2];

                return;
        }               
        
        // get the proper pixel index to be looking up
        rv = gv = bv = 0;       
        
        // select screen format
        BM_SELECT_SCREEN_FORMAT();

        // pixel plus all immediate neighbors (on the small screen - should be more effective than 2 or 1)      
        xs = (int)(ex_scale * x);
        ys = (int)(ey_scale * y);               

        // sometimes goes over by 1 in direct3d
        if(ys >= (this_esize - 1)){
                ys--;
        }

        avg_count = 0;
        bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs, ys)], &rv, &gv, &bv, NULL);
        ra = rv;
        ga = gv;
        ba = bv;
        avg_count++;
        if(xs > 0){                     
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs - 1, ys)], &rv, &gv, &bv, NULL);        // left
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
        if(xs < this_esize - 1){                        
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs + 1, ys)], &rv, &gv, &bv, NULL);        // right
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
        if(ys > 0){                     
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs, ys - 1)], &rv, &gv, &bv, NULL);        // top
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }                               
        if(ys < this_esize - 2){                        
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs, ys + 1)], &rv, &gv, &bv, NULL);        // bottom
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
                
        if((xs > 0) && (ys > 0)){                       
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs - 1, ys - 1)], &rv, &gv, &bv, NULL);    // upper left
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
        if((xs < this_esize - 1) && (ys < this_esize - 1)){                     
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs + 1, ys + 1)], &rv, &gv, &bv, NULL);    // lower right
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
        if((ys > 0) && (xs < this_esize - 1)){                  
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs + 1, ys - 1)], &rv, &gv, &bv, NULL);    // lower left
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }
        if((ys < this_esize - 1) && (xs > 0)){                  
                bm_get_components(&tpixels[PIXEL_INDEX_SMALL(xs - 1, ys + 1)], &rv, &gv, &bv, NULL);    // upper right
                ra += rv;
                ba += bv;
                ga += gv;
                avg_count++;
        }               

        rv = (ubyte) (ra / avg_count);
        gv = (ubyte) (ga / avg_count);
        bv = (ubyte) (ba / avg_count);  

        // return values
        *r = (int)rv;
        *g = (int)gv;
        *b = (int)bv;
}

// get the color to fog the background color to
void neb2_get_backg_color(int *r, int *g, int *b)
{
        *r = Neb2_background_color[0];
        *g = Neb2_background_color[1];
        *b = Neb2_background_color[2];
}

// set the background color
void neb2_set_backg_color(int r, int g, int b)
{
        Neb2_background_color[0] = r;
        Neb2_background_color[1] = g;
        Neb2_background_color[2] = b;
}

// fill in the position of the eye for this frame
void neb2_get_eye_pos(vector *eye)
{
        *eye = Eye_position;
}

// fill in the eye orient for this frame
void neb2_get_eye_orient(matrix *eye)
{
        *eye = Eye_matrix;
}

// get a (semi) random bitmap to use for a poof
int neb2_get_bitmap()
{
        int count = 0;
        int huh;
        static int neb2_choose = 0;

        // get a random count
        count = (int)frand_range(1.0f, 5.0f);

        // very ad-hoc
        while(count > 0){
                // don't cycle too many times
                huh = 0;                
                do {
                        if(neb2_choose == MAX_NEB2_POOFS - 1){
                                neb2_choose = 0;
                        } else {
                                neb2_choose++;
                        }

                        huh++;
                } while(!(Neb2_poof_flags & (1<<neb2_choose)) && (huh < 10));

                count--;
        }

        // bitmap 0
        if(Neb2_poofs[neb2_choose] < 0){        
                return Neb2_poofs[0];
        } 
        return Neb2_poofs[neb2_choose];
}

// nebula DCF functions ------------------------------------------------------

DCF(neb2, "list nebula console commands")
{               
        dc_printf("neb2_fog <X> <float> <float>  : set near and far fog planes for ship type X\n");
        dc_printf("where X is an integer from 1 - 11\n");
        dc_printf("1 = cargo containers, 2 = fighters/bombers, 3 = cruisers\n");
        dc_printf("4 = freighters, 5 = capital ships, 6 = transports, 7 = support ships\n");
        dc_printf("8 = navbuoys, 9 = sentryguns, 10 = escape pods, 11 = background nebula polygons\n\n");
        
        dc_printf("neb2_max_alpha   : max alpha value (0.0 to 1.0) for cloud poofs. 0.0 is completely transparent\n");
        dc_printf("neb2_break_alpha : alpha value (0.0 to 1.0) at which faded polygons are not drawn. higher values generally equals higher framerate, with more visual cloud popping\n");
        dc_printf("neb2_break_off   : how many pixels offscreen (left, right, top, bottom) when a cloud poof becomes fully transparent. Lower values cause quicker fading\n");
        dc_printf("neb2_smooth      : magic fog smoothing modes (0 - 3)\n");
        dc_printf("neb2_select      : <int> <int>  where the first # is the bitmap to be adjusting (0 through 5), and the second int is a 0 or 1, to turn off and on\n");
        dc_printf("neb2_rot         : set max rotation speed for poofs\n");
        dc_printf("neb2_prad        : set cloud poof radius\n");
        dc_printf("neb2_cdim        : poof cube dimension\n");
        dc_printf("neb2_cinner      : poof cube inner dimension\n");
        dc_printf("neb2_couter      : poof cube outer dimension\n");
        dc_printf("neb2_jitter      : poof jitter\n");
        dc_printf("neb2_mode        : switch between no nebula, polygon background, amd pof background (0, 1 and 2 respectively)\n\n"); 
        dc_printf("neb2_ff          : flash fade/sec\n");
        dc_printf("neb2_background       : rgb background color\n");

        dc_printf("neb2_fog_vals    : display all the current settings for all above values\n");        
}

DCF(neb2_prad, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->prad = Dc_arg_float;
}
DCF(neb2_cdim, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->cube_dim = Dc_arg_float;
}

DCF(neb2_cinner, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->cube_inner = Dc_arg_float;
}

DCF(neb2_couter, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->cube_outer = Dc_arg_float;
}

DCF(neb2_jitter, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->hj = Nd->dj = Nd->wj = Dc_arg_float;
}

DCF(neb2_fog, "")
{
        int index;
        float fnear, ffar;
        dc_get_arg(ARG_INT);
        index = Dc_arg_int;
        dc_get_arg(ARG_FLOAT);
        fnear = Dc_arg_float;
        dc_get_arg(ARG_FLOAT);
        ffar = Dc_arg_float;

        if((index >= 1) && (index <= 11) && (fnear >= 0.0f) && (ffar >= 0.0f) && (ffar > fnear)){
                if(index == 11){
                        Neb_backg_fog_near = fnear;
                        Neb_backg_fog_far = ffar;
                } else {
                        if(gr_screen.mode == GR_GLIDE){
                                Neb_ship_fog_vals_glide[index][0] = fnear;
                                Neb_ship_fog_vals_glide[index][1] = ffar;
                        } else {
                                Assert(gr_screen.mode == GR_DIRECT3D || gr_screen.mode == GR_OPENGL);
                                Neb_ship_fog_vals_d3d[index][0] = fnear;
                                Neb_ship_fog_vals_d3d[index][1] = ffar;
                        }
                }
        }
}

DCF(neb2_max_alpha, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->max_alpha_glide = Dc_arg_float;
}

DCF(neb2_break_alpha, "")
{
        dc_get_arg(ARG_FLOAT);
        Nd->break_alpha = Dc_arg_float;
}

DCF(neb2_break_off, "")
{
        dc_get_arg(ARG_INT);
        Nd->break_y = (float)Dc_arg_int;
        Nd->break_x = Nd->break_y * 1.3333f;
}

DCF(neb2_smooth, "")
{
        int index;
        dc_get_arg(ARG_INT);
        index = Dc_arg_int;
        if((index >= 0) && (index <= 3)){
                wacky_scheme = index;
        }
}

DCF(neb2_select, "")
{
        dc_get_arg(ARG_INT);    
        int bmap = Dc_arg_int;
        if((bmap >= 0) && (bmap < Neb2_poof_count)){
                dc_get_arg(ARG_INT);

                if(Dc_arg_int){
                        Neb2_poof_flags |= (1<<bmap);
                } else {
                        Neb2_poof_flags &= ~(1<<bmap);
                }
        }
}

DCF(neb2_rot, "")
{
        dc_get_arg(ARG_FLOAT);
        max_rotation = Dc_arg_float;
}

DCF(neb2_ff, "")
{
        dc_get_arg(ARG_FLOAT);
        neb2_flash_fade = Dc_arg_float;
}

DCF(neb2_mode, "")
{
        dc_get_arg(ARG_INT);

        switch(Dc_arg_int){
        case NEB2_RENDER_NONE:
                Neb2_render_mode = NEB2_RENDER_NONE;
                break;

        case NEB2_RENDER_POLY:
                Neb2_render_mode = NEB2_RENDER_POLY;
                break;

        case NEB2_RENDER_POF:
                Neb2_render_mode = NEB2_RENDER_POF;
                stars_set_background_model(BACKGROUND_MODEL_FILENAME, "Eraseme3");
                break;

        case NEB2_RENDER_LAME:
                Neb2_render_mode = NEB2_RENDER_LAME;
                break;
        }
}

DCF(neb2_slices, "")
{
        dc_get_arg(ARG_INT);
        Neb2_slices = Dc_arg_int;
        Neb2_regen = 1;
}

DCF(neb2_background, "")
{
        int r, g, b;

        dc_get_arg(ARG_INT);
        r = Dc_arg_int;
        dc_get_arg(ARG_INT);
        g = Dc_arg_int;
        dc_get_arg(ARG_INT);
        b = Dc_arg_int;

        Neb2_background_color[0] = r;
        Neb2_background_color[1] = g;
        Neb2_background_color[2] = b;
}

DCF(neb2_fog_vals, "")
{
        dc_printf("neb2_fog : \n");
        if(gr_screen.mode == GR_GLIDE){         
                dc_printf("(1)cargo containers : %f, %f\n", Neb_ship_fog_vals_glide[1][0], Neb_ship_fog_vals_glide[1][1]);
                dc_printf("(2)fighters/bombers : %f, %f\n", Neb_ship_fog_vals_glide[2][0], Neb_ship_fog_vals_glide[2][1]);
                dc_printf("(3)cruisers : %f, %f\n", Neb_ship_fog_vals_glide[3][0], Neb_ship_fog_vals_glide[3][1]);
                dc_printf("(4)freighters : %f, %f\n", Neb_ship_fog_vals_glide[4][0], Neb_ship_fog_vals_glide[4][1]);
                dc_printf("(5)cap ships : %f, %f\n", Neb_ship_fog_vals_glide[5][0], Neb_ship_fog_vals_glide[5][1]);
                dc_printf("(6)transports : %f, %f\n", Neb_ship_fog_vals_glide[6][0], Neb_ship_fog_vals_glide[6][1]);
                dc_printf("(7)support ships : %f, %f\n", Neb_ship_fog_vals_glide[7][0], Neb_ship_fog_vals_glide[7][1]);
                dc_printf("(8)navbuoys : %f, %f\n", Neb_ship_fog_vals_glide[8][0], Neb_ship_fog_vals_glide[8][1]);
                dc_printf("(9)sentry guns : %f, %f\n", Neb_ship_fog_vals_glide[9][0], Neb_ship_fog_vals_glide[9][1]);
                dc_printf("(10)escape pods : %f, %f\n", Neb_ship_fog_vals_glide[10][0], Neb_ship_fog_vals_glide[10][1]);
                dc_printf("(11)background polys : %f, %f\n\n", Neb_backg_fog_near, Neb_backg_fog_far);

        } else {
                Assert(gr_screen.mode == GR_DIRECT3D || gr_screen.mode == GR_OPENGL);
                dc_printf("(1)cargo containers : %f, %f\n", Neb_ship_fog_vals_d3d[1][0], Neb_ship_fog_vals_d3d[1][1]);
                dc_printf("(2)fighters/bombers : %f, %f\n", Neb_ship_fog_vals_d3d[2][0], Neb_ship_fog_vals_d3d[2][1]);
                dc_printf("(3)cruisers : %f, %f\n", Neb_ship_fog_vals_d3d[3][0], Neb_ship_fog_vals_d3d[3][1]);
                dc_printf("(4)freighters : %f, %f\n", Neb_ship_fog_vals_d3d[4][0], Neb_ship_fog_vals_d3d[4][1]);
                dc_printf("(5)cap ships : %f, %f\n", Neb_ship_fog_vals_d3d[5][0], Neb_ship_fog_vals_d3d[5][1]);
                dc_printf("(6)transports : %f, %f\n", Neb_ship_fog_vals_d3d[6][0], Neb_ship_fog_vals_d3d[6][1]);
                dc_printf("(7)support ships : %f, %f\n", Neb_ship_fog_vals_d3d[7][0], Neb_ship_fog_vals_d3d[7][1]);
                dc_printf("(8)navbuoys : %f, %f\n", Neb_ship_fog_vals_d3d[8][0], Neb_ship_fog_vals_d3d[8][1]);
                dc_printf("(9)sentry guns : %f, %f\n", Neb_ship_fog_vals_d3d[9][0], Neb_ship_fog_vals_d3d[9][1]);
                dc_printf("(10)escape pods : %f, %f\n", Neb_ship_fog_vals_d3d[10][0], Neb_ship_fog_vals_d3d[10][1]);
                dc_printf("(11)background polys : %f, %f\n\n", Neb_backg_fog_near, Neb_backg_fog_far);          
        }
        dc_printf("neb2_max_alpha   : %f\n", Nd->max_alpha_glide);
        dc_printf("neb2_break_alpha : %f\n", Nd->break_alpha);
        dc_printf("neb2_break_off   : %d\n", (int)Nd->break_y);
        dc_printf("neb2_smooth      : %d\n", wacky_scheme);
        dc_printf("neb2_toggle      : %s\n", Neb2_render_mode ? "on" : "off");
        dc_printf("neb2_rot                      : %f\n", max_rotation);
        dc_printf("neb2_prad                     : %f\n", Nd->prad);
        dc_printf("neb2_cdim                     : %f\n", Nd->cube_dim);
        dc_printf("neb2_couter      : %f\n", Nd->cube_outer);
        dc_printf("neb2_cinner           : %f\n", Nd->cube_inner);
        dc_printf("neb2_jitter           : %f\n", Nd->wj);
        dc_printf("neb2_ff                       : %f\n", neb2_flash_fade);
        dc_printf("neb2_background       : %d %d %d\n", Neb2_background_color[0], Neb2_background_color[1], Neb2_background_color[2]);
}

/* Obsolete !?
DCF(neb2_create, "create a basic nebula")
{
        int points = 0;
        float rad1 = 0.0f;
        float rad2 = 0.0f;
        
        dc_get_arg(ARG_INT);
        if(Dc_arg_type & ARG_INT){
                points = Dc_arg_int;
        }
        dc_get_arg(ARG_FLOAT);
        if(Dc_arg_type & ARG_FLOAT){
                rad1 = Dc_arg_float;
        }
        dc_get_arg(ARG_FLOAT);
        if(Dc_arg_type & ARG_FLOAT){
                rad2 = Dc_arg_float;
        }
        neb2_create(&vmd_zero_vector, points, rad1, -1.0f, rad2);
}

DCF(neb2_del, "delete existing nebulae")
{
        for(int idx=0; idx<MAX_OBJECTS; idx++){
                if(Objects[idx].type == OBJ_NEB2){
                        obj_delete(idx);                        
                }
        }
}

int magic0 = 15;
float magic1 = 1000.0f;
float magic2 = -1.0f;
float magic3 = 700.0f;
DCF(neb2_def, "create a default nebula")
{
        vector a,b,c,d,e,f;
        vm_vec_make(&a, 0.0f, 0.0f, 0.0f);
        vm_vec_make(&b, 3600.0f, 700.0f, 0.0f);
        vm_vec_make(&c, -3000.0f, 20.0f, 480.0f);
        vm_vec_make(&d, -4000.0f, 100.0f, 100.0f);
        vm_vec_make(&e, 0.0f, 3000.0f, -400.0f);
        vm_vec_make(&f, 670.0f, -2500.0f, -1600.0f);

        neb2_create(&a, magic0, magic1, magic2, magic3);
        neb2_create(&b, magic0, magic1, magic2, magic3);
        neb2_create(&c, magic0, magic1, magic2, magic3);
        neb2_create(&d, magic0, magic1, magic2, magic3);
        neb2_create(&e, magic0, magic1, magic2, magic3);
        neb2_create(&f, magic0, magic1, magic2, magic3);
}

DCF(neb2_plr, "regenerate the player's nebula")
{
        Neb2_regen = 0;
}

DCF(neb2_stats, "display info about the nebula rendering")
{
        dc_printf("Player poofs tried : %d\n", pneb_tried);
        dc_printf("Player poofs tossed (alpha): %d\n", pneb_tossed_alpha);
        dc_printf("Player poofs tossed (dot): %d\n", pneb_tossed_dot);
        dc_printf("Player poofs tossed (off): %d\n", pneb_tossed_off);

        dc_printf("Poofs tried : %d\n", neb_tried);
        dc_printf("Poofs tossed (alpha): %d\n", neb_tossed_alpha);
        dc_printf("Poofs tossed (dot): %d\n", neb_tossed_dot);
        dc_printf("Poofs tossed (count): %d\n", neb_tossed_count);

        dc_printf("Avg poofs/frame: %f\n", frame_avg);
}

// create a nebula object, return objnum of the nebula or -1 on fail
// NOTE : in most cases you will want to pass -1.0f for outer_radius. Trust me on this
int neb2_create(vector *offset, int num_poofs, float inner_radius, float outer_radius, float max_poof_radius)
{       
        Int3();
        return -1;
}

// delete a nebula object
void neb2_delete(object *objp)
{       
        Int3();
}

// renders a nebula object
void neb2_render(object *objp)
{       
        Int3();
}

// preprocess the nebula object before simulation
void neb2_process_pre(object *objp)
{
        Int3();
}

// process the nebula object after simulating, but before rendering
void neb2_process_post(object *objp)
{       
        Int3();
}
*/

/*
// add N poofs to the inner shell of the nebula
// if orient and ang are specified, generate the poofs so that they are "visible" around
// the orient fvec in a cone of ang degrees
void neb2_add_inner(neb2 *neb, int num_poofs, matrix *orient, float ang)
{       
        int idx;
        vector pt, pt2, pt3;
        int final_index = (neb->num_poofs + num_poofs) > neb->max_poofs ? neb->max_poofs : (neb->num_poofs + num_poofs);

        // add the points a pick a random bitmap
        for(idx=neb->num_poofs; idx<final_index; idx++){
                if(orient != NULL){
                        // put a point directly in front of the player, between 0 and inner_radius distance away
                        vm_vec_copy_scale(&pt, &orient->fvec, frand_range(neb->magic_num, neb->inner_radius));

                        // rotate the point by -ang <-> ang around the up vector
                        vm_rot_point_around_line(&pt2, &pt, fl_radian(frand_range(-ang, ang)), &vmd_zero_vector, &orient->uvec);

                        // rotate the point by -ang <-> ang around the right vector
                        vm_rot_point_around_line(&pt3, &pt2, fl_radian(frand_range(-ang, ang)), &vmd_zero_vector, &orient->rvec);

                        // now add in the center of the nebula so its placed properly (ie, not around the origin)
                        vm_vec_add(&neb->pts[idx], &pt3, &Objects[neb->objnum].pos);
                } else {
                        neb->pts[idx].x = frand_range(-1.0f * neb->inner_radius, neb->inner_radius) + Objects[neb->objnum].pos.x;
                        neb->pts[idx].y = frand_range(-1.0f * neb->inner_radius, neb->inner_radius) + Objects[neb->objnum].pos.y;
                        neb->pts[idx].z = frand_range(-1.0f * neb->inner_radius, neb->inner_radius) + Objects[neb->objnum].pos.z;
                }

                neb->bmaps[idx] = (int)frand_range(0.0f, (float)2);
                neb->num_poofs++;
        }
}

// add N poofs to the outer shell of the nebula
// if orient and ang are specified, generate the poofs so that they are "visible" around
// the orient fvec in a cone of ang degrees
void neb2_add_outer(neb2 *neb, int num_poofs, matrix *orient, float ang)
{
        int idx;
        float phi, theta;
        vector pt, pt2, pt3;
        int final_index = (neb->num_poofs + num_poofs) > neb->max_poofs ? neb->max_poofs : (neb->num_poofs + num_poofs);

        // add the points a pick a random bitmap
        for(idx=neb->num_poofs; idx<final_index; idx++){
                if(orient != NULL){
                        // put a point directly in front of the player, at outer_radius distance away
                        vm_vec_copy_scale(&pt, &orient->fvec, neb->outer_radius);

                        // rotate the point by -ang <-> ang around the up vector
                        vm_rot_point_around_line(&pt2, &pt, fl_radian(frand_range(-ang, ang)), &vmd_zero_vector, &orient->uvec);

                        // rotate the point by -ang <-> ang around the right vector
                        vm_rot_point_around_line(&pt3, &pt2, fl_radian(frand_range(-ang, ang)), &vmd_zero_vector, &orient->rvec);

                        // now add in the center of the nebula so its placed properly (ie, not around the origin)
                        vm_vec_add(&neb->pts[idx], &pt, &Objects[neb->objnum].pos);
                } else {
                        // get a random point on the very outer radius, using spherical coords
                        phi = fl_radian(frand_range(0.0f, 360.0f));
                        theta = fl_radian(frand_range(0.0f, 360.f));
        
                        neb->pts[idx].x = neb->outer_radius * (float)sin(phi) * (float)cos(theta);
                        neb->pts[idx].y = neb->outer_radius * (float)sin(phi) * (float)sin(theta);
                        neb->pts[idx].z = neb->outer_radius * (float)cos(phi);                  
                }

                // pick a random bitmap and increment the # of poofs
                neb->bmaps[idx] = (int)frand_range(0.0f, (float)2);
                neb->num_poofs++;
        }
}

// return the alpha the passed poof should be rendered with, for a 1 shell nebula
float neb2_get_alpha_1shell(neb2 *neb, int poof_index)
{
        float dist;
        float alpha;
        vector eye_pos;

        // get the eye position
        neb2_get_eye_pos(&eye_pos);
        
        // determine what alpha to draw this bitmap with
        // higher alpha the closer the bitmap gets to the eye
        dist = vm_vec_dist_quick(&eye_pos, &neb->pts[poof_index]);
        
        // at poof radius or greater, alpha should be 1.0
        // scale from 0.0 to 1.0 between radius and magic
        if(dist >= neb->max_poof_radius){
                return max_alpha - 0.0001f;
        } else if(dist > neb->magic_num){
                // alpha per meter between the magic # and the max radius
                alpha = max_alpha / (neb->max_poof_radius - neb->magic_num);

                // above value times the # of meters away we are
                return alpha * (dist - neb->magic_num);
        }       
        
        // otherwise transparent
        return 0.0f;
}
*/