\n"; //echo "[".$zone_criterion."]
\n"; ?>
- Fidonet NodeList / Pointlist(s) Archive -
List(s) Nodelist/Nodediff1) { ?>
Nodelist/Nodediff Pointlist/Pointdiff Pointlist/Pointdiff
Pointlist Selection

Form based upon: nodelist_search.php Version 1.2
Copyright © 2003 Jerry Schwartz 1:142/928 and WriteByNight
Nodelist lister script adopted from The FidoNet Showcase Project
Modified for Nodelist/Nodediff/Pointlist/Pointdiffs listing by U.Schroeter, 2007

actyear do nothing if ($code_criterion<2) { $startyear=1984; } else { if ($zone_criterion==20) { // z2pnt $startyear=2001; } else { if (($zone_criterion==30) OR ($zone_criterion==40)){ // r24 // formats: Fake, Boss $startyear=1989; } else { if (($zone_criterion==31) OR ($zone_criterion==60)) { // r28 // formats: Fidouser, Boss $startyear=1997; } else { if (($zone_criterion==32) OR ($zone_criterion==50)) { // r31 // formats: V7, Boss $startyear=1998; } } } } } $testyear=date("Y",$datum); if ($testyear<$startyear) { while ($year<$startyear-1) { $sikdatum = $datum; $year=date("Y",$datum); $tyr = $year; $day=date("z",$datum)+1; // ??? $sikday = $day; while (($day<367) && (date("Y",$datum)==$tyr)) { $day=$day+7; $datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum)); } } } while ($year<$actyear) { $sikdatum = $datum; $year=date("Y",$datum); $tyr = $year; echo "$year "; $day=date("z",$datum)+1; // ??? $sikday = $day; $listtype = "Node"; $ptype = ""; if ($code_criterion<2) { $tmpp=sprintf("nodelist/%04d/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; } else { if ($zone_criterion==20) { // z2pnt $tmpp=sprintf("pntlist/z2/%04d/Poss/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "Z2
Point"; $ptype = "Poss"; } else { if ($zone_criterion==30) { // r24 // formats: Fake, Boss $tmpp=sprintf("pntlist/r24/%04d/Boss/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R24
Point"; $ptype = "Boss"; } else { if ($zone_criterion==31) { // r28 // formats: Fidouser, Boss $tmpp=sprintf("pntlist/r28/%04d/Boss/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R28
Point"; $ptype = "Boss"; } else { if ($zone_criterion==32) { // r31 // formats: V7, Boss $tmpp=sprintf("pntlist/r31/%04d/Boss/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R31
Point"; $ptype = "Boss"; } else { if ($zone_criterion==40) { // r24 fake $tmpp=sprintf("pntlist/r24/%04d/Fake/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R24
Point"; $ptype = "Fake"; } else { if ($zone_criterion==50) { // r31 V7 $tmpp=sprintf("pntlist/r31/%04d/v7/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R31
Point"; $ptype = "V7"; } else { if ($zone_criterion==60) { // r28 fidouser $tmpp=sprintf("pntlist/r28/%04d/fidouser/diff",$year); $tmpp=$basepath2.$basepath.$tmpp; $listtype = "R28
Point"; $ptype = "Fidouser"; } } } } } } } } if (is_dir($tmpp)) { // Nodediff dir exists echo ""; echo "\n"; } else { echo ""; echo "\n"; } // $file = trim($p); // if (is_dir($file)) { // $vldpath = 1; // } // // if (file_exists($file)) { // $file = trim($p)."FILES.BBS"; // if (file_exists($file)) { // $vldfbbs = 1; // } if ($day!=1) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; // echo "\n"; $teller=1; } else { $teller=0; } while (($day<367) && (date("Y",$datum)==$tyr)) { if (($year==1984) && ($day<153)) { $printday=" "; } else { $printday=$day; } $filename2=""; if ($code_criterion<2) { $filename=sprintf("nodelist/%04d/nl%02s-%03d.zip",$year,substr($year,2,2),$day); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==20) { // z2pnt $filename=sprintf("pntlist/z2/%04d/Poss/z2pnt.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==30) { // r24 // formats: Fake, Boss $filename=sprintf("pntlist/r24/%04d/Boss/r24pnt.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==31) { // r28 // formats: Fidouser, Boss $filename=sprintf("pntlist/r28/%04d/Boss/p28-list.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==32) { // r31 // formats: V7, Boss $filename=sprintf("pntlist/r31/%04d/Boss/r31pnt.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==40) { // r24 // formats: Fake // P24yyDDD.ZIP or POINTS24.Zdd $filename=sprintf("pntlist/r24/%04d/Fake/p24%s%03d.zip",$year,substr($year,2,2),$day); $filename2=sprintf("pntlist/r24/%04d/Fake/points24.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; $filename2=$basepath.$filename2; } else { if ($zone_criterion==50) { // r31 // formats: v7 $filename=sprintf("pntlist/r31/%04d/v7/point4d.a%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==60) { // r28 // formats: fidouser $filename=sprintf("pntlist/r28/%04d/fidouser/pointl%s.zip",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } } } } } } } } if ($filename2!="") { if ((file_exists($basepath2.$filename)) OR (file_exists($basepath2.$filename2))) { $fnrq = ""; if ((file_exists($basepath2.$filename))) { $fnrq = $filename; } else { $fnrq = $filename2; } if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { $printday="$printday"; } else { $printday="$printday"; } } else { if (($year>2006)) { $printday="".$day."\n"; } } } else { if (file_exists($basepath2.$filename)) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { $printday="$printday"; } else { $printday="$printday"; } } else { if (($year>2006)) { $printday="".$day."\n"; } } } if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; $day=$day+7; $datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum)); $teller++; if ($teller>9) { echo "\n"; $teller=0; } } if ($teller<10) { while ($teller<10) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; $teller++; } } echo "\n"; // Nodediff? if (is_dir($tmpp)) { // Nodediff dir exists // Reset $datum = $sikdatum; $year=date("Y",$datum); $tyr = $year; // echo "$year "; $day=date("z",$datum)+1; // ??? // $sikday = $day; echo "\n"; // echo "\n"; $teller=1; } else { $teller=0; } while (($day<367) && (date("Y",$datum)==$tyr)) { if (($year==1984) && ($day<153)) { $printday=" "; } else { $printday=$day; } // $filename=sprintf("nodelist/%04d/nl%02s-%03d.zip",$year,substr($year,2,2),$day); // 00 1 3-2 = 1 // 00 12 4-2 = 2 // 00 123 5-2 = 3 // 01 23 // $filename=sprintf("nodelist/%04d/diff/nodediff.z%s",$year, substr("00".$day,strlen($day),2)); // $dbgfn = $filename; // // $filename=substr_replace($filename,'Z',-3,1); // $filename=$basepath.$filename; if ($code_criterion<2) { $filename=sprintf("nodelist/%04d/diff/nodediff.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==20) { // z2pnt $filename=sprintf("pntlist/z2/%04d/Poss/diff/z2pnt_d.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==30) { // r24 // formats: Fake, Boss $filename=sprintf("pntlist/r24/%04d/Boss/diff/r24pnt_d.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==31) { // r28 // formats: Fidouser, Boss $filename=sprintf("pntlist/r28/%04d/Boss/Diff/p28-diff.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==32) { // r31 // formats: V7, Boss $filename=sprintf("pntlist/r31/%04d/Boss/diff/r31pnt_d.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==40) { // r24 // formats: fake $filename=sprintf("pntlist/r24/%04d/fake/diff/pr24diff.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==50) { // r31 // formats: v7 $filename=sprintf("pntlist/r31/%04d/v7/diff/point4dd.z%s",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } else { if ($zone_criterion==60) { // r28 // formats: fidouser $filename=sprintf("pntlist/r28/%04d/fidouser/diff/pointl%s.zip",$year, substr("00".$day,strlen($day),2)); $dbgfn = $filename; // $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; } } } } } } } } if (file_exists($basepath2.$filename)) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { $printday="$printday"; } else { $printday="$printday"; } } else { if (($year>2006)) { $printday="".$day."\n"; } } if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; $day=$day+7; $datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum)); $teller++; if ($teller>9) { echo "\n"; $teller=0; } } if ($teller<10) { while ($teller<10) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; $teller++; } } echo "\n"; } echo "\n"; echo "\n"; echo "\n"; //$day=date("z",$datum)+1; // echo "\n"; /* echo "\n"; echo "\n"; $teller=1; while ($day<367) { if (($year==1984) && ($day<153)) { $printday=" "; } else { $printday=$day; } $filename=sprintf("nodelist/%04d/nodediff.%03d",$year,$day); $filename=substr_replace($filename,'Z',-3,1); $filename=$basepath.$filename; if (file_exists($filename)) { $printday="$printday"; echo ""; $day=$day+7;$teller++;$datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum)); if ($teller>9) { echo ""; $teller=0; } } echo ""; } */ // //$datum=mktime(0,0,0,date("m",$datum),date("d",$datum),date("Y",$datum)+1); //$day=$day+7; //$teller++; //$datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum)); //$datum=mktime(0,0,0,date("m",$datum),date("z",$day),date("Y",$datum)); // $year++; //$datum=mktime(0,0,0,1,1,$year); // //echo $datum."
\n"; //echo $year."
\n"; $tmnth = date("n",$datum); $tday = date("j",$datum); $tyr = date("Y",$datum); //$year=$tyr+1; flush(); } ?>
Legend
 links in black= file can be viewed now
 links in white= file has not be found by Fido historians
 links in red= file scheduled to be added to collection
 Background dark= pre makenl distributions
 Background light= regular makenl distribution since #219/1987
  ".date("Y",$datum)."    ".$listtype."list"; if ($ptype!="") { echo "
(".$ptype.")\n"; } echo "
  ".date("Y",$datum)."    ".$listtype."list"; if ($ptype!="") { echo "
(".$ptype.")\n"; } echo "
"; } else { echo ""; } echo "  "; } else { echo ""; } echo $printday."
"; } else { echo ""; } echo " 
  ".$listtype."diff"; if ($ptype!="") { echo "\n"; // $day=$sikday; if ($day!=1) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo ""; } else { echo ""; } echo "  "; } else { echo ""; } echo $printday."
"; } else { echo ""; } echo " 
  nodediff ".$printday."
 
Credits - Original Collection of File Archives
  ftp://ftp.fidonet.org/fidonet/fido-history -  FIDO-HISTORY PROJECT (The Original)   @ ftp.fidonet.org (Offline)
  Ruth Argust -  The Original FidoNet Nodelist Archives  @ The Great White South BBS
            (Archive: 550 not available)
  Tony Campbell -   FOTI Nodelist / Nodediff Archive Page  @ TheLitterBox BBS
  Frank Robbins - The FidoNet Showcase Project
  Michael Cronsten -   Swedisch Fidonet
  Gisbert Rudolph -   Fido History Project (2)
  Ulrich Schroeter -   Fidonet Archive - Fido History Project (3) @ Ambrosia60
  Steven Leeman -   Fidonet Archive - Reorganized @ skynetbbs
  Alex Woick - Wombaz; Michiel v.d. Vlist @ vlist.eu