Qu-ake/Qu-ake.iso/qu_ke/patches/023/FREPORT.QC

Text File | 1996-09-22 | 52.5 KB | 2,946 lines

//
//FragReport mod
// This file freport.qc contains all the data and functions
// to maintain, update, and report frags between players.
//  96/09/21 by Ray Li <[e-mail]>
//

//
//Name strings (used to ID entities later) and
//active flags for 16 players
//
string  Player01Name;
float   Player01ID;
float   Player01Active;
float   Player01TimeLeft;

string  Player02Name;
float   Player02ID;
float   Player02Active;
float   Player02TimeLeft;

string  Player03Name;
float   Player03ID;
float   Player03Active;
float   Player03TimeLeft;

string  Player04Name;
float   Player04ID;
float   Player04Active;
float   Player04TimeLeft;

string  Player05Name;
float   Player05ID;
float   Player05Active;
float   Player05TimeLeft;

string  Player06Name;
float   Player06ID;
float   Player06Active;
float   Player06TimeLeft;

string  Player07Name;
float   Player07ID;
float   Player07Active;
float   Player07TimeLeft;

string  Player08Name;
float   Player08ID;
float   Player08Active;
float   Player08TimeLeft;

string  Player09Name;
float   Player09ID;
float   Player09Active;
float   Player09TimeLeft;

string  Player10Name;
float   Player10ID;
float   Player10Active;
float   Player10TimeLeft;

string  Player11Name;
float   Player11ID;
float   Player11Active;
float   Player11TimeLeft;

string  Player12Name;
float   Player12ID;
float   Player12Active;
float   Player12TimeLeft;

string  Player13Name;
float   Player13ID;
float   Player13Active;
float   Player13TimeLeft;

string  Player14Name;
float   Player14ID;
float   Player14Active;
float   Player14TimeLeft;

string  Player15Name;
float   Player15ID;
float   Player15Active;
float   Player15TimeLeft;

string  Player16Name;
float   Player16ID;
float   Player16Active;
float   Player16TimeLeft;

//
//Data matrix.  Nomenclature is
// pxxkyy
//where xx is the player doing the fragging
//and yy is the player getting fragged.  Note
//that suicides are recorded in pxxkxx
//
float   p01k01;
float   p01k02;
float   p01k03;
float   p01k04;
float   p01k05;
float   p01k06;
float   p01k07;
float   p01k08;
float   p01k09;
float   p01k10;
float   p01k11;
float   p01k12;
float   p01k13;
float   p01k14;
float   p01k15;
float   p01k16;

float   p02k01;
float   p02k02;
float   p02k03;
float   p02k04;
float   p02k05;
float   p02k06;
float   p02k07;
float   p02k08;
float   p02k09;
float   p02k10;
float   p02k11;
float   p02k12;
float   p02k13;
float   p02k14;
float   p02k15;
float   p02k16;

float   p03k01;
float   p03k02;
float   p03k03;
float   p03k04;
float   p03k05;
float   p03k06;
float   p03k07;
float   p03k08;
float   p03k09;
float   p03k10;
float   p03k11;
float   p03k12;
float   p03k13;
float   p03k14;
float   p03k15;
float   p03k16;

float   p04k01;
float   p04k02;
float   p04k03;
float   p04k04;
float   p04k05;
float   p04k06;
float   p04k07;
float   p04k08;
float   p04k09;
float   p04k10;
float   p04k11;
float   p04k12;
float   p04k13;
float   p04k14;
float   p04k15;
float   p04k16;

float   p05k01;
float   p05k02;
float   p05k03;
float   p05k04;
float   p05k05;
float   p05k06;
float   p05k07;
float   p05k08;
float   p05k09;
float   p05k10;
float   p05k11;
float   p05k12;
float   p05k13;
float   p05k14;
float   p05k15;
float   p05k16;

float   p06k01;
float   p06k02;
float   p06k03;
float   p06k04;
float   p06k05;
float   p06k06;
float   p06k07;
float   p06k08;
float   p06k09;
float   p06k10;
float   p06k11;
float   p06k12;
float   p06k13;
float   p06k14;
float   p06k15;
float   p06k16;

float   p07k01;
float   p07k02;
float   p07k03;
float   p07k04;
float   p07k05;
float   p07k06;
float   p07k07;
float   p07k08;
float   p07k09;
float   p07k10;
float   p07k11;
float   p07k12;
float   p07k13;
float   p07k14;
float   p07k15;
float   p07k16;

float   p08k01;
float   p08k02;
float   p08k03;
float   p08k04;
float   p08k05;
float   p08k06;
float   p08k07;
float   p08k08;
float   p08k09;
float   p08k10;
float   p08k11;
float   p08k12;
float   p08k13;
float   p08k14;
float   p08k15;
float   p08k16;

float   p09k01;
float   p09k02;
float   p09k03;
float   p09k04;
float   p09k05;
float   p09k06;
float   p09k07;
float   p09k08;
float   p09k09;
float   p09k10;
float   p09k11;
float   p09k12;
float   p09k13;
float   p09k14;
float   p09k15;
float   p09k16;

float   p10k01;
float   p10k02;
float   p10k03;
float   p10k04;
float   p10k05;
float   p10k06;
float   p10k07;
float   p10k08;
float   p10k09;
float   p10k10;
float   p10k11;
float   p10k12;
float   p10k13;
float   p10k14;
float   p10k15;
float   p10k16;

float   p11k01;
float   p11k02;
float   p11k03;
float   p11k04;
float   p11k05;
float   p11k06;
float   p11k07;
float   p11k08;
float   p11k09;
float   p11k10;
float   p11k11;
float   p11k12;
float   p11k13;
float   p11k14;
float   p11k15;
float   p11k16;

float   p12k01;
float   p12k02;
float   p12k03;
float   p12k04;
float   p12k05;
float   p12k06;
float   p12k07;
float   p12k08;
float   p12k09;
float   p12k10;
float   p12k11;
float   p12k12;
float   p12k13;
float   p12k14;
float   p12k15;
float   p12k16;

float   p13k01;
float   p13k02;
float   p13k03;
float   p13k04;
float   p13k05;
float   p13k06;
float   p13k07;
float   p13k08;
float   p13k09;
float   p13k10;
float   p13k11;
float   p13k12;
float   p13k13;
float   p13k14;
float   p13k15;
float   p13k16;

float   p14k01;
float   p14k02;
float   p14k03;
float   p14k04;
float   p14k05;
float   p14k06;
float   p14k07;
float   p14k08;
float   p14k09;
float   p14k10;
float   p14k11;
float   p14k12;
float   p14k13;
float   p14k14;
float   p14k15;
float   p14k16;

float   p15k01;
float   p15k02;
float   p15k03;
float   p15k04;
float   p15k05;
float   p15k06;
float   p15k07;
float   p15k08;
float   p15k09;
float   p15k10;
float   p15k11;
float   p15k12;
float   p15k13;
float   p15k14;
float   p15k15;
float   p15k16;

float   p16k01;
float   p16k02;
float   p16k03;
float   p16k04;
float   p16k05;
float   p16k06;
float   p16k07;
float   p16k08;
float   p16k09;
float   p16k10;
float   p16k11;
float   p16k12;
float   p16k13;
float   p16k14;
float   p16k15;
float   p16k16;

//
//QuakeC doesn't like functions with lots of
//arguments (found out the hard way... page fault
//in qccdos!), so use more globals to "simulate"
//function arguments in some convenience functions.
//
float   kt01;
float   kt02;
float   kt03;
float   kt04;
float   kt05;
float   kt06;
float   kt07;
float   kt08;
float   kt09;
float   kt10;
float   kt11;
float   kt12;
float   kt13;
float   kt14;
float   kt15;
float   kt16;

float   ky01;
float   ky02;
float   ky03;
float   ky04;
float   ky05;
float   ky06;
float   ky07;
float   ky08;
float   ky09;
float   ky10;
float   ky11;
float   ky12;
float   ky13;
float   ky14;
float   ky15;
float   ky16;

float   frid;

//
//Local function declarations
//
float(float ID) FragReportWhoAmI;
void() FragReportPrint;
void(float kt, float ky, string name, float active, float timeleft) FragReportPrintLine;
float() FragReportFindSlot;

