"); if($str) { for($i=7; $i0)) { $string = filesize($filename); $l=strlen($string); if($l>6) { $siz=sprintf("%s.%s.%s",substr($string,0,$l-6),substr($string,$l-6,3),substr($string,$l-3,3)); } else { if($l>3) { $siz=sprintf("%s.%s",substr($string,0,$l-3),substr($string,$l-3,3)); } } } return $siz; } ?> \n"; ?> tecnical InfoSite - Bonito-RadioList
$RadioName"; $ti0="Info-Seite über Bonito %s Switchbox"; $t0="typische Switchbox"; $t1="Kabel-Anschluss"; $t2="typische Software"; $t3="gezipptes .PDF"; $t4="Bild"; $t5="nicht vorhanden"; $t6="für"; $t7="zurück zu den technischen Diensten"; $t8="Zurück"; $lh0="Empfänger / Sender"; $lh1="typische
Switchbox"; $lh2="Anschlussplan (RX)"; $lh2h="Anschlussplan (TX)"; $lh3="Variablen in RECCTRL.INI"; $lh4="Variablen in MRX.INI / RC50.INI"; $lu="unbekannt"; $wt="sehr wichtige Info"; $wi="Winradio-Info"; } else { $ti0="InfoSite about Bonito %s Switchbox"; $t0="typical Switchbox"; $t1="Cable junktion"; $t2="typical Software"; $t3="zipped .PDF"; $t4="Image"; $t5="not available"; $t6="for"; $t7="back to the technical service site"; $t8="Back"; $lh0="Receiver / Transceiver"; $lh1="typical
Switchbox"; $lh2="junktion diagram (RX)"; $lh2="junktion diagram (TX)"; $lh3="Variables in RECCTRL.INI"; $lh4="Variables in MRX.INI / RC50.INI"; $lu="unknow"; $wt="very important info"; $wi="Winradio-Info"; } if (substr($R1,0,1) == "D") { $buf=""; $fi = fopen ("$MyData/radios.dat", "r"); if($fi) { for($i=0; $i<$selectedRadio; $i++) { if(feof ($fi)) break; $buf=fgets($fi,255); } fclose ($fi); } list ($RadioName, $IC_PCR, $BT_NAU, $IC_SWL, $RC_SWL, $RC_HAM, $DglM, $DglH, $DglP, $RecM, $RadM, $ConM, $RecH, $RadH, $ConH) = split ('[:]', $buf); $inf="../infos/"; $swbx=MakeFileName("",$language,"_uni_swbx.htm"); $BT="BoardTerminal - MeteoCom - Meteoscan - NavalMeteo"; if($language == "de") { $title="technische Detail-Übersicht für:
$RadioName"; } else { $title="technical detail overview for:
$RadioName"; } if($selectedRadio == 54 || $selectedRadio == 55 || $selectedRadio == 56 || $selectedRadio == 57) { $tm1="IC-PCR"; $tm2="ProMeteo - $BT"; $tm3=MakeFileName($inf,$language,"_mar_pm98.htm"); $tm4=GetTitle($tm3); $cm=$IC_PCR; $th1="IC-SWL"; $cs=$IC_SWL; $ch=$RC_HAM; } else { $tm2=$BT; $tm3=MakeFileName($inf,$language,"_mar_bt98.htm"); $tm4=GetTitle($tm3); $cm=$BT_NAU; if($selectedRadio != 10 && $selectedRadio != 69) { $tm1="NautiCom"; $th1="RC-SWL"; $cs=$RC_SWL; $ch=$RC_HAM; } else { $tm1="IC-PCR"; $th1="IC-SWL"; $cs=$IC_SWL; $ch=$RC_HAM; } } $th_4rc=MakeFileName($inf,$language,"_ham_rc40.htm"); $th_45rc=MakeFileName($inf,$language,"_ham_rc45.htm"); $th_5rc=MakeFileName($inf,$language,"_ham_rc50.htm"); $th_rc4=GetTitle($th_4rc); $th_rc45=GetTitle($th_45rc); $th_rc5=GetTitle($th_5rc); print "\n"; print "\n"; if(substr($R1,1,1) == 'M' || substr($R1,1,1) == 'B') { print "\n"; print "\n"; } if(substr($R1,1,1)=="H" || substr($R1,1,1)=="B") { print "\n"; print "\n"; } print "

$title

MARINE

\n"; $tx=sprintf($ti0,$tm1); print ""; print "\n"; print ""; if(strlen($cm)>0) { $tb=sprintf("cab%s.zip",$cm); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print "\n"; } else { print ""; } print "\n"; print ""; print "
$t0 :$tm1
$t1 :$t3 , "; $tb=sprintf("cab%s.pdf",$cm); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print "PDF-File , "; $tb=sprintf("cab%s.gif",$cm); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print "GIF-$t4
$t5
$t2 :"; print "$tm2
RECCTL.INI :RECEIVER=$RecM  "; if($RadM>0) { print "ICOM_RADIO=$RadM   ICOM_CONTROLLER=$ConM"; } else { print "ICOM_RADIO=0   ICOM_CONTROLLER=0"; } print "

HAM-RADIO

