rollpermanencedice.php

<? include 'xmlheader.php'?>
<?
echo "<?xml version=\"1.0\" ?>";?>
<root>
<?php
    
include 'include.php';

    
openDatabase();

    
$gameid getGameId();

    
//This file rolls the permanence dice

     
$sGetDiceQuery "SELECT dateno, permanentattraction, temporaryattraction, permanencedice, permanencererolls, permanencesuccesses, permanencefailures FROM game WHERE `gameid` = ".$gameid;

     
$rowReturn queryDatabaseForSingleRow($sGetDiceQuery);

     
$dateno $rowReturn["dateno"];
     
$permanentattraction $rowReturn["permanentattraction"];
     
$temporaryattraction$rowReturn["temporaryattraction"];
     
$permanencedice $rowReturn["permanencedice"];
     
$permanencererolls $rowReturn["permanencererolls"];
     
$permanencesuccesses $rowReturn["permanencesuccesses"];
     
$permanencefailures $rowReturn["permanencefailures"];

     
//We roll a number of permanence dice equal to $permanencedice,
     //but we allow a maximum of $temporaryattraction successes
     
while ($permanencedice 0)
     {
         if (
rand(16) > 4)
         {
                 if (
$temporaryattraction 0)
                 {
                      
$temporaryattraction --;
                      
$permanentattraction ++;
                 }

                 
$permanencesuccesses ++;
         }
         else
         {
                 if (
$dateno 2)
                 {
                   
$permanencererolls ++;
                 }
                 else
                 {
                         
//On the third date, there's no rerolls
                   
$permanencefailures ++;
                 }
         }

           
$permanencedice --;
     }

     if (
$temporaryattraction $permanencedice $permanencererolls)
     {
         
$temporaryattraction $permanencedice $permanencererolls;
     }

    
$sUpdateQuery "UPDATE game SET permanencedice = 0, permanentattraction = ".$permanentattraction.", temporaryattraction = ".$temporaryattraction.", permanencererolls = ".$permanencererolls .", permanencesuccesses = ".$permanencesuccesses.", permanencefailures = ".$permanencefailures." WHERE gameid = ".$gameid;

    
updateDatabase($sUpdateQuery);
 
    
outputXmlTag("permanencedice"0);
    
outputXmlTag("permanentattraction"$permanentattraction);
    
outputXmlTag("temporaryattraction"$temporaryattraction);
    
outputXmlTag("permanencesuccesses"$permanencesuccesses);
    
outputXmlTag("permanencererolls"$permanencererolls);
    
outputXmlTag("permanencefailures"$permanencefailures);

    
closeDatabase();
?>
</root>