//
//FragReportUpdate
// This function will match the attacker and targ
// entities to their local matrix entries and
// update them accordingly.  Called from ClientObituary.
//
void(entity attacker, entity targ) FragReportUpdate =
{
    local float ida;
    local float idt;
    local float tempa;
    local float tempb;
    local float  rnum;

    if (!deathmatch) {
        return;
    }

    if (attacker.classname == "teledeath") {
        // Teledeath 1
        // (attacker teleports on top of targ)
        tempa = attacker.owner.entity_ID;
        tempb = targ.entity_ID;
    }
    else if (attacker.classname == "teledeath2") {
        // Teledeath 2
        // (target teleports on top of someone with
        //  pentagram of protection and bites it..
        //  treated as a suicide (frag-1) in basic Quake)
        tempa = targ.entity_ID;
        tempb = tempa;
    }
    else if (attacker.classname == "player") {
        // Regular frag
        // (attacker gibs targ)
        tempa = attacker.entity_ID;
        tempb = targ.entity_ID;
    }
    else {
        // Suicide
        // (targ kills self via environment)
        tempa = targ.entity_ID;
        tempb = tempa;
    }

    // Based on names, determine
    // indices into data array
    ida = FragReportWhoAmI(tempa);
    idt = FragReportWhoAmI(tempb);

    // Use indices to determine which
    // matrix element to increment
    if (ida == 1) {
        if (idt == 1) {
            p01k01 = p01k01 + 1;
        }
        else if (idt == 2) {
            p01k02 = p01k02 + 1;
        }
        else if (idt == 3) {
            p01k03 = p01k03 + 1;
        }
        else if (idt == 4) {
            p01k04 = p01k04 + 1;
        }
        else if (idt == 5) {
            p01k05 = p01k05 + 1;
        }
        else if (idt == 6) {
            p01k06 = p01k06 + 1;
        }
        else if (idt == 7) {
            p01k07 = p01k07 + 1;
        }
        else if (idt == 8) {
            p01k08 = p01k08 + 1;
        }
        else if (idt == 9) {
            p01k09 = p01k09 + 1;
        }
        else if (idt == 10) {
            p01k10 = p01k10 + 1;
        }
        else if (idt == 11) {
            p01k11 = p01k11 + 1;
        }
        else if (idt == 12) {
            p01k12 = p01k12 + 1;
        }
        else if (idt == 13) {
            p01k13 = p01k13 + 1;
        }
        else if (idt == 14) {
            p01k14 = p01k14 + 1;
        }
        else if (idt == 15) {
            p01k15 = p01k15 + 1;
        }
        else if (idt == 16) {
            p01k16 = p01k16 + 1;
        }
    }
    else if (ida == 2) {
        if (idt == 1) {
            p02k01 = p02k01 + 1;
        }
        else if (idt == 2) {
            p02k02 = p02k02 + 1;
        }
        else if (idt == 3) {
            p02k03 = p02k03 + 1;
        }
        else if (idt == 4) {
            p02k04 = p02k04 + 1;
        }
        else if (idt == 5) {
            p02k05 = p02k05 + 1;
        }
        else if (idt == 6) {
            p02k06 = p02k06 + 1;
        }
        else if (idt == 7) {
            p02k07 = p02k07 + 1;
        }
        else if (idt == 8) {
            p02k08 = p02k08 + 1;
        }
        else if (idt == 9) {
            p02k09 = p02k09 + 1;
        }
        else if (idt == 10) {
            p02k10 = p02k10 + 1;
        }
        else if (idt == 11) {
            p02k11 = p02k11 + 1;
        }
        else if (idt == 12) {
            p02k12 = p02k12 + 1;
        }
        else if (idt == 13) {
            p02k13 = p02k13 + 1;
        }
        else if (idt == 14) {
            p02k14 = p02k14 + 1;
        }
        else if (idt == 15) {
            p02k15 = p02k15 + 1;
        }
        else if (idt == 16) {
            p02k16 = p02k16 + 1;
        }
    }
    else if (ida == 3) {
        if (idt == 1) {
            p03k01 = p03k01 + 1;
        }
        else if (idt == 2) {
            p03k02 = p03k02 + 1;
        }
        else if (idt == 3) {
            p03k03 = p03k03 + 1;
        }
        else if (idt == 4) {
            p03k04 = p03k04 + 1;
        }
        else if (idt == 5) {
            p03k05 = p03k05 + 1;
        }
        else if (idt == 6) {
            p03k06 = p03k06 + 1;
        }
        else if (idt == 7) {
            p03k07 = p03k07 + 1;
        }
        else if (idt == 8) {
            p03k08 = p03k08 + 1;
        }
        else if (idt == 9) {
            p03k09 = p03k09 + 1;
        }
        else if (idt == 10) {
            p03k10 = p03k10 + 1;
        }
        else if (idt == 11) {
            p03k11 = p03k11 + 1;
        }
        else if (idt == 12) {
            p03k12 = p03k12 + 1;
        }
        else if (idt == 13) {
            p03k13 = p03k13 + 1;
        }
        else if (idt == 14) {
            p03k14 = p03k14 + 1;
        }
        else if (idt == 15) {
            p03k15 = p03k15 + 1;
        }
        else if (idt == 16) {
            p03k16 = p03k16 + 1;
        }
    }
    else if (ida == 4) {
        if (idt == 1) {
            p04k01 = p04k01 + 1;
        }
        else if (idt == 2) {
            p04k02 = p04k02 + 1;
        }
        else if (idt == 3) {
            p04k03 = p04k03 + 1;
        }
        else if (idt == 4) {
            p04k04 = p04k04 + 1;
        }
        else if (idt == 5) {
            p04k05 = p04k05 + 1;
        }
        else if (idt == 6) {
            p04k06 = p04k06 + 1;
        }
        else if (idt == 7) {
            p04k07 = p04k07 + 1;
        }
        else if (idt == 8) {
            p04k08 = p04k08 + 1;
        }
        else if (idt == 9) {
            p04k09 = p04k09 + 1;
        }
        else if (idt == 10) {
            p04k10 = p04k10 + 1;
        }
        else if (idt == 11) {
            p04k11 = p04k11 + 1;
        }
        else if (idt == 12) {
            p04k12 = p04k12 + 1;
        }
        else if (idt == 13) {
            p04k13 = p04k13 + 1;
        }
        else if (idt == 14) {
            p04k14 = p04k14 + 1;
        }
        else if (idt == 15) {
            p04k15 = p04k15 + 1;
        }
        else if (idt == 16) {
            p04k16 = p04k16 + 1;
        }
    }
    else if (ida == 5) {
        if (idt == 1) {
            p05k01 = p05k01 + 1;
        }
        else if (idt == 2) {
            p05k02 = p05k02 + 1;
        }
        else if (idt == 3) {
            p05k03 = p05k03 + 1;
        }
        else if (idt == 4) {
            p05k04 = p05k04 + 1;
        }
        else if (idt == 5) {
            p05k05 = p05k05 + 1;
        }
        else if (idt == 6) {
            p05k06 = p05k06 + 1;
        }
        else if (idt == 7) {
            p05k07 = p05k07 + 1;
        }
        else if (idt == 8) {
            p05k08 = p05k08 + 1;
        }
        else if (idt == 9) {
            p05k09 = p05k09 + 1;
        }
        else if (idt == 10) {
            p05k10 = p05k10 + 1;
        }
        else if (idt == 11) {
            p05k11 = p05k11 + 1;
        }
        else if (idt == 12) {
            p05k12 = p05k12 + 1;
        }
        else if (idt == 13) {
            p05k13 = p05k13 + 1;
        }
        else if (idt == 14) {
            p05k14 = p05k14 + 1;
        }
        else if (idt == 15) {
            p05k15 = p05k15 + 1;
        }
        else if (idt == 16) {
            p05k16 = p05k16 + 1;
        }
    }
    else if (ida == 6) {
        if (idt == 1) {
            p06k01 = p06k01 + 1;
        }
        else if (idt == 2) {
            p06k02 = p06k02 + 1;
        }
        else if (idt == 3) {
            p06k03 = p06k03 + 1;
        }
        else if (idt == 4) {
            p06k04 = p06k04 + 1;
        }
        else if (idt == 5) {
            p06k05 = p06k05 + 1;
        }
        else if (idt == 6) {
            p06k06 = p06k06 + 1;
        }
        else if (idt == 7) {
            p06k07 = p06k07 + 1;
        }
        else if (idt == 8) {
            p06k08 = p06k08 + 1;
        }
        else if (idt == 9) {
            p06k09 = p06k09 + 1;
        }
        else if (idt == 10) {
            p06k10 = p06k10 + 1;
        }
        else if (idt == 11) {
            p06k11 = p06k11 + 1;
        }
        else if (idt == 12) {
            p06k12 = p06k12 + 1;
        }
        else if (idt == 13) {
            p06k13 = p06k13 + 1;
        }
        else if (idt == 14) {
            p06k14 = p06k14 + 1;
        }
        else if (idt == 15) {
            p06k15 = p06k15 + 1;
        }
        else if (idt == 16) {
            p06k16 = p06k16 + 1;
        }
    }
    else if (ida == 7) {
        if (idt == 1) {
            p07k01 = p07k01 + 1;
        }
        else if (idt == 2) {
            p07k02 = p07k02 + 1;
        }
        else if (idt == 3) {
            p07k03 = p07k03 + 1;
        }
        else if (idt == 4) {
            p07k04 = p07k04 + 1;
        }
        else if (idt == 5) {
            p07k05 = p07k05 + 1;
        }
        else if (idt == 6) {
            p07k06 = p07k06 + 1;
        }
        else if (idt == 7) {
            p07k07 = p07k07 + 1;
        }
        else if (idt == 8) {
            p07k08 = p07k08 + 1;
        }
        else if (idt == 9) {
            p07k09 = p07k09 + 1;
        }
        else if (idt == 10) {
            p07k10 = p07k10 + 1;
        }
        else if (idt == 11) {
            p07k11 = p07k11 + 1;
        }
        else if (idt == 12) {
            p07k12 = p07k12 + 1;
        }
        else if (idt == 13) {
            p07k13 = p07k13 + 1;
        }
        else if (idt == 14) {
            p07k14 = p07k14 + 1;
        }
        else if (idt == 15) {
            p07k15 = p07k15 + 1;
        }
        else if (idt == 16) {
            p07k16 = p07k16 + 1;
        }
    }
    else if (ida == 8) {
        if (idt == 1) {
            p08k01 = p08k01 + 1;
        }
        else if (idt == 2) {
            p08k02 = p08k02 + 1;
        }
        else if (idt == 3) {
            p08k03 = p08k03 + 1;
        }
        else if (idt == 4) {
            p08k04 = p08k04 + 1;
        }
        else if (idt == 5) {
            p08k05 = p08k05 + 1;
        }
        else if (idt == 6) {
            p08k06 = p08k06 + 1;
        }
        else if (idt == 7) {
            p08k07 = p08k07 + 1;
        }
        else if (idt == 8) {
            p08k08 = p08k08 + 1;
        }
        else if (idt == 9) {
            p08k09 = p08k09 + 1;
        }
        else if (idt == 10) {
            p08k10 = p08k10 + 1;
        }
        else if (idt == 11) {
            p08k11 = p08k11 + 1;
        }
        else if (idt == 12) {
            p08k12 = p08k12 + 1;
        }
        else if (idt == 13) {
            p08k13 = p08k13 + 1;
        }
        else if (idt == 14) {
            p08k14 = p08k14 + 1;
        }
        else if (idt == 15) {
            p08k15 = p08k15 + 1;
        }
        else if (idt == 16) {
            p08k16 = p08k16 + 1;
        }
    }
    else if (ida == 9) {
        if (idt == 1) {
            p09k01 = p09k01 + 1;
        }
        else if (idt == 2) {
            p09k02 = p09k02 + 1;
        }
        else if (idt == 3) {
            p09k03 = p09k03 + 1;
        }
        else if (idt == 4) {
            p09k04 = p09k04 + 1;
        }
        else if (idt == 5) {
            p09k05 = p09k05 + 1;
        }
        else if (idt == 6) {
            p09k06 = p09k06 + 1;
        }
        else if (idt == 7) {
            p09k07 = p09k07 + 1;
        }
        else if (idt == 8) {
            p09k08 = p09k08 + 1;
        }
        else if (idt == 9) {
            p09k09 = p09k09 + 1;
        }
        else if (idt == 10) {
            p09k10 = p09k10 + 1;
        }
        else if (idt == 11) {
            p09k11 = p09k11 + 1;
        }
        else if (idt == 12) {
            p09k12 = p09k12 + 1;
        }
        else if (idt == 13) {
            p09k13 = p09k13 + 1;
        }
        else if (idt == 14) {
            p09k14 = p09k14 + 1;
        }
        else if (idt == 15) {
            p09k15 = p09k15 + 1;
        }
        else if (idt == 16) {
            p09k16 = p09k16 + 1;
        }
    }
    else if (ida == 10) {
        if (idt == 1) {
            p10k01 = p10k01 + 1;
        }
        else if (idt == 2) {
            p10k02 = p10k02 + 1;
        }
        else if (idt == 3) {
            p10k03 = p10k03 + 1;
        }
        else if (idt == 4) {
            p10k04 = p10k04 + 1;
        }
        else if (idt == 5) {
            p10k05 = p10k05 + 1;
        }
        else if (idt == 6) {
            p10k06 = p10k06 + 1;
        }
        else if (idt == 7) {
            p10k07 = p10k07 + 1;
        }
        else if (idt == 8) {
            p10k08 = p10k08 + 1;
        }
        else if (idt == 9) {
            p10k09 = p10k09 + 1;
        }
        else if (idt == 10) {
            p10k10 = p10k10 + 1;
        }
        else if (idt == 11) {
            p10k11 = p10k11 + 1;
        }
        else if (idt == 12) {
            p10k12 = p10k12 + 1;
        }
        else if (idt == 13) {
            p10k13 = p10k13 + 1;
        }
        else if (idt == 14) {
            p10k14 = p10k14 + 1;
        }
        else if (idt == 15) {
            p10k15 = p10k15 + 1;
        }
        else if (idt == 16) {
            p10k16 = p10k16 + 1;
        }
    }
    else if (ida == 11) {
        if (idt == 1) {
            p11k01 = p11k01 + 1;
        }
        else if (idt == 2) {
            p11k02 = p11k02 + 1;
        }
        else if (idt == 3) {
            p11k03 = p11k03 + 1;
        }
        else if (idt == 4) {
            p11k04 = p11k04 + 1;
        }
        else if (idt == 5) {
            p11k05 = p11k05 + 1;
        }
        else if (idt == 6) {
            p11k06 = p11k06 + 1;
        }
        else if (idt == 7) {
            p11k07 = p11k07 + 1;
        }
        else if (idt == 8) {
            p11k08 = p11k08 + 1;
        }
        else if (idt == 9) {
            p11k09 = p11k09 + 1;
        }
        else if (idt == 10) {
            p11k10 = p11k10 + 1;
        }
        else if (idt == 11) {
            p11k11 = p11k11 + 1;
        }
        else if (idt == 12) {
            p11k12 = p11k12 + 1;
        }
        else if (idt == 13) {
            p11k13 = p11k13 + 1;
        }
        else if (idt == 14) {
            p11k14 = p11k14 + 1;
        }
        else if (idt == 15) {
            p11k15 = p11k15 + 1;
        }
        else if (idt == 16) {
            p11k16 = p11k16 + 1;
        }
    }
    else if (ida == 12) {
        if (idt == 1) {
            p12k01 = p12k01 + 1;
        }
        else if (idt == 2) {
            p12k02 = p12k02 + 1;
        }
        else if (idt == 3) {
            p12k03 = p12k03 + 1;
        }
        else if (idt == 4) {
            p12k04 = p12k04 + 1;
        }
        else if (idt == 5) {
            p12k05 = p12k05 + 1;
        }
        else if (idt == 6) {
            p12k06 = p12k06 + 1;
        }
        else if (idt == 7) {
            p12k07 = p12k07 + 1;
        }
        else if (idt == 8) {
            p12k08 = p12k08 + 1;
        }
        else if (idt == 9) {
            p12k09 = p12k09 + 1;
        }
        else if (idt == 10) {
            p12k10 = p12k10 + 1;
        }
        else if (idt == 11) {
            p12k11 = p12k11 + 1;
        }
        else if (idt == 12) {
            p12k12 = p12k12 + 1;
        }
        else if (idt == 13) {
            p12k13 = p12k13 + 1;
        }
        else if (idt == 14) {
            p12k14 = p12k14 + 1;
        }
        else if (idt == 15) {
            p12k15 = p12k15 + 1;
        }
        else if (idt == 16) {
            p12k16 = p12k16 + 1;
        }
    }
    else if (ida == 13) {
        if (idt == 1) {
            p13k01 = p13k01 + 1;
        }
        else if (idt == 2) {
            p13k02 = p13k02 + 1;
        }
        else if (idt == 3) {
            p13k03 = p13k03 + 1;
        }
        else if (idt == 4) {
            p13k04 = p13k04 + 1;
        }
        else if (idt == 5) {
            p13k05 = p13k05 + 1;
        }
        else if (idt == 6) {
            p13k06 = p13k06 + 1;
        }
        else if (idt == 7) {
            p13k07 = p13k07 + 1;
        }
        else if (idt == 8) {
            p13k08 = p13k08 + 1;
        }
        else if (idt == 9) {
            p13k09 = p13k09 + 1;
        }
        else if (idt == 10) {
            p13k10 = p13k10 + 1;
        }
        else if (idt == 11) {
            p13k11 = p13k11 + 1;
        }
        else if (idt == 12) {
            p13k12 = p13k12 + 1;
        }
        else if (idt == 13) {
            p13k13 = p13k13 + 1;
        }
        else if (idt == 14) {
            p13k14 = p13k14 + 1;
        }
        else if (idt == 15) {
            p13k15 = p13k15 + 1;
        }
        else if (idt == 16) {
            p13k16 = p13k16 + 1;
        }
    }
    else if (ida == 14) {
        if (idt == 1) {
            p14k01 = p14k01 + 1;
        }
        else if (idt == 2) {
            p14k02 = p14k02 + 1;
        }
        else if (idt == 3) {
            p14k03 = p14k03 + 1;
        }
        else if (idt == 4) {
            p14k04 = p14k04 + 1;
        }
        else if (idt == 5) {
            p14k05 = p14k05 + 1;
        }
        else if (idt == 6) {
            p14k06 = p14k06 + 1;
        }
        else if (idt == 7) {
            p14k07 = p14k07 + 1;
        }
        else if (idt == 8) {
            p14k08 = p14k08 + 1;
        }
        else if (idt == 9) {
            p14k09 = p14k09 + 1;
        }
        else if (idt == 10) {
            p14k10 = p14k10 + 1;
        }
        else if (idt == 11) {
            p14k11 = p14k11 + 1;
        }
        else if (idt == 12) {
            p14k12 = p14k12 + 1;
        }
        else if (idt == 13) {
            p14k13 = p14k13 + 1;
        }
        else if (idt == 14) {
            p14k14 = p14k14 + 1;
        }
        else if (idt == 15) {
            p14k15 = p14k15 + 1;
        }
        else if (idt == 16) {
            p14k16 = p14k16 + 1;
        }
    }
    else if (ida == 15) {
        if (idt == 1) {
            p15k01 = p15k01 + 1;
        }
        else if (idt == 2) {
            p15k02 = p15k02 + 1;
        }
        else if (idt == 3) {
            p15k03 = p15k03 + 1;
        }
        else if (idt == 4) {
            p15k04 = p15k04 + 1;
        }
        else if (idt == 5) {
            p15k05 = p15k05 + 1;
        }
        else if (idt == 6) {
            p15k06 = p15k06 + 1;
        }
        else if (idt == 7) {
            p15k07 = p15k07 + 1;
        }
        else if (idt == 8) {
            p15k08 = p15k08 + 1;
        }
        else if (idt == 9) {
            p15k09 = p15k09 + 1;
        }
        else if (idt == 10) {
            p15k10 = p15k10 + 1;
        }
        else if (idt == 11) {
            p15k11 = p15k11 + 1;
        }
        else if (idt == 12) {
            p15k12 = p15k12 + 1;
        }
        else if (idt == 13) {
            p15k13 = p15k13 + 1;
        }
        else if (idt == 14) {
            p15k14 = p15k14 + 1;
        }
        else if (idt == 15) {
            p15k15 = p15k15 + 1;
        }
        else if (idt == 16) {
            p15k16 = p15k16 + 1;
        }
    }
    else if (ida == 16) {
        if (idt == 1) {
            p16k01 = p16k01 + 1;
        }
        else if (idt == 2) {
            p16k02 = p16k02 + 1;
        }
        else if (idt == 3) {
            p16k03 = p16k03 + 1;
        }
        else if (idt == 4) {
            p16k04 = p16k04 + 1;
        }
        else if (idt == 5) {
            p16k05 = p16k05 + 1;
        }
        else if (idt == 6) {
            p16k06 = p16k06 + 1;
        }
        else if (idt == 7) {
            p16k07 = p16k07 + 1;
        }
        else if (idt == 8) {
            p16k08 = p16k08 + 1;
        }
        else if (idt == 9) {
            p16k09 = p16k09 + 1;
        }
        else if (idt == 10) {
            p16k10 = p16k10 + 1;
        }
        else if (idt == 11) {
            p16k11 = p16k11 + 1;
        }
        else if (idt == 12) {
            p16k12 = p16k12 + 1;
        }
        else if (idt == 13) {
            p16k13 = p16k13 + 1;
        }
        else if (idt == 14) {
            p16k14 = p16k14 + 1;
        }
        else if (idt == 15) {
            p16k15 = p16k15 + 1;
        }
        else if (idt == 16) {
            p16k16 = p16k16 + 1;
        }
    }

};

