Seconds FMHz fpMHz SPGRkm clz_SL EPdeg XLkm YLkm ZLkm V dB PP NcB trace
"."\n"); for($i=1;$i<=$j_rpd;$i++){ fwrite($fp,""."\n"); } fwrite($fp,"
".$RPD[$i]['Seconds']. "".$RPD[$i]['FMHz']. "".$RPD[$i]['fpMHz']. "".$RPD[$i]['SPGRkm']. "".$RPD[$i]['clz_SL']. "".$RPD[$i]['EPdeg']. "".$RPD[$i]['XLkm']. "".$RPD[$i]['YLkm']. "".$RPD[$i]['ZLkm']. "".$RPD[$i]['V']. "".$RPD[$i]['dB']. "".$RPD[$i]['PP']. "".$RPD[$i]['NcB']. "".$RPD[$i]['j']."
"); fwrite($fp,"

"); //---------------------------------------------------------------------------- fwrite($fp,""); fwrite($fp,"
P? j jj MAN NIX ITR FTR RTR XTR YTR ZTR ATR VTR VXX VYY VZZ VMM VBB
"."\n"); for($i=1;$i<=$j_nix;$i++){ if ($NIX[$i]['P']!='+') { $f=' '; } else { $f=$NIX[$i]['P']; } fwrite($fp,""."\n"); } fwrite($fp,"
".$f. "".$NIX[$i]['j']. "".$NIX[$i]['jj']. "".$NIX[$i]['MAN']. "".$NIX[$i]['NIX']. "".$NIX[$i]['ITR']. "".$NIX[$i]['FTR']. "".$NIX[$i]['RTR']. "".$NIX[$i]['XTR']. "".$NIX[$i]['YTR']. "".$NIX[$i]['ZTR']. "".$NIX[$i]['ATR']. "".$NIX[$i]['VTR']. "".$NIX[$i]['VXX']. "".$NIX[$i]['VYY']. "".$NIX[$i]['VZZ']. "".$NIX[$i]['VMM']. "".$NIX[$i]['VBB']."
"); fclose($fp); } else { // no div //echo "HTTP_USER_AGENT= ".$_SERVER['HTTP_USER_AGENT']."
"; $f=str_replace ("htm","txt",$outfile); $fp = fopen ($f,"w+"); fwrite($fp," Seconds FMHz fpMHz SPGRkm TRkm clz_SL EPdeg XLkm YLkm ZLkm V*m/s dB PP NcB j". "\n"); for($i=1;$i<=$j_rpd;$i++){ $str=sprintf("%10.5f%8.4f%8.4f%7.2f%7.2f%8.1f%7.2f%8.2f%8.2f%8.2f%9.2f%7.2f%9.2f%5d%4d", $RPD[$i]['Seconds'],$RPD[$i]['FMHz'],$RPD[$i]['fpMHz'],$RPD[$i]['SPGRkm'],$RPD[$i]['TRkm'], $RPD[$i]['clz_SL'],$RPD[$i]['EPdeg'],$RPD[$i]['XLkm'],$RPD[$i]['YLkm'],$RPD[$i]['ZLkm'], $RPD[$i]['V'],$RPD[$i]['dB'],$RPD[$i]['PP'],$RPD[$i]['NcB'],$RPD[$i]['j']); fwrite($fp,$str."\n"); } fwrite($fp,"\n"."\n"); fwrite($fp,"P? j jj MAN NIX ITR FTR RTR XTR YTR ZTR ATR VTR VXX VYY VZZ VMM VBB". "\n"); for($i=1;$i<=$j_nix;$i++){ $str=sprintf("%2s%2d%3d%6d%6d%6d%8.4f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f%8.1f", $NIX[$i]['P'],$NIX[$i]['j'],$NIX[$i]['jj'],$NIX[$i]['MAN'],$NIX[$i]['NIX'],$NIX[$i]['ITR'], $NIX[$i]['FTR'],$NIX[$i]['RTR'],$NIX[$i]['XTR'],$NIX[$i]['YTR'],$NIX[$i]['ZTR'],$NIX[$i]['ATR'], $NIX[$i]['VTR'],$NIX[$i]['VXX'],$NIX[$i]['VYY'],$NIX[$i]['VZZ'],$NIX[$i]['VMM'],$NIX[$i]['VBB']); fwrite($fp,$str."\n"); } fclose($fp); } ?>