Golden Ocean Fleet as of

$attributes[0], "Vessel"=>$attributes[1], "Manager"=>$attributes[2], "Flag"=>$attributes[3], "Built"=>$attributes[4], "Dwt"=>$attributes[5], "Yard"=>$attributes[6], "PDF"=>$attributes[7], "IMG"=>$attributes[8], "Notes"=>$attributes[9]); $fleet[$pointer] = $vessel; $pointer++; next($FILE); } return $fleet; } function Class_cmp($a, $b){ $haystack = "VLCC, Handymax, Panamax, Capesize"; $a_tmp = strpos($haystack, $a["Class"]); $b_tmp = strpos($haystack, $b["Class"]); if ($a_tmp == $b_tmp) {return Built_cmp($a, $b);} else return $a_tmp - $b_tmp; } function Built_cmp($a, $b){ if ($a["Built"] == $b["Built"]) return 0; return ($a["Built"] > $b["Built"]) ? -1 : 1; } function Built_w($td, $td_s, $vessel){ print $td . $vessel["Built"] . $td_s; } function Dwt_w($td, $td_s, $vessel){ if ($vessel["Dwt"] < 100000) { $weight = substr($vessel["Dwt"],0,2) . " " . substr($vessel["Dwt"],2,3);} else { $weight = substr($vessel["Dwt"],0,3) . " " . substr($vessel["Dwt"],3,3);} print $td . $weight . $td_s; } function Yard_w($td, $td_s, $vessel){ print $td . $vessel["Yard"] . $td_s; } function PDF_w($td, $td_s, $vessel){ if ($vessel["PDF"] == "nil") {print $td . " " . $td_s;} else { print $td; print " Download " . $td_s; } } function Class_w($td, $td_s, $vessel){ print $td . $vessel["Class"] . $td_s; } function Vessel_w($td, $td_s, $vessel){ $pos = strpos($vessel["Notes"], "nil"); if ($pos === false) {$Notes = $vessel["Notes"];} else {$Notes = "";} if ($vessel["IMG"] == "nil") {print $td . $vessel["Vessel"] . $Notes . $td_s;} else { $data = explode(",", $vessel["IMG"]); print $td . "" . $vessel["Vessel"] . $Notes . "" . $td_s; } } function Manager_w($td, $td_s, $vessel){ print $td . $vessel["Manager"] . $td_s; } function Flag_w($td, $td_s, $vessel){ print $td . $vessel["Flag"] . $td_s; } function nWrite($fleet){ $tr = ""; $tr_s = ""; $td = ""; $td_s = ""; print ""; print ""; print "Type"; print "Vessel"; print "Manager"; print "Flag"; print "Built"; print "S.Dwt"; print "Yard"; print "Technical"; print ""; print ""; while ($vessel = current($fleet)){ print $tr; Class_w($td, $td_s, $vessel); Vessel_w($td, $td_s, $vessel); Manager_w($td, $td_s, $vessel); Flag_w($td, $td_s, $vessel); Built_w($td, $td_s, $vessel); Dwt_w($td, $td_s, $vessel); Yard_w($td, $td_s, $vessel); PDF_w($td, $td_s, $vessel); print $tr_s; next($fleet); } } $Fleet = array(); $Fleet = loadFleet($Fleet); usort($Fleet, "Class_cmp"); ?>