//
//FragReport
// This function is called via an IMPULSE command,
// and will print out the relevant stats for the
// caller.  Called from ImpulseCommands.
//
void() FragReport =
{
    local float temp;

    if (!deathmatch) {
        return;
    }

    temp = self.entity_ID;

    // Determine data id of calling
    // player
    frid = FragReportWhoAmI(temp);

    // Based on id, load up the
    // kt** and ky** "arguments"
    // for a later call to FragReportPrint
    if (frid == 1) {
        kt01 = p01k01;
        kt02 = p01k02;
        kt03 = p01k03;
        kt04 = p01k04;
        kt05 = p01k05;
        kt06 = p01k06;
        kt07 = p01k07;
        kt08 = p01k08;
        kt09 = p01k09;
        kt10 = p01k10;
        kt11 = p01k11;
        kt12 = p01k12;
        kt13 = p01k13;
        kt14 = p01k14;
        kt15 = p01k15;
        kt16 = p01k16;
        ky01 = p01k01;
        ky02 = p02k01;
        ky03 = p03k01;
        ky04 = p04k01;
        ky05 = p05k01;
        ky06 = p06k01;
        ky07 = p07k01;
        ky08 = p08k01;
        ky09 = p09k01;
        ky10 = p10k01;
        ky11 = p11k01;
        ky12 = p12k01;
        ky13 = p13k01;
        ky14 = p14k01;
        ky15 = p15k01;
        ky16 = p16k01;
    }
    else if (frid == 2) {
        kt01 = p02k01;
        kt02 = p02k02;
        kt03 = p02k03;
        kt04 = p02k04;
        kt05 = p02k05;
        kt06 = p02k06;
        kt07 = p02k07;
        kt08 = p02k08;
        kt09 = p02k09;
        kt10 = p02k10;
        kt11 = p02k11;
        kt12 = p02k12;
        kt13 = p02k13;
        kt14 = p02k14;
        kt15 = p02k15;
        kt16 = p02k16;
        ky01 = p01k02;
        ky02 = p02k02;
        ky03 = p03k02;
        ky04 = p04k02;
        ky05 = p05k02;
        ky06 = p06k02;
        ky07 = p07k02;
        ky08 = p08k02;
        ky09 = p09k02;
        ky10 = p10k02;
        ky11 = p11k02;
        ky12 = p12k02;
        ky13 = p13k02;
        ky14 = p14k02;
        ky15 = p15k02;
        ky16 = p16k02;
    }
    else if (frid == 3) {
        kt01 = p03k01;
        kt02 = p03k02;
        kt03 = p03k03;
        kt04 = p03k04;
        kt05 = p03k05;
        kt06 = p03k06;
        kt07 = p03k07;
        kt08 = p03k08;
        kt09 = p03k09;
        kt10 = p03k10;
        kt11 = p03k11;
        kt12 = p03k12;
        kt13 = p03k13;
        kt14 = p03k14;
        kt15 = p03k15;
        kt16 = p03k16;
        ky01 = p01k03;
        ky02 = p02k03;
        ky03 = p03k03;
        ky04 = p04k03;
        ky05 = p05k03;
        ky06 = p06k03;
        ky07 = p07k03;
        ky08 = p08k03;
        ky09 = p09k03;
        ky10 = p10k03;
        ky11 = p11k03;
        ky12 = p12k03;
        ky13 = p13k03;
        ky14 = p14k03;
        ky15 = p15k03;
        ky16 = p16k03;
    }
    else if (frid == 4) {
        kt01 = p04k01;
        kt02 = p04k02;
        kt03 = p04k03;
        kt04 = p04k04;
        kt05 = p04k05;
        kt06 = p04k06;
        kt07 = p04k07;
        kt08 = p04k08;
        kt09 = p04k09;
        kt10 = p04k10;
        kt11 = p04k11;
        kt12 = p04k12;
        kt13 = p04k13;
        kt14 = p04k14;
        kt15 = p04k15;
        kt16 = p04k16;
        ky01 = p01k04;
        ky02 = p02k04;
        ky03 = p03k04;
        ky04 = p04k04;
        ky05 = p05k04;
        ky06 = p06k04;
        ky07 = p07k04;
        ky08 = p08k04;
        ky09 = p09k04;
        ky10 = p10k04;
        ky11 = p11k04;
        ky12 = p12k04;
        ky13 = p13k04;
        ky14 = p14k04;
        ky15 = p15k04;
        ky16 = p16k04;
    }
    else if (frid == 5) {
        kt01 = p05k01;
        kt02 = p05k02;
        kt03 = p05k03;
        kt04 = p05k04;
        kt05 = p05k05;
        kt06 = p05k06;
        kt07 = p05k07;
        kt08 = p05k08;
        kt09 = p05k09;
        kt10 = p05k10;
        kt11 = p05k11;
        kt12 = p05k12;
        kt13 = p05k13;
        kt14 = p05k14;
        kt15 = p05k15;
        kt16 = p05k16;
        ky01 = p01k05;
        ky02 = p02k05;
        ky03 = p03k05;
        ky04 = p04k05;
        ky05 = p05k05;
        ky06 = p06k05;
        ky07 = p07k05;
        ky08 = p08k05;
        ky09 = p09k05;
        ky10 = p10k05;
        ky11 = p11k05;
        ky12 = p12k05;
        ky13 = p13k05;
        ky14 = p14k05;
        ky15 = p15k05;
        ky16 = p16k05;
    }
    else if (frid == 6) {
        kt01 = p06k01;
        kt02 = p06k02;
        kt03 = p06k03;
        kt04 = p06k04;
        kt05 = p06k05;
        kt06 = p06k06;
        kt07 = p06k07;
        kt08 = p06k08;
        kt09 = p06k09;
        kt10 = p06k10;
        kt11 = p06k11;
        kt12 = p06k12;
        kt13 = p06k13;
        kt14 = p06k14;
        kt15 = p06k15;
        kt16 = p06k16;
        ky01 = p01k06;
        ky02 = p02k06;
        ky03 = p03k06;
        ky04 = p04k06;
        ky05 = p05k06;
        ky06 = p06k06;
        ky07 = p07k06;
        ky08 = p08k06;
        ky09 = p09k06;
        ky10 = p10k06;
        ky11 = p11k06;
        ky12 = p12k06;
        ky13 = p13k06;
        ky14 = p14k06;
        ky15 = p15k06;
        ky16 = p16k06;
    }
    else if (frid == 7) {
        kt01 = p07k01;
        kt02 = p07k02;
        kt03 = p07k03;
        kt04 = p07k04;
        kt05 = p07k05;
        kt06 = p07k06;
        kt07 = p07k07;
        kt08 = p07k08;
        kt09 = p07k09;
        kt10 = p07k10;
        kt11 = p07k11;
        kt12 = p07k12;
        kt13 = p07k13;
        kt14 = p07k14;
        kt15 = p07k15;
        kt16 = p07k16;
        ky01 = p01k07;
        ky02 = p02k07;
        ky03 = p03k07;
        ky04 = p04k07;
        ky05 = p05k07;
        ky06 = p06k07;
        ky07 = p07k07;
        ky08 = p08k07;
        ky09 = p09k07;
        ky10 = p10k07;
        ky11 = p11k07;
        ky12 = p12k07;
        ky13 = p13k07;
        ky14 = p14k07;
        ky15 = p15k07;
        ky16 = p16k07;
    }
    else if (frid == 8) {
        kt01 = p08k01;
        kt02 = p08k02;
        kt03 = p08k03;
        kt04 = p08k04;
        kt05 = p08k05;
        kt06 = p08k06;
        kt07 = p08k07;
        kt08 = p08k08;
        kt09 = p08k09;
        kt10 = p08k10;
        kt11 = p08k11;
        kt12 = p08k12;
        kt13 = p08k13;
        kt14 = p08k14;
        kt15 = p08k15;
        kt16 = p08k16;
        ky01 = p01k08;
        ky02 = p02k08;
        ky03 = p03k08;
        ky04 = p04k08;
        ky05 = p05k08;
        ky06 = p06k08;
        ky07 = p07k08;
        ky08 = p08k08;
        ky09 = p09k08;
        ky10 = p10k08;
        ky11 = p11k08;
        ky12 = p12k08;
        ky13 = p13k08;
        ky14 = p14k08;
        ky15 = p15k08;
        ky16 = p16k08;
    }
    else if (frid == 9) {
        kt01 = p09k01;
        kt02 = p09k02;
        kt03 = p09k03;
        kt04 = p09k04;
        kt05 = p09k05;
        kt06 = p09k06;
        kt07 = p09k07;
        kt08 = p09k08;
        kt09 = p09k09;
        kt10 = p09k10;
        kt11 = p09k11;
        kt12 = p09k12;
        kt13 = p09k13;
        kt14 = p09k14;
        kt15 = p09k15;
        kt16 = p09k16;
        ky01 = p01k09;
        ky02 = p02k09;
        ky03 = p03k09;
        ky04 = p04k09;
        ky05 = p05k09;
        ky06 = p06k09;
        ky07 = p07k09;
        ky08 = p08k09;
        ky09 = p09k09;
        ky10 = p10k09;
        ky11 = p11k09;
        ky12 = p12k09;
        ky13 = p13k09;
        ky14 = p14k09;
        ky15 = p15k09;
        ky16 = p16k09;
    }
    else if (frid == 10) {
        kt01 = p10k01;
        kt02 = p10k02;
        kt03 = p10k03;
        kt04 = p10k04;
        kt05 = p10k05;
        kt06 = p10k06;
        kt07 = p10k07;
        kt08 = p10k08;
        kt09 = p10k09;
        kt10 = p10k10;
        kt11 = p10k11;
        kt12 = p10k12;
        kt13 = p10k13;
        kt14 = p10k14;
        kt15 = p10k15;
        kt16 = p10k16;
        ky01 = p01k10;
        ky02 = p02k10;
        ky03 = p03k10;
        ky04 = p04k10;
        ky05 = p05k10;
        ky06 = p06k10;
        ky07 = p07k10;
        ky08 = p08k10;
        ky09 = p09k10;
        ky10 = p10k10;
        ky11 = p11k10;
        ky12 = p12k10;
        ky13 = p13k10;
        ky14 = p14k10;
        ky15 = p15k10;
        ky16 = p16k10;
    }
    else if (frid == 11) {
        kt01 = p11k01;
        kt02 = p11k02;
        kt03 = p11k03;
        kt04 = p11k04;
        kt05 = p11k05;
        kt06 = p11k06;
        kt07 = p11k07;
        kt08 = p11k08;
        kt09 = p11k09;
        kt10 = p11k10;
        kt11 = p11k11;
        kt12 = p11k12;
        kt13 = p11k13;
        kt14 = p11k14;
        kt15 = p11k15;
        kt16 = p11k16;
        ky01 = p01k11;
        ky02 = p02k11;
        ky03 = p03k11;
        ky04 = p04k11;
        ky05 = p05k11;
        ky06 = p06k11;
        ky07 = p07k11;
        ky08 = p08k11;
        ky09 = p09k11;
        ky10 = p10k11;
        ky11 = p11k11;
        ky12 = p12k11;
        ky13 = p13k11;
        ky14 = p14k11;
        ky15 = p15k11;
        ky16 = p16k11;
    }
    else if (frid == 12) {
        kt01 = p12k01;
        kt02 = p12k02;
        kt03 = p12k03;
        kt04 = p12k04;
        kt05 = p12k05;
        kt06 = p12k06;
        kt07 = p12k07;
        kt08 = p12k08;
        kt09 = p12k09;
        kt10 = p12k10;
        kt11 = p12k11;
        kt12 = p12k12;
        kt13 = p12k13;
        kt14 = p12k14;
        kt15 = p12k15;
        kt16 = p12k16;
        ky01 = p01k12;
        ky02 = p02k12;
        ky03 = p03k12;
        ky04 = p04k12;
        ky05 = p05k12;
        ky06 = p06k12;
        ky07 = p07k12;
        ky08 = p08k12;
        ky09 = p09k12;
        ky10 = p10k12;
        ky11 = p11k12;
        ky12 = p12k12;
        ky13 = p13k12;
        ky14 = p14k12;
        ky15 = p15k12;
        ky16 = p16k12;
    }
    else if (frid == 13) {
        kt01 = p13k01;
        kt02 = p13k02;
        kt03 = p13k03;
        kt04 = p13k04;
        kt05 = p13k05;
        kt06 = p13k06;
        kt07 = p13k07;
        kt08 = p13k08;
        kt09 = p13k09;
        kt10 = p13k10;
        kt11 = p13k11;
        kt12 = p13k12;
        kt13 = p13k13;
        kt14 = p13k14;
        kt15 = p13k15;
        kt16 = p13k16;
        ky01 = p01k13;
        ky02 = p02k13;
        ky03 = p03k13;
        ky04 = p04k13;
        ky05 = p05k13;
        ky06 = p06k13;
        ky07 = p07k13;
        ky08 = p08k13;
        ky09 = p09k13;
        ky10 = p10k13;
        ky11 = p11k13;
        ky12 = p12k13;
        ky13 = p13k13;
        ky14 = p14k13;
        ky15 = p15k13;
        ky16 = p16k13;
    }
    else if (frid == 14) {
        kt01 = p14k01;
        kt02 = p14k02;
        kt03 = p14k03;
        kt04 = p14k04;
        kt05 = p14k05;
        kt06 = p14k06;
        kt07 = p14k07;
        kt08 = p14k08;
        kt09 = p14k09;
        kt10 = p14k10;
        kt11 = p14k11;
        kt12 = p14k12;
        kt13 = p14k13;
        kt14 = p14k14;
        kt15 = p14k15;
        kt16 = p14k16;
        ky01 = p01k14;
        ky02 = p02k14;
        ky03 = p03k14;
        ky04 = p04k14;
        ky05 = p05k14;
        ky06 = p06k14;
        ky07 = p07k14;
        ky08 = p08k14;
        ky09 = p09k14;
        ky10 = p10k14;
        ky11 = p11k14;
        ky12 = p12k14;
        ky13 = p13k14;
        ky14 = p14k14;
        ky15 = p15k14;
        ky16 = p16k14;
    }
    else if (frid == 15) {
        kt01 = p15k01;
        kt02 = p15k02;
        kt03 = p15k03;
        kt04 = p15k04;
        kt05 = p15k05;
        kt06 = p15k06;
        kt07 = p15k07;
        kt08 = p15k08;
        kt09 = p15k09;
        kt10 = p15k10;
        kt11 = p15k11;
        kt12 = p15k12;
        kt13 = p15k13;
        kt14 = p15k14;
        kt15 = p15k15;
        kt16 = p15k16;
        ky01 = p01k15;
        ky02 = p02k15;
        ky03 = p03k15;
        ky04 = p04k15;
        ky05 = p05k15;
        ky06 = p06k15;
        ky07 = p07k15;
        ky08 = p08k15;
        ky09 = p09k15;
        ky10 = p10k15;
        ky11 = p11k15;
        ky12 = p12k15;
        ky13 = p13k15;
        ky14 = p14k15;
        ky15 = p15k15;
        ky16 = p16k15;
    }
    else if (frid == 16) {
        kt01 = p16k01;
        kt02 = p16k02;
        kt03 = p16k03;
        kt04 = p16k04;
        kt05 = p16k05;
        kt06 = p16k06;
        kt07 = p16k07;
        kt08 = p16k08;
        kt09 = p16k09;
        kt10 = p16k10;
        kt11 = p16k11;
        kt12 = p16k12;
        kt13 = p16k13;
        kt14 = p16k14;
        kt15 = p16k15;
        kt16 = p16k16;
        ky01 = p01k16;
        ky02 = p02k16;
        ky03 = p03k16;
        ky04 = p04k16;
        ky05 = p05k16;
        ky06 = p06k16;
        ky07 = p07k16;
        ky08 = p08k16;
        ky09 = p09k16;
        ky10 = p10k16;
        ky11 = p11k16;
        ky12 = p12k16;
        ky13 = p13k16;
        ky14 = p14k16;
        ky15 = p15k16;
        ky16 = p16k16;
    }
    //Call FragReportPrint, which
    //does the actual printing to
    //the screen.
    FragReportPrint();
    return;
};