\n"; $tx1=sprintf($ti0,$th1); $tx2=sprintf($ti0,"RC-HAM"); print ""; print ""; print "\n"; print ""; print "\n"; } else { print "$t5\n"; } print "\n"; } else { print "$t5\n"; } print "
$t0 :$t6 RX = $th1$t6 RX / TX = RC-HAM
$t1 :"; if(strlen($cs)>0) { $tb=sprintf("cab%s.zip",$cs); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print "$t3 , "; $tb=sprintf("cab%s.pdf",$cs); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print "PDF-File , "; $tb=sprintf("cab%s.gif",$cs); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print "GIF-$t4"; if(strlen($ch)>0) { $tb=sprintf("cab%s.zip",$ch); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print "$t3 , "; $tb=sprintf("cab%s.pdf",$ch); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print "PDF-File , "; $tb=sprintf("cab%s.gif",$ch); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print "GIF-$t4
"; print "
\n"; print ""; print ""; print "\n"; print ""; print "
$t2 :RadioCom 4.0 ,RadioCom 4.5 , RadioCom 5.0
MRX.INI / RC50.INI :RECEIVER=$RecH  "; if($RadH>0) { print "ICOM_RADIO=$RadH   ICOM_CONTROLLER=$ConH"; } else { print "ICOM_RADIO=0   ICOM_CONTROLLER=0"; } print "
\n"; } else { print "\n"; if(substr($R1,1,1) == 'M' || substr($R1,1,1) == 'B') { print "\n"; } if(substr($R1,1,1) == "H" || substr($R1,1,1) == "B") { print "\n"; } print "

Bonito RadioList

"; print "\n"; print "\n"; print ""; print "\n"; print ""; print ""; print ""; print "\n"; $buf=""; $inf="../infos/"; $swbx=MakeFileName("",$language,"_uni_swbx.htm"); $fi = fopen ("$MyData/radios.dat", "r"); if($fi) { $i=0; $sx=0; while(!feof ($fi)) { $buf=fgets($fi,255); list ($RadioName, $IC_PCR, $BT_NAU, $IC_SWL, $RC_SWL, $RC_HAM, $DglM, $DglH, $DglP, $RecM, $RadM, $ConM, $RecH, $RadH, $ConH) = split ('[:]', $buf); $i++; if(!($DglM == 1 || $DglM == 2)) { if($sx==0) { $sx=1; } continue; } $sw=$lu; if($sx==1) { print "\n"; $sx=0; } $cm=""; switch ($DglM) { case 1: $sw="NautiCom"; $cm=$BT_NAU; break; case 2: $sw="IC-PCR"; $cm=$IC_PCR; break; } $tx=sprintf($ti0,$sw); print ""; if(strlen($cm)>0) { $tb=sprintf("cab%s.zip",$cm); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.pdf",$cm); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.gif",$cm); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print ""; } else { if($i==190) #winradio { print ""; } else { print ""; } print ""; } print "\n"; } fclose ($fi); } print "

MARINE

$lh0$lh1$lh2$lh3
$t3.PDF$t4RECEIVERICOM_RADIOICOM_CONTROLLER
$RadioName$sw$tbPDFGIF
$wi
-----$RecM$RadM$ConM
"; print "\n"; print "\n"; print ""; print ""; print ""; print ""; print "\n"; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print "\n"; $buf=""; $inf="../infos/"; $fi = fopen ("$MyData/radios.dat", "r"); if($fi) { $i=0; $sx=0; while(!feof ($fi)) { $buf=fgets($fi,255); list ($RadioName, $IC_PCR, $BT_NAU, $IC_SWL, $RC_SWL, $RC_HAM, $DglM, $DglH, $DglP, $RecM, $RadM, $ConM, $RecH, $RadH, $ConH) = split ('[:]', $buf); $i++; if(!($DglH == 4 || $DglH == 8 || $DglH == 16)) { if($sx==0) { $sx=1; } continue; } if($sx==1) { print "\n"; $sx=0; } $sw=$lu; $cs=""; $ch=""; switch ($DglH) { case 4: $sw="IC-SWL"; $cs=$IC_SWL; $ch=$RC_HAM;break; case 8: $sw="RC-SWL"; $cs=$RC_SWL; $ch=$RC_HAM; break; case 16: $sw="RC-HAM"; $cs=$RC_HAM; $ch=$RC_HAM; break; } $tx=sprintf($ti0,$sw); print ""; if(strlen($cs)>0) { $tb=sprintf("cab%s.zip",$cs); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.pdf",$cs); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.gif",$cs); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print ""; } else { if($i==190) #winradio { print ""; } else { print ""; } print ""; } if(strlen($ch)>0) { $tb=sprintf("cab%s.zip",$ch); $tl=sprintf("zip/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.pdf",$ch); $tl=sprintf("pdf/%s",$tb); $ts=GetSize($tl); print ""; $tb=sprintf("cab%s.gif",$ch); $tl=sprintf("images/%s",$tb); $ts=GetSize($tl); print ""; } else { print ""; } print "\n"; } fclose ($fi); } print "

HAM-RADIO

$lh0$lh1$lh2$lh2h$lh3
$t3.PDF$t4$t3.PDF$t4RECIEVERICOM_RADIOICOM_CONTROLLER
$RadioName$sw$tbPDFGIF
$wi
-----$tbPDFGIF-----$RecH$RadH$ConH
\n"; } ?>
\n"; ?>

(c) 2000 BONITO Germany

Web: www.bonito.net      email: anfragen@bonito.net

$t8\n"; ?>