Comunque sia questo è il mio codice.
Se riesci a velocizzarlo sei un mito e ti ringrazio infinitamente
Per adesso con questo script sto facendo soffrire.. un pc abbastanza potente con 4 gb di ram e 4 processori

Se... te ne sarà molto riconoscente anche lui... credo..


Codice PHP:

<?php 

$apro 
fopen("iniziorangedeciso.txt""r");
$iniziorangeok fread($aprofilesize("iniziorangedeciso.txt")); 
$chiudo fclose($apro);

print 
"

valore recuperato da file iniziorange.txt: "
;
print 
"<font color=red>[b]";
print 
$iniziorangeok;
print 
"[/b]</font>

"
;


$iniziorange=$iniziorangeok;
$iniziorange $iniziorange+0


print 
"

"
;
print 
"STEP1";
print 
"

"
;

$ultimiritardi=array();

for (
$w=0$w<117480$w++) {


$combinazione="";
$ottina="";
$ritardo="";
$zero=0;
$arraystringa="";



$annifile ('anni.txt');


$newarray=array();

foreach(
$anni as $stringa) {
//print "$stringa-";
}


array_push($newarray,$stringa);
echo 
'</pre>';
$bari = array();
foreach(
$newarray as $stringa) {
  if (
preg_match('#BA#',$stringa)) {
  
$bari[] = $stringa;
   }    
}


if (
$iniziorange=="") {

    
$iniziorange=0;
    
   }    

$tutteleottinefile ('tuttiterni.txt');

  
$newarray=array();
foreach(
$tutteleottine as $stringa) {

array_push($newarray,$stringa);

}

echo 
'<pre>';              

echo 
'</pre>';
$bari = array();
foreach(
$newarray as $stringa) {

  
$bari[] = $stringa;
   
}



for (
$i=0$i<count($bari); $i++) {
}


$numerodicasi=count($bari);

$finerange $numerodicasi;

$tuttelecombinazioni=array();

for (
$c=0$c<117480$c++) {


settype ($bari[$c], "string");
$stringadalavorare $bari[$w];


$dsubstr("$stringadalavorare"0); 

$pulito =  trim($d);


$array explode(" ",$pulito);


for (
$i=0$i<count($array);$i++) {
settype ($array[$i], "string");
$stringa1$array[$i];


$array2 explode("\t",$stringa1);
$arraystringa=implode(",",$array2);


array_push($tuttelecombinazioni,$arraystringa);



$estrazionifile ('estrazioni.txt');


$newarraybari=array();
foreach(
$estrazioni as $stringa) {
if (
preg_match('#BA#',$stringa)) { 

array_push($newarraybari,$stringa);

}
}

$bari = array();
foreach(
$newarraybari as $stringa) {
if (
preg_match('#BA#',$stringa)) {
  
$bari[] = $stringa;
   }    
}


for (
$i=0$i<count($bari); $i++) {

}



$numerodicasi=count($bari);

$finerange $numerodicasi;


$ritardidiversidazero=array();

for (
$c=$iniziorange$c<$numerodicasi$c++) {
settype ($bari[$c], "string");
$stringadalavorare $bari[$c];

$dsubstr("$stringadalavorare"13); 

$pulito =  trim($d);
$pulito explode(" "$pulito);
$pulito implode(","$pulito);


$array explode(" ",$pulito);

settype ($array[0], "string");
$stringa1$array[0];


$arrayottina=explode(","$arraystringa);
$arraycombinazione=explode("\t"$pulito);

$COMBESTRATTA = array($arraycombinazione);
$OTTINA = array($arrayottina);

$I array_intersect($OTTINA[0],$COMBESTRATTA[0]); 

$conto=count($I);

if (
$conto<|| $conto=="")  {
$ritardo++;
array_push($ritardidiversidazero$ritardo);

 }else {
$ritardo=0;

 }


 }
 
  
 }
 

 
}





print 
"

"
;

switch(
$ritardo) {
CASE 
1:
$ritardo="01";
break;
CASE 
2:
$ritardo="02";
break;
CASE 
3:
$ritardo="03";
break;
CASE 
4:
$ritardo="04";
break;
CASE 
5:
$ritardo="05";
break;
CASE 
6:
$ritardo="06";
break;
CASE 
7:
$ritardo="07";
break;
CASE 
8:
$ritardo="08";
break;
CASE 
9:
$ritardo="09";
break;
}



$ultimoreport="$ritardo---terno x E[$w]---$arraystringa";
array_push($ultimiritardi$ultimoreport);

}

sort ($ultimiritardi);
for (
$k=0$k<count($ultimiritardi); $k++) {
print 
$ultimiritardi[$k]."
"
;
}

print 
"ritardi riscontrati x ritrovare il loro max dal 1939: ";

sort ($ritardidiversidazero);

for (
$q=0$q<count($ritardidiversidazero); $q++) {

print 
$ritardidiversidazero[$q]."
"
;

}

$pila = array($ultimiritardi);
$ultimo array_pop($ultimiritardi);

print 
"

"
;



print (
$ultimo);

print 
"

"
;

print 
"QUANTI CASI HA CONTATO? ".count($bari)."
"
;

?>