//
//FragReportRegister
// This is an initialization routine
// that is called everytime a new client
// connects to the server.  Called from
// ClientConnect.
//
void(entity c) FragReportRegister =
{
    local float empty_slot;

    if (!deathmatch) {
        return;
    }

    // Check each player data slot to
    // see if it is currently in use.
    // If so, continue on to the next one.
    // When an unused data slot is found,
    // the client's netname is saved as an
    // id tag for that slot, the active
    // flag is set, and the data elements
    // are cleared (kills for AND against
    // a player).
    empty_slot = FragReportFindSlot();
    if (empty_slot == 1) {
        Player01Name = c.netname;
        c.entity_ID = random();
        Player01ID = c.entity_ID;
        Player01Active = 3;
        p01k01 = 0;
        p01k02 = 0;
        p01k03 = 0;
        p01k04 = 0;
        p01k05 = 0;
        p01k06 = 0;
        p01k07 = 0;
        p01k08 = 0;
        p01k09 = 0;
        p01k10 = 0;
        p01k11 = 0;
        p01k12 = 0;
        p01k13 = 0;
        p01k14 = 0;
        p01k15 = 0;
        p01k16 = 0;
        p02k01 = 0;
        p03k01 = 0;
        p04k01 = 0;
        p05k01 = 0;
        p06k01 = 0;
        p07k01 = 0;
        p08k01 = 0;
        p09k01 = 0;
        p10k01 = 0;
        p11k01 = 0;
        p12k01 = 0;
        p13k01 = 0;
        p14k01 = 0;
        p15k01 = 0;
        p16k01 = 0;
    }
    else if (empty_slot == 2) {
        Player02Name = c.netname;
        c.entity_ID = random();
        Player02ID = c.entity_ID;
        Player02Active = 3;
        p02k01 = 0;
        p02k02 = 0;
        p02k03 = 0;
        p02k04 = 0;
        p02k05 = 0;
        p02k06 = 0;
        p02k07 = 0;
        p02k08 = 0;
        p02k09 = 0;
        p02k10 = 0;
        p02k11 = 0;
        p02k12 = 0;
        p02k13 = 0;
        p02k14 = 0;
        p02k15 = 0;
        p02k16 = 0;
        p01k02 = 0;
        p03k02 = 0;
        p04k02 = 0;
        p05k02 = 0;
        p06k02 = 0;
        p07k02 = 0;
        p08k02 = 0;
        p09k02 = 0;
        p10k02 = 0;
        p11k02 = 0;
        p12k02 = 0;
        p13k02 = 0;
        p14k02 = 0;
        p15k02 = 0;
        p16k02 = 0;
    }
    else if (empty_slot == 3) {
        Player03Name = c.netname;
        c.entity_ID = random();
        Player03ID = c.entity_ID;
        Player03Active = 3;
        p03k01 = 0;
        p03k02 = 0;
        p03k03 = 0;
        p03k04 = 0;
        p03k05 = 0;
        p03k06 = 0;
        p03k07 = 0;
        p03k08 = 0;
        p03k09 = 0;
        p03k10 = 0;
        p03k11 = 0;
        p03k12 = 0;
        p03k13 = 0;
        p03k14 = 0;
        p03k15 = 0;
        p03k16 = 0;
        p01k03 = 0;
        p02k03 = 0;
        p04k03 = 0;
        p05k03 = 0;
        p06k03 = 0;
        p07k03 = 0;
        p08k03 = 0;
        p09k03 = 0;
        p10k03 = 0;
        p11k03 = 0;
        p12k03 = 0;
        p13k03 = 0;
        p14k03 = 0;
        p15k03 = 0;
        p16k03 = 0;
    }
    else if (empty_slot == 4) {
        Player04Name = c.netname;
        c.entity_ID = random();
        Player04ID = c.entity_ID;
        Player04Active = 3;
        p04k01 = 0;
        p04k02 = 0;
        p04k03 = 0;
        p04k04 = 0;
        p04k05 = 0;
        p04k06 = 0;
        p04k07 = 0;
        p04k08 = 0;
        p04k09 = 0;
        p04k10 = 0;
        p04k11 = 0;
        p04k12 = 0;
        p04k13 = 0;
        p04k14 = 0;
        p04k15 = 0;
        p04k16 = 0;
        p01k04 = 0;
        p02k04 = 0;
        p03k04 = 0;
        p05k04 = 0;
        p06k04 = 0;
        p07k04 = 0;
        p08k04 = 0;
        p09k04 = 0;
        p10k04 = 0;
        p11k04 = 0;
        p12k04 = 0;
        p13k04 = 0;
        p14k04 = 0;
        p15k04 = 0;
        p16k04 = 0;
    }
    else if (empty_slot == 5) {
        Player05Name = c.netname;
        c.entity_ID = random();
        Player05ID = c.entity_ID;
        Player05Active = 3;
        p05k01 = 0;
        p05k02 = 0;
        p05k03 = 0;
        p05k04 = 0;
        p05k05 = 0;
        p05k06 = 0;
        p05k07 = 0;
        p05k08 = 0;
        p05k09 = 0;
        p05k10 = 0;
        p05k11 = 0;
        p05k12 = 0;
        p05k13 = 0;
        p05k14 = 0;
        p05k15 = 0;
        p05k16 = 0;
        p01k05 = 0;
        p02k05 = 0;
        p03k05 = 0;
        p04k05 = 0;
        p06k05 = 0;
        p07k05 = 0;
        p08k05 = 0;
        p09k05 = 0;
        p10k05 = 0;
        p11k05 = 0;
        p12k05 = 0;
        p13k05 = 0;
        p14k05 = 0;
        p15k05 = 0;
        p16k05 = 0;
    }
    else if (empty_slot == 6) {
        Player06Name = c.netname;
        c.entity_ID = random();
        Player06ID = c.entity_ID;
        Player06Active = 3;
        p06k01 = 0;
        p06k02 = 0;
        p06k03 = 0;
        p06k04 = 0;
        p06k05 = 0;
        p06k06 = 0;
        p06k07 = 0;
        p06k08 = 0;
        p06k09 = 0;
        p06k10 = 0;
        p06k11 = 0;
        p06k12 = 0;
        p06k13 = 0;
        p06k14 = 0;
        p06k15 = 0;
        p06k16 = 0;
        p01k06 = 0;
        p02k06 = 0;
        p03k06 = 0;
        p04k06 = 0;
        p05k06 = 0;
        p07k06 = 0;
        p08k06 = 0;
        p09k06 = 0;
        p10k06 = 0;
        p11k06 = 0;
        p12k06 = 0;
        p13k06 = 0;
        p14k06 = 0;
        p15k06 = 0;
        p16k06 = 0;
    }
    else if (empty_slot == 7) {
        Player07Name = c.netname;
        c.entity_ID = random();
        Player07ID = c.entity_ID;
        Player07Active = 3;
        p07k01 = 0;
        p07k02 = 0;
        p07k03 = 0;
        p07k04 = 0;
        p07k05 = 0;
        p07k06 = 0;
        p07k07 = 0;
        p07k08 = 0;
        p07k09 = 0;
        p07k10 = 0;
        p07k11 = 0;
        p07k12 = 0;
        p07k13 = 0;
        p07k14 = 0;
        p07k15 = 0;
        p07k16 = 0;
        p01k07 = 0;
        p02k07 = 0;
        p03k07 = 0;
        p04k07 = 0;
        p05k07 = 0;
        p06k07 = 0;
        p08k07 = 0;
        p09k07 = 0;
        p10k07 = 0;
        p11k07 = 0;
        p12k07 = 0;
        p13k07 = 0;
        p14k07 = 0;
        p15k07 = 0;
        p16k07 = 0;
    }
    else if (empty_slot == 8) {
        Player08Name = c.netname;
        c.entity_ID = random();
        Player08ID = c.entity_ID;
        Player08Active = 3;
        p08k01 = 0;
        p08k02 = 0;
        p08k03 = 0;
        p08k04 = 0;
        p08k05 = 0;
        p08k06 = 0;
        p08k07 = 0;
        p08k08 = 0;
        p08k09 = 0;
        p08k10 = 0;
        p08k11 = 0;
        p08k12 = 0;
        p08k13 = 0;
        p08k14 = 0;
        p08k15 = 0;
        p08k16 = 0;
        p01k08 = 0;
        p02k08 = 0;
        p03k08 = 0;
        p04k08 = 0;
        p05k08 = 0;
        p06k08 = 0;
        p07k08 = 0;
        p09k08 = 0;
        p10k08 = 0;
        p11k08 = 0;
        p12k08 = 0;
        p13k08 = 0;
        p14k08 = 0;
        p15k08 = 0;
        p16k08 = 0;
    }
    else if (empty_slot == 9) {
        Player09Name = c.netname;
        c.entity_ID = random();
        Player09ID = c.entity_ID;
        Player09Active = 3;
        p09k01 = 0;
        p09k02 = 0;
        p09k03 = 0;
        p09k04 = 0;
        p09k05 = 0;
        p09k06 = 0;
        p09k07 = 0;
        p09k08 = 0;
        p09k09 = 0;
        p09k10 = 0;
        p09k11 = 0;
        p09k12 = 0;
        p09k13 = 0;
        p09k14 = 0;
        p09k15 = 0;
        p09k16 = 0;
        p01k09 = 0;
        p02k09 = 0;
        p03k09 = 0;
        p04k09 = 0;
        p05k09 = 0;
        p06k09 = 0;
        p07k09 = 0;
        p08k09 = 0;
        p10k09 = 0;
        p11k09 = 0;
        p12k09 = 0;
        p13k09 = 0;
        p14k09 = 0;
        p15k09 = 0;
        p16k09 = 0;
    }
    else if (empty_slot == 10) {
        Player10Name = c.netname;
        c.entity_ID = random();
        Player10ID = c.entity_ID;
        Player10Active = 3;
        p10k01 = 0;
        p10k02 = 0;
        p10k03 = 0;
        p10k04 = 0;
        p10k05 = 0;
        p10k06 = 0;
        p10k07 = 0;
        p10k08 = 0;
        p10k09 = 0;
        p10k10 = 0;
        p10k11 = 0;
        p10k12 = 0;
        p10k13 = 0;
        p10k14 = 0;
        p10k15 = 0;
        p10k16 = 0;
        p01k10 = 0;
        p02k10 = 0;
        p03k10 = 0;
        p04k10 = 0;
        p05k10 = 0;
        p06k10 = 0;
        p07k10 = 0;
        p08k10 = 0;
        p09k10 = 0;
        p11k10 = 0;
        p12k10 = 0;
        p13k10 = 0;
        p14k10 = 0;
        p15k10 = 0;
        p16k10 = 0;
    }
    else if (empty_slot == 11) {
        Player11Name = c.netname;
        c.entity_ID = random();
        Player11ID = c.entity_ID;
        Player11Active = 3;
        p11k01 = 0;
        p11k02 = 0;
        p11k03 = 0;
        p11k04 = 0;
        p11k05 = 0;
        p11k06 = 0;
        p11k07 = 0;
        p11k08 = 0;
        p11k09 = 0;
        p11k10 = 0;
        p11k11 = 0;
        p11k12 = 0;
        p11k13 = 0;
        p11k14 = 0;
        p11k15 = 0;
        p11k16 = 0;
        p01k11 = 0;
        p02k11 = 0;
        p03k11 = 0;
        p04k11 = 0;
        p05k11 = 0;
        p06k11 = 0;
        p07k11 = 0;
        p08k11 = 0;
        p09k11 = 0;
        p10k11 = 0;
        p12k11 = 0;
        p13k11 = 0;
        p14k11 = 0;
        p15k11 = 0;
        p16k11 = 0;
    }
    else if (empty_slot == 12) {
        Player12Name = c.netname;
        c.entity_ID = random();
        Player12ID = c.entity_ID;
        Player12Active = 3;
        p12k01 = 0;
        p12k02 = 0;
        p12k03 = 0;
        p12k04 = 0;
        p12k05 = 0;
        p12k06 = 0;
        p12k07 = 0;
        p12k08 = 0;
        p12k09 = 0;
        p12k10 = 0;
        p12k11 = 0;
        p12k12 = 0;
        p12k13 = 0;
        p12k14 = 0;
        p12k15 = 0;
        p12k16 = 0;
        p01k12 = 0;
        p02k12 = 0;
        p03k12 = 0;
        p04k12 = 0;
        p05k12 = 0;
        p06k12 = 0;
        p07k12 = 0;
        p08k12 = 0;
        p09k12 = 0;
        p10k12 = 0;
        p11k12 = 0;
        p13k12 = 0;
        p14k12 = 0;
        p15k12 = 0;
        p16k12 = 0;
    }
    else if (empty_slot == 13) {
        Player13Name = c.netname;
        c.entity_ID = random();
        Player13ID = c.entity_ID;
        Player13Active = 3;
        p13k01 = 0;
        p13k02 = 0;
        p13k03 = 0;
        p13k04 = 0;
        p13k05 = 0;
        p13k06 = 0;
        p13k07 = 0;
        p13k08 = 0;
        p13k09 = 0;
        p13k10 = 0;
        p13k11 = 0;
        p13k12 = 0;
        p13k13 = 0;
        p13k14 = 0;
        p13k15 = 0;
        p13k16 = 0;
        p01k13 = 0;
        p02k13 = 0;
        p03k13 = 0;
        p04k13 = 0;
        p05k13 = 0;
        p06k13 = 0;
        p07k13 = 0;
        p08k13 = 0;
        p09k13 = 0;
        p10k13 = 0;
        p11k13 = 0;
        p12k13 = 0;
        p14k13 = 0;
        p15k13 = 0;
        p16k13 = 0;
    }
    else if (empty_slot == 14) {
        Player14Name = c.netname;
        c.entity_ID = random();
        Player14ID = c.entity_ID;
        Player14Active = 3;
        p14k01 = 0;
        p14k02 = 0;
        p14k03 = 0;
        p14k04 = 0;
        p14k05 = 0;
        p14k06 = 0;
        p14k07 = 0;
        p14k08 = 0;
        p14k09 = 0;
        p14k10 = 0;
        p14k11 = 0;
        p14k12 = 0;
        p14k13 = 0;
        p14k14 = 0;
        p14k15 = 0;
        p14k16 = 0;
        p01k14 = 0;
        p02k14 = 0;
        p03k14 = 0;
        p04k14 = 0;
        p05k14 = 0;
        p06k14 = 0;
        p07k14 = 0;
        p08k14 = 0;
        p09k14 = 0;
        p10k14 = 0;
        p11k14 = 0;
        p12k14 = 0;
        p13k14 = 0;
        p15k14 = 0;
        p16k14 = 0;
    }
    else if (empty_slot == 15) {
        Player15Name = c.netname;
        c.entity_ID = random();
        Player15ID = c.entity_ID;
        Player15Active = 3;
        p15k01 = 0;
        p15k02 = 0;
        p15k03 = 0;
        p15k04 = 0;
        p15k05 = 0;
        p15k06 = 0;
        p15k07 = 0;
        p15k08 = 0;
        p15k09 = 0;
        p15k10 = 0;
        p15k11 = 0;
        p15k12 = 0;
        p15k13 = 0;
        p15k14 = 0;
        p15k15 = 0;
        p15k16 = 0;
        p01k15 = 0;
        p02k15 = 0;
        p03k15 = 0;
        p04k15 = 0;
        p05k15 = 0;
        p06k15 = 0;
        p07k15 = 0;
        p08k15 = 0;
        p09k15 = 0;
        p10k15 = 0;
        p11k15 = 0;
        p12k15 = 0;
        p13k15 = 0;
        p14k15 = 0;
        p16k15 = 0;
    }
    else if (empty_slot == 16) {
        Player16Name = c.netname;
        c.entity_ID = random();
        Player16ID = c.entity_ID;
        Player16Active = 3;
        p16k01 = 0;
        p16k02 = 0;
        p16k03 = 0;
        p16k04 = 0;
        p16k05 = 0;
        p16k06 = 0;
        p16k07 = 0;
        p16k08 = 0;
        p16k09 = 0;
        p16k10 = 0;
        p16k11 = 0;
        p16k12 = 0;
        p16k13 = 0;
        p16k14 = 0;
        p16k15 = 0;
        p16k16 = 0;
        p01k16 = 0;
        p02k16 = 0;
        p03k16 = 0;
        p04k16 = 0;
        p05k16 = 0;
        p06k16 = 0;
        p07k16 = 0;
        p08k16 = 0;
        p09k16 = 0;
        p10k16 = 0;
        p11k16 = 0;
        p12k16 = 0;
        p13k16 = 0;
        p14k16 = 0;
        p15k16 = 0;
    }


};

