18-06-2007 21:24 | www	edit | quote	#9 | report |
Support Apolyton, buy Galactic Civilizations: Deluxe Edition

code:
/////////////////
//
//  Merge Civ 
//
//  original idea: Lou Wigman	
//
//  original scripting: The Immortal Wombat (aka Ben Weaver)
//
//  adapted for CTC by PT
//
/////////////////

void_f CTC_MergeCivs(int_t CivOne, int_t CivTwo, int_t CivOneUnitCount,  int_t PWtotal){ 
// give civ one assets to civ two

	int_t    i;
     int_t    RiotLevel;
     int_t    HapBoost;
     int_t    CivOneCityCount;
	int_t    CivOneUnitType[];

	city_t   tmpCity;
     city_t   CivOneCity[];

	unit_t   tmpUnit;

	location_t    tmpLoc;
	location_t    CivOneUnitLoc[];
	
    // re-init CivOneUnit	arrays?
    for (i=0;i 0){
         if(Random(9)<1) {//include random chance of quicker merge
            DoMerge=1;
         }
    }
    if (DoMerge){
	    if (player[0].owner == MERGE_SOURCE){ //so MERGE_SOURCE must still be alive
              if (IsPlayerAlive(MERGE_TARGET)){ 
			    DisableMessageClass(180103);//disable conquered by message
		         player[1]=MERGE_TARGET;    
                    message(CTC_THE_CONQUERER,'CTC_ImportantNewsComing
In');
			    EnableTrigger('CTC_MergecivExec');
	         }
         }
    }
    if (player[0].owner == CTC_THE_CONQUERER){//decrease count every time CTC_THE_CONQUERER has a turn
         MERGE_COUNTDOWN=MERGE_COUNTDOWN-1;
    }
    if (MERGE_COUNTDOWN <0){ //shut down
         CTC_THE_CONQUERER=0;
	    MERGE_SOURCE=0;
	    MERGE_TARGET=0;
	    EnableMessageClass(180103);
         DisableTrigger('CTC_MergecivCheck');

// here's the place to check to see if we want to do another one

    }
}

alertbox 'CTC_ImportantNewsComingIn' {
    Title(ID_BREAKING_NEWS);
    Text (ID_ImportantNewsComingInTxt );
    Button(ID_BUTTON_CLOSE){
         Kill();
    }
}

HandleEvent(EndTurn) 'CTC_MergecivExec' pre {
    
    int_t CivOneUnitCount;
    int_t PWtotal;
    int_t numAI;
    int_t i;

    if (!IsHumanPlayer(player[0].owner) ){//aborted if SLIC reloaded
   
		player[1]=MERGE_TARGET;  
		PWtotal = player[1].publicworkslevel;
		PWtotal = PWtotal + player[0].publicworkslevel; 

	    CivOneUnitCount=player[0].units;
	    numAI=0;
	    for (i=1;i

25-06-2007 21:42 | www	edit | quote	#12 | report |
Full PM-box? Change here!

Last edited by E on 28-06-2007 at 21:31