src/b1-merchant-person.cpp

/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
/*
 * frpuniverse
 * Copyright (C) Peter L. Berghold 2008 <Peter@Berghold.net>
 * 
 * frpuniverse is free software.
 * 
 * You may redistribute it and/or modify it under the terms of the
 * GNU General Public License, as published by the Free Software
 * Foundation; either version 2 of the License, or (at your option)
 * any later version.
 * 
 * frpuniverse is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with frpuniverse.  If not, write to:
 *      The Free Software Foundation, Inc.,
 *      51 Franklin Street, Fifth Floor
 *      Boston, MA  02110-1301, USA. 
 * 
 * $Id: b1-merchant-person.cpp,v 1.5 2008/02/21 21:33:58 plankowner Exp $
 * 
 * $Log: b1-merchant-person.cpp,v $
 * Revision 1.5  2008/02/21 21:33:58  plankowner
 * checkpoint, mega-stuff added
 *
 * Revision 1.4  2008/02/20 03:04:56  plankowner
 * Finished character generation for Book 1 of the original Traveller boxed set. HURRAH!!
 *
 * Fixed autoskills for b1MerchantPerson
 *
 * Revision 1.3  2008/02/19 19:31:21  plankowner
 * Reorganized the source files and headers for this project
 *
 * Changed the personObj attribute "constitution" to "endurance" (DOH!)
 * since endurance is the Traveller gaming system not the D&D system. :-)
 *
 *
 */

#include "b1-merchant-person.hpp"
#include "skill-obj.hpp"
#include "dice.hpp"
#ifdef DEBUG_ON
#include <stdio.h>
#endif

b1MerchantPerson::b1MerchantPerson() : book1Person() {
#ifdef DEBUG_ON
        fprintf(stderr,"Entering b1MerchantPerson::b1MerchantPerson()\n");
#endif
        this->setService("Merchant");
        this->enlist();
#ifdef DEBUG_ON
        fprintf(stderr,"Exiting b1MerchantPeson::b1MerchantPerson()\n");
#endif

}


void b1MerchantPerson::enlist(){
        int dm=0;
        int skill_rolls=0;
        
        if ( this->getStrength() > 6 ) 
                dm = 1; 
        if ( this->getIntelligence() > 5 ) 
                dm = dm + 2;
        if ( (d2d6()+dm) > 6 ) {
                this->setAccepted(1);
        } else {
                this->setAccepted(0);
                return ;
        }
        this->setTerms(1);
        while(1){ // while 
                if ( this->getTerms() == 1 ) { // if
                        skill_rolls=2;
                } else {
                        skill_rolls=1;
                } //end-if
                
                // Determine Survival
                //
                dm=0;
                if ( this->getIntelligence() > 6) 
                        dm = 2;
                if ( (d2d6()+dm) > 4 ) {
                        // this->setTerms(this->getTerms()+1);
                        this->setAge( this->getAge()+4);
                } else {
                        this->setAlive(0);
                        return;
                }
                
                // Check to see if commissioned either already or now.
                // if already commissioned check for promotion.
                
                if ( this->getCommissioned() == 1 ) {
                        dm = ( this->getIntelligence() > 8 ? 1:0);
                        if ( (d2d6()+dm) > 9 ) {
                                this->setRank(this->getRank()+1);  // promotion of an officer.
                                if ( this->getRank() == 4)  {
                                                this->addSkill(PILOT,1);
                                        }
                                
                                        
                                skill_rolls++;
                        }
                } else {
                        dm = ( this->getIntelligence() > 6 ? 1 : 0 ) ;
                        // Roll to see if they get commissioned. 
                        if ( (d2d6()+dm)>3 ){
                                this->setCommissioned(1);
                                this->setRank(1);
                                dm = ( this->getIntelligence() > 8 ? 1:0);
                                skill_rolls++;
                        
                                if ( (d2d6()+dm) > 9 ) {
                                        this->setRank(this->getRank()+1);  // promotion of an officer. 
                                        skill_rolls++;
                                }
                        }
                        
                }
                
                this->skillTables(skill_rolls);
                
                // I've imposed my own DMS for sanity sake since I don't want people
                // managing to be in for 60 terms like some trial runs had. 
                dm=0;
                if ( this->getTerms() > 5 ) {
                        dm = this->getTerms() - 5; 
                }
                if ( this->getAge() > 50 ) {
                        dm = dm + (this->getAge()/10);
                }
                int re_enlisted=0;
                
                if ( (d2d6() - dm) > 3 ) {
                        this->setTerms(this->getTerms()+1);
                        re_enlisted=1;
                }
                        
                // A couple of sanity checks:
                if ( this->getRank() > 5) this->setRank(5);
                if ( re_enlisted != 1 ) return;
                        
        }
        
}