//
//FragReportLeave
// This function is called when a
// client disconnects from the server.
// Called from ClientDisconnect.
//
void(entity c) FragReportLeave =
{
    local float temp;
    local float id;

    if (!deathmatch) {
        return;
    }

    temp = c.entity_ID;

    // Based on player's netname,
    // determine data id
    id = FragReportWhoAmI(temp);

    // Find data slot matching the
    // id.  Turn off the slot.
    if (id==1) {
        Player01Active = 2;
        Player01TimeLeft = time;
    }
    else if (id==2) {
        Player02Active = 2;
        Player02TimeLeft = time;
    }
    else if (id==3) {
        Player03Active = 2;
        Player03TimeLeft = time;
    }
    else if (id==4) {
        Player04Active = 2;
        Player04TimeLeft = time;
    }
    else if (id==5) {
        Player05Active = 2;
        Player05TimeLeft = time;
    }
    else if (id==6) {
        Player06Active = 2;
        Player06TimeLeft = time;
    }
    else if (id==7) {
        Player07Active = 2;
        Player07TimeLeft = time;
    }
    else if (id==8) {
        Player08Active = 2;
        Player08TimeLeft = time;
    }
    else if (id==9) {
        Player09Active = 2;
        Player09TimeLeft = time;
    }
    else if (id==10) {
        Player10Active = 2;
        Player10TimeLeft = time;
    }
    else if (id==11) {
        Player11Active = 2;
        Player11TimeLeft = time;
    }
    else if (id==12) {
        Player12Active = 2;
        Player12TimeLeft = time;
    }
    else if (id==13) {
        Player13Active = 2;
        Player13TimeLeft = time;
    }
    else if (id==14) {
        Player14Active = 2;
        Player14TimeLeft = time;
    }
    else if (id==15) {
        Player15Active = 2;
        Player15TimeLeft = time;
    }
    else if (id==16) {
        Player16Active = 2;
        Player16TimeLeft = time;
    }

};

//
//FragReportWhoAmI
// Local convenience function, taking a
// string name as input and determining
// the data slot id number corresponding
// to that name.
float(float ID) FragReportWhoAmI =
{

    if (ID == Player01ID) {
        return 1;
    }
    else if (ID == Player02ID) {
        return 2;
    }
    else if (ID == Player03ID) {
        return 3;
    }
    else if (ID == Player04ID) {
        return 4;
    }
    else if (ID == Player05ID) {
        return 5;
    }
    else if (ID == Player06ID) {
        return 6;
    }
    else if (ID == Player07ID) {
        return 7;
    }
    else if (ID == Player08ID) {
        return 8;
    }
    else if (ID == Player09ID) {
        return 9;
    }
    else if (ID == Player10ID) {
        return 10;
    }
    else if (ID == Player11ID) {
        return 11;
    }
    else if (ID == Player12ID) {
        return 12;
    }
    else if (ID == Player13ID) {
        return 13;
    }
    else if (ID == Player14ID) {
        return 14;
    }
    else if (ID == Player15ID) {
        return 15;
    }
    else if (ID == Player16ID) {
        return 16;
    }
    else {
        return 0;
    }

};

//
//FragReportPrint
// Local convenience function, used to
// print the frag report to the client's
// screen.
//
void() FragReportPrint =
{

    local float total_frags;
    local float total_deaths;
    local float suicides;
    local string temp;

    sprint(self, "GotHim|GotYou|Name\n");

    if (Player01Active && frid != 1) {
        FragReportPrintLine( kt01, ky01, Player01Name, Player01Active, Player01TimeLeft );
    }
    if (Player02Active && frid != 2) {
        FragReportPrintLine( kt02, ky02, Player02Name, Player02Active, Player02TimeLeft );
    }
    if (Player03Active && frid != 3) {
        FragReportPrintLine( kt03, ky03, Player03Name, Player03Active, Player03TimeLeft );
    }
    if (Player04Active && frid != 4) {
        FragReportPrintLine( kt04, ky04, Player04Name, Player04Active, Player04TimeLeft );
    }
    if (Player05Active && frid != 5) {
        FragReportPrintLine( kt05, ky05, Player05Name, Player05Active, Player05TimeLeft );
    }
    if (Player06Active && frid != 6) {
        FragReportPrintLine( kt06, ky06, Player06Name, Player06Active, Player06TimeLeft );
    }
    if (Player07Active && frid != 7) {
        FragReportPrintLine( kt07, ky07, Player07Name, Player07Active, Player07TimeLeft );
    }
    if (Player08Active && frid != 8) {
        FragReportPrintLine( kt08, ky08, Player08Name, Player08Active, Player08TimeLeft );
    }
    if (Player09Active && frid != 9) {
        FragReportPrintLine( kt09, ky09, Player09Name, Player09Active, Player09TimeLeft );
    }
    if (Player10Active && frid != 10) {
        FragReportPrintLine( kt10, ky10, Player10Name, Player10Active, Player10TimeLeft );
    }
    if (Player11Active && frid != 11) {
        FragReportPrintLine( kt11, ky11, Player11Name, Player11Active, Player11TimeLeft );
    }
    if (Player12Active && frid != 12) {
        FragReportPrintLine( kt12, ky12, Player12Name, Player12Active, Player12TimeLeft );
    }
    if (Player13Active && frid != 13) {
        FragReportPrintLine( kt13, ky13, Player13Name, Player13Active, Player13TimeLeft );
    }
    if (Player14Active && frid != 14) {
        FragReportPrintLine( kt14, ky14, Player14Name, Player14Active, Player14TimeLeft );
    }
    if (Player15Active && frid != 15) {
        FragReportPrintLine( kt15, ky15, Player15Name, Player15Active, Player15TimeLeft );
    }
    if (Player16Active && frid != 16) {
        FragReportPrintLine( kt16, ky16, Player16Name, Player16Active, Player16TimeLeft );
    }

    total_frags=kt01+kt02+kt03+kt04+kt05+kt06+kt07+kt08;
    total_frags=total_frags+kt09+kt10+kt11+kt12+kt13+kt14+kt15+kt16;
    total_deaths=ky01+ky02+ky03+ky04+ky05+ky06+ky07+ky08;
    total_deaths=total_deaths+kt09+kt10+kt11+kt12+kt13+kt14+kt15+kt16;

    if (frid == 1) {
        suicides = kt01;
    }
    else if (frid == 2) {
        suicides = kt02;
    }
    else if (frid == 3) {
        suicides = kt03;
    }
    else if (frid == 4) {
        suicides = kt04;
    }
    else if (frid == 5) {
        suicides = kt05;
    }
    else if (frid == 6) {
        suicides = kt06;
    }
    else if (frid == 7) {
        suicides = kt07;
    }
    else if (frid == 8) {
        suicides = kt08;
    }
    else if (frid == 9) {
        suicides = kt09;
    }
    else if (frid == 10) {
        suicides = kt10;
    }
    else if (frid == 11) {
        suicides = kt11;
    }
    else if (frid == 12) {
        suicides = kt12;
    }
    else if (frid == 13) {
        suicides = kt13;
    }
    else if (frid == 14) {
        suicides = kt14;
    }
    else if (frid == 15) {
        suicides = kt15;
    }
    else if (frid == 16) {
        suicides = kt16;
    }


    total_frags = total_frags - suicides;
    total_deaths = total_deaths - suicides;

    sprint(self, "------------------\n");
    sprint(self, "  " );
    if (total_frags < 100) {
        sprint( self, " " );
    }
    if (total_frags < 10) {
        sprint( self, " " );
    }
    temp = ftos(total_frags);
    sprint( self, temp );
    sprint( self, " |  " );
    if (total_deaths < 100) {
        sprint( self, " " );
    }
    if (total_deaths < 10) {
        sprint( self, " " );
    }
    temp = ftos(total_deaths);
    sprint( self, temp );
    sprint( self, " | " );
    sprint( self, "Suicides:  " );
    temp = ftos(suicides);
    sprint( self, temp );
    sprint( self, "\n" );
};