void b1MerchantPerson::skillTables(int nrolls){
        // There are 4 different skill tables to deal with here...
        // 3 of which are in play when education < 8 and all 4 are 
        // in play for education >= 8 
        

        int roll;
        for(roll=1;roll<=nrolls;roll++){
                if ( this->getEducation() < 8 ) {
                        switch(d1d6()){
                                case 1:
                                case 2:
                                        this->skillTable1();
                                        break;
                                case 3:
                                case 4:
                                        this->skillTable2();
                                        break;
                                case 5:
                                case 6:
                                        this->skillTable3();
                                        break;
                        };
                } else {
                        switch(d2d6()){
                                case 1:
                                        this->skillTable1();
                                        break;
                                case 2:
                                case 3:
                                        this->skillTable2();
                                        break;
                                case 4: 
                                case 5:
                                        this->skillTable3();
                                        break;
                                case 6:
                                        this->skillTable4();
                                        break;
                        };
                        
                }
                
        }
        
        
}
void b1MerchantPerson::skillTable1(){
        switch(d1d6()){
                case 1:
                case 4:
                        this->incrementStrength(1);
                        break;
                case 2:
                        this->incrementDexterity(1);
                        break;
                case 3:
                        this->incrementEndurance(1);
                        break;
                case 5:
                        this->addSkill(BLADE_COMBAT,1);
                        break;
                default:
                        this->addSkill(BRIBERY,1);
                        break;
                
        };
        
}

void b1MerchantPerson::skillTable2(){
        switch(d1d6()){
                case 1:
                        this->addSkill(VEHICLE,1);
                        break;
                case 2:
                        this->addSkill(VACC_SUIT,1);
                        break;
                case 3:
                        this->addSkill(JACK_OF_ALL_TRADES,1);
                        break;
                case 4:
                        this->addSkill(STEWARD,1);
                        break;
                case 5:
                        this->addSkill(ELECTRONICS,1);
                        break;
                case 6:
                        this->addSkill(GUN_COMBAT,1);
                        break;
        };
        
}

void b1MerchantPerson::skillTable3(){
        switch(d1d6()){
                case 1:
                        this->addSkill(STREETWISE,1);
                        break;
                case 2:
                        this->addSkill(MECHANICAL,1);
                        break;
                case 3:
                        this->addSkill(ELECTRONICS,1);
                        break;
                case 4:
                        this->addSkill(NAVIGATION,1);
                        break;
                case 5:
                        this->addSkill(GUNNERY,1);
                        break;
                case 6:
                        this->addSkill(MEDICAL,1);
                        break;
        };
        
}

void b1MerchantPerson::skillTable4(){
        switch(d1d6()){
                case 1:
                        this->addSkill(MEDICAL,1);
                        break;
                case 2:
                        this->addSkill(NAVIGATION,1);
                        break;
                case 3:
                        this->addSkill(ENGINEERING,1);
                        break;
                case 4:
                        this->addSkill(COMPUTER,1);
                        break;
                case 5:
                        this->addSkill(PILOT,1);
                        break;
                case 6:
                        this->addSkill(ADMIN,1);
                        break;
        };
        
}


static int cashRolls;

void b1MerchantPerson::musterOut(){
        int ix;
        
        if ( this->getTerms() > 3 ) {
                cashRolls=3;
        } else { 
                cashRolls = randxInRange(1,this->getTerms());
        }
        
        for(ix=1;ix<=cashRolls;ix++)
                this->cashTable();
        
}

void b1MerchantPerson::cashTable(){
        int dm = ( this->getRank() > 4 ? 1 : 0 );
        double amount;
        
        switch(d1d6()+dm){
                case 1:
                        amount=2000;
                        break;
                case 2:
                        amount=5000;
                        break;
                case 3:
                case 4:
                case 5:
                        amount=10000;
                        break;
                
                case 6:
                        amount=20000;
                        break;
                default:
                        amount=30000;
                        break;
        }
        
        this->setCash(this->getCash()+amount);
}

---