//
//FragReportPrintLine
// Local convenience function, used to
// print individual lines in the frag
// report.
void(float kt, float ky, string name, float active, float timeleft) FragReportPrintLine =
{
    local string temp;

    // Simple spacing code... screwed
    // if someone gets 1000+ frags :)
    sprint( self, "  " );
    if (kt < 100) {
        sprint( self, " " );
    }
    if (kt < 10) {
        sprint( self, " " );
    }
    temp = ftos(kt);
    sprint( self, temp );
    sprint( self, " |  " );
    if (ky < 100) {
        sprint( self, " " );
    }
    if (ky < 10) {
        sprint( self, " " );
    }
    temp = ftos(ky);
    sprint( self, temp );
    sprint( self, " | " );
    if (active == 3) {
        sprint( self, name );
    }
    else {
        sprint( self, "LEFT AT " );
        temp = ftos(timeleft);
        sprint( self, temp );
    }
    sprint( self, "\n" );
};


float() FragReportFindSlot =
{

    local float oldest;
    local float retval;

    // First, look for never-used slot

    if (Player01Active == 0) {
        return 1;
    }
    else if (Player02Active == 0) {
        return 2;
    }
    else if (Player03Active == 0) {
        return 3;
    }
    else if (Player04Active == 0) {
        return 4;
    }
    else if (Player05Active == 0) {
        return 5;
    }
    else if (Player06Active == 0) {
        return 6;
    }
    else if (Player07Active == 0) {
        return 7;
    }
    else if (Player08Active == 0) {
        return 8;
    }
    else if (Player09Active == 0) {
        return 9;
    }
    else if (Player10Active == 0) {
        return 10;
    }
    else if (Player11Active == 0) {
        return 11;
    }
    else if (Player12Active == 0) {
        return 12;
    }
    else if (Player13Active == 0) {
        return 13;
    }
    else if (Player14Active == 0) {
        return 14;
    }
    else if (Player15Active == 0) {
        return 15;
    }
    else if (Player16Active == 0) {
        return 16;
    }

    // Otherwise, look for vacated spot

    oldest = -1.0;
    retval = 0;

    if (Player01Active == 2 && Player01TimeLeft < oldest) {
        oldest = Player01TimeLeft;
        retval = 1;
    }
    if (Player02Active == 2 && Player02TimeLeft < oldest) {
        oldest = Player02TimeLeft;
        retval = 2;
    }
    if (Player03Active == 2 && Player03TimeLeft < oldest) {
        oldest = Player03TimeLeft;
        retval = 3;
    }
    if (Player04Active == 2 && Player04TimeLeft < oldest) {
        oldest = Player04TimeLeft;
        retval = 4;
    }
    if (Player05Active == 2 && Player05TimeLeft < oldest) {
        oldest = Player05TimeLeft;
        retval = 5;
    }
    if (Player06Active == 2 && Player06TimeLeft < oldest) {
        oldest = Player06TimeLeft;
        retval = 6;
    }
    if (Player07Active == 2 && Player07TimeLeft < oldest) {
        oldest = Player07TimeLeft;
        retval = 7;
    }
    if (Player08Active == 2 && Player08TimeLeft < oldest) {
        oldest = Player08TimeLeft;
        retval = 8;
    }
    if (Player09Active == 2 && Player09TimeLeft < oldest) {
        oldest = Player09TimeLeft;
        retval = 9;
    }
    if (Player10Active == 2 && Player10TimeLeft < oldest) {
        oldest = Player10TimeLeft;
        retval = 10;
    }
    if (Player11Active == 2 && Player11TimeLeft < oldest) {
        oldest = Player11TimeLeft;
        retval = 11;
    }
    if (Player12Active == 2 && Player12TimeLeft < oldest) {
        oldest = Player12TimeLeft;
        retval = 12;
    }
    if (Player13Active == 2 && Player13TimeLeft < oldest) {
        oldest = Player13TimeLeft;
        retval = 13;
    }
    if (Player14Active == 2 && Player14TimeLeft < oldest) {
        oldest = Player14TimeLeft;
        retval = 14;
    }
    if (Player15Active == 2 && Player15TimeLeft < oldest) {
        oldest = Player15TimeLeft;
        retval = 15;
    }
    if (Player16Active == 2 && Player16TimeLeft < oldest) {
        oldest = Player16TimeLeft;
        retval = 16;
    }

    return retval;

};