function covertops()
{
$sth = mysql_query("select * from covertops as c,covertopsmissions as cm where c.time=1 and c.cid=cm.id");
if (!$sth) {
echo "Dtaabaser failure!";
}
while ($covertops = mysql_fetch_array($sth)) {
$success = false;
$sth1 = mysql_query("select sum(c.value) from covertopsupgrades as c,constructions as b,planets as p where p.id=b.pid and b.prod_id=c.prod_id and p.uid=" . $covertops["uid"]);
if (!$sth1) {
echo "Dast FDS!";
}
$f_co_upgrades = mysql_fetch_row($sth1);
$sth1 = mysql_query("select count(id) from planets where uid=" . $covertops["uid"]);
if (!$sth1) {
echo "Datasbe failure!";
}
$f_planets = mysql_fetch_row($sth1);
$f_rate = $f_co_upgrades[0] / $f_planets[0];
// echo("Friendly Rate: ".$f_rate."\n");
if ($covertops["targettype"] == "I") {
$imperium = $covertops["target"];
} else {
$sth1 = mysql_query("select uid from planets where id=" . $covertops["target"]);
if (!$sth1) {
echo "Datasbe failuer!";
}
$uid = mysql_fetch_array($sth1);
$imperium = $uid["uid"];
}
$sth1 = mysql_query("select sum(population)/10000 from planets where uid=" . $imperium);
if (!$sth1) {
echo "Datasber faileur!";
}
$spies = mysql_fetch_row($sth1);
$sth1 = mysql_query("select sum(count) from covertops where uid=" . $imperium);
if (!$sth1) {
echo "Database failuer!";
}
$used_spies = mysql_fetch_row($sth1);
if ($used_spies[0] == NULL) {
$rate = 100;
} else {
$rate = ($spies[0] - $used_spies[0]) / $spies[0] * 100;
}
// echo("Grundrate: $rate\n");
$sth1 = mysql_query("select sum(c.value) from covertopsupgrades as c,constructions as b,planets as p where p.id=b.pid and b.prod_id=c.prod_id and p.uid={$imperium}");
if (!$sth1) {
echo "Dtasabr failuer!";
}
$co_upgrades = mysql_fetch_row($sth1);
$sth1 = mysql_query("select count(id) from planets where uid={$imperium}");
if (!$sth1) {
echo "Datasbe failure!";
}
$planets = mysql_fetch_row($sth1);
$rate = $rate + $co_upgrades[0] / $planets[0];
// echo("Rate mit Upgrades: $rate\n");
if ($rate <= 0) {
$success = true;
} else {
mt_srand((double) microtime() * 1000000);
$random = mt_rand(0, $rate - $f_rate);
// echo("Berechnung: Rate->$rate Frindly Rate->$f_rate Zufall->$random Chance->".$covertops["chance"]."\n");
if ($random <= $covertops["chance"]) {
$success = true;
}
}
// if ($success)
// echo("Success!\n");
// DEBUG!
// $success=true;
if ($success) {
switch ($covertops["missiontype"]) {
case "S":
define("MAX_STEAL", 25);
$sth1 = mysql_query("select f.prod_id,f.fid,f.count,p.typ, p.name, f.reload from fleet as f,production as p left join fleet_info as fi on fi.fid=f.fid where fi.uid={$imperium} and fi.mission=0 and fi.tpid=0 and fi.tsid=0 and fi.pid!=0 and f.prod_id=p.prod_id order by rand() limit 1");
if (!$sth1) {
echo "Datsbe faileur!";
}
if (mysql_num_rows($sth1) > 0) {
$fleet = mysql_fetch_array($sth1);
$sth2 = mysql_query("select p.id,p.sid from planets as p,users as u where p.id=u.homeworld and u.id=" . $covertops["uid"]);
if (!$sth2) {
echo "Dtabaser faileur!";
}
$home = mysql_fetch_array($sth2);
switch ($fleet["typ"]) {
case "L":
$multiplikator = 1;
break;
case "M":
$multiplikator = 5;
break;
case "H":
$multiplikator = 10;
break;
}
if ($multiplikator * $fleet["count"] > MAX_STEAL) {
$fleet["count"] = floor(MAX_STEAL / $multiplikator);
}
$new_fleet = new fleet();
$new_fleet->add_ships_arr(array($fleet["prod_id"] => array($fleet["count"], $fleet["reload"])));
$new_fleet->uid = $covertops["uid"];
$new_fleet->pid = $home["id"];
$new_fleet->sid = $home["sid"];
$new_fleet->create_fleet();
$sth2 = mysql_query("update fleet set count=count-" . $fleet["count"] . " where fid=" . $fleet["fid"] . " and prod_id=" . $fleet["prod_id"]);
delete_empty_fleets();
ticker($covertops["uid"], "You have stolen " . $fleet["count"] . " " . $fleet["name"], "s");
ticker($imperium, $fleet["count"] . " " . $fleet["name"] . " vanished from your radar!", "s");
} else {
ticker($covertops["uid"], "Your spies didn't find any ships. The target imperium doesn't have any!", "s");
}
break;
case "B":
$sth1 = mysql_query("select b.prod_id,b.pid,pl.name,p.name as pname from planets as pl,production as p,constructions as b where b.prod_id=p.prod_id and b.pid=pl.id and pl.uid={$imperium} order by rand()");
if (!$sth1) {
echo "Database failoer!";
}
if (mysql_num_rows($sth1) > 0) {
$building = mysql_fetch_array($sth1);
$sth1 = mysql_query("delete from constructions where prod_id=" . $building["prod_id"] . " and pid=" . $building["pid"]);
if (!$sth1) {
echo "DDFatabf failur!";
}
if ($building["name"] == "Unnamed") {
$building["name"] = get_planetname("pid");
}
ticker($covertops["uid"], "Your spies destroyed the " . $building["pname"] . " on planet " . $building["name"] . "!", "s");
ticker($imperium, "The " . $building["pname"] . " on planet " . $building["name"] . " was destroyed misteriously!", "s");
}
break;
case "F":
$sth1 = mysql_query("select f.prod_id,f.fid from fleet as f,fleet_info as fi where fi.uid={$imperium} and fi.fid=f.fid");
if (!$sth1) {
echo "Datsbe faileur!";
}
if (mysql_num_rows($sth1) > 0) {
if (mysql_num_rows($sth1) == 1) {
$random = 0;
} else {
mt_srand((double) microtime() * 1000000);
$random = mt_rand(0, mysql_num_rows($sth1) - 1);
}
for ($i = 0; $i <= $random; $i++) {
$fleet = mysql_fetch_array($sth1);
}
$sth2 = mysql_query("delete from fleet where fid=" . $fleet["fid"] . " and prod_id=" . $fleet["prod_id"]);
delete_empty_fleets();
ticker($covertops["uid"], "You spies destroyed some ships!", "s");
ticker($imperium, "Enemy spies destroyed some of your ships!", "s");
} else {
ticker($covertops["uid"], "Your spies didn't find any ships. The target imperium doesn't have any!", "s");
}
break;
case "N":
$sth1 = mysql_query("select * from ticker where uid={$imperium}");
if (!$sth1) {
echo "Database failure!";
}
while ($ticker = mysql_fetch_array($sth1)) {
if ($end = strrpos($ticker["text"], "*")) {
$text = substr($ticker["text"], $end + 1);
} else {
$text = $ticker["text"];
}
$mail = $mail . "\n" . $text;
}
if (mysql_num_rows($sth1) == 0) {
$mail = "This Imperium doesn't have any news at the moment!";
}
$sth1 = mysql_query("select imperium from users where id=" . $imperium);
if (!$sth1) {
echo "Datsabe failure!";
}
$imp_name = mysql_fetch_array($sth1);
mail_to_uid($covertops["uid"], "News of " . $imp_name["imperium"], $mail);
ticker($covertops["uid"], "Your spies have successfully hacked a news network. Check Mails.", "s");
break;
case "M":
$mail = "";
$sth1 = mysql_query("select fi.*,f.prod_id,f.count,f.reload,p.name,s.x,s.y from fleet as f,production as p,systems as s left join fleet_info as fi on fi.fid=f.fid and fi.uid={$imperium} where p.prod_id=f.prod_id and s.id=fi.sid order by fid");
if (mysql_num_rows($sth1) == 0) {
$mail = "Target imperium doesn't have any fleets";
} else {
while ($part_fleet = mysql_fetch_array($sth1)) {
if ($part_fleet["fid"] != $fid_old) {
$fid_old = $part_fleet["fid"];
$counter++;
}
$fleet[$counter][] = $part_fleet;
}
$counter = 1;
for ($i = 1; $i <= sizeof($fleet); $i++) {
$mail = $mail . "Fleet " . $counter++ . "<br>";
$mail = $mail . "<table>";
$head_array = "";
$text_arr = "";
$prod_arr = "";
for ($j = 0; $j < sizeof($fleet[$i]); $j++) {
$head_array[$j] = $fleet[$i][$j]["name"];
$text_arr[$j] = $fleet[$i][$j]["count"];
}
switch ($fleet[$i][0]["mission"]) {
case "0":
$mission_text["a"] = "Defending";
$mission_text["b"] = "defend";
break;
case "1":
$mission_text["a"] = "Attacking";
$mission_text["b"] = "attack";
break;
case "4":
$mission_text["a"] = "";
$mission_text["b"] = "colonize";
break;
}
if ($fleet[$i][0]["pid"] != 0 and $fleet[$i][0]["tsid"] == 0 and $fleet[$i][0]["tpid"] == 0) {
$planetname = get_planetname($fleet[$i][0]["pid"]);
$mission = $mission_text["a"] . " planet " . $planetname;
}
if ($fleet[$i][0]["pid"] == 0 and $fleet[$i][0]["tsid"] == 0 and $fleet[$i][0]["tpid"] == 0) {
$systemname = get_systemname($fleet[$i][0]["sid"]);
$mission = $mission_text["a"] . " system " . $systemname;
}
if ($fleet[$i][0]["tsid"] != 0 and $fleet[$i][0]["tpid"] == 0) {
$systemname = get_systemname($fleet[$i][0]["tsid"]);
$mission = "On its way to " . $mission_text["b"] . " system " . $systemname;
}
if ($fleet[$i][0]["tsid"] != 0 and $fleet[$i][0]["tpid"] != 0) {
$planetname = get_planetname($fleet[$i][0]["tpid"]);
$mission = "On its way to " . $mission_text["b"] . " planet " . $planetname;
}
$text_arr[] = $mission;
$head_array[] = "Mission";
reset($head_array);
$mail = $mail . "<tr>";
while (list($key, $dummy) = each($head_array)) {
//echo($dummy."\n");
$mail = $mail . "<th>{$dummy}</th>";
}
$mail = $mail . "</tr>";
reset($text_arr);
$mail = $mail . "<tr>";
while (list($key, $dummy) = each($text_arr)) {
echo $key . " - " . $dummy . "\n";
$mail = $mail . "<td>{$dummy}</td>";
}
$mail = $mail . "</tr>";
$mail = $mail . "</table>";
}
}
$sth1 = mysql_query("select imperium from users where id=" . $imperium);
if (!$sth1) {
echo "Datsabe failure!";
}
$imp_name = mysql_fetch_array($sth1);
mail_to_uid($covertops["uid"], "Military overview of " . $imp_name["imperium"], $mail);
ticker($covertops["uid"], "Your spies have successfully hacked a military network. Check Mails.", "s");
break;
case "I":
$mail = "";
$sth1 = mysql_query("select c.target,cm.descr,cm.targettype from covertops as c,covertopsmissions as cm where uid={$imperium} and cm.id=c.cid");
if (!$sth1) {
echo "Databasdf faileru!";
}
while ($missions = mysql_fetch_array($sth1)) {
if ($missions["targettype"] == "I") {
$sth2 = mysql_query("select imperium from users where id=" . $missions["target"]);
if (!$sth2) {
echo "Datasbae failuer!";
}
$imp_tname = mysql_fetch_array($sth2);
$target = "Imperium " . $imp_tname["imperium"];
} else {
$planetname = get_planetname($missions["target"]);
$target = "Planet " . $planetname;
}
$mail = $mail . "\n" . $missions["descr"] . " Target :" . $target;
}
$sth1 = mysql_query("select imperium from users where id=" . $imperium);
if (!$sth1) {
echo "Datsabe failure!";
}
$imp_name = mysql_fetch_array($sth1);
mail_to_uid($covertops["uid"], "CovertOps overview of " . $imp_name["imperium"], $mail);
break;
case "C":
$sth1 = mysql_query("select population from planets where id=" . $covertops["target"]);
if (!$sth1) {
echo "Datasb faileur!";
}
$pop = mysql_fetch_array($sth1);
if ($pop["population"] > 10000000) {
mt_srand((double) microtime() * 1000000);
$killed = mt_rand(5000000, 8000000);
} else {
mt_srand((double) microtime() * 1000000);
$killed = round($pop["population"] * (mt_rand(30, 80) / 100));
}
$planetname = get_planetname($covertops["target"]);
$sth1 = mysql_query("update planets set population=population-{$killed} where id=" . $covertops["target"]);
if (!$sth1) {
echo "udFH failuewr!";
}
ticker($covertops["uid"], "Your spies launched a nuclear assault on Planet " . $planetname . " {$killed} were killed!", "s");
$sth1 = mysql_query("select uid from planets where id=" . $covertops["target"]);
if (!$sth1) {
echo "Database dfasi!";
}
$uid_target = mysql_fetch_array($sth1);
ticker($uid_target["uid"], "Enemy spies launched a deadly nuclear attack agaonst Planet " . $planetname . " {$killed} were killed!", "s");
break;
case "V":
$sth1 = mysql_query("select population from planets where id=" . $covertops["target"]);
if (!$sth1) {
echo "Datasb faileur!";
}
$pop = mysql_fetch_array($sth1);
mt_srand((double) microtime() * 1000000);
$killed = round($pop["population"] * (mt_rand(30, 80) / 100));
$planetname = get_planetname($covertops["target"]);
$sth1 = mysql_query("update planets set population=population-{$killed} where id=" . $covertops["target"]);
if (!$sth1) {
echo "udFH failuewr!";
}
ticker($covertops["uid"], "Your spies deployed a deadly virus on Planet " . $planetname . " {$killed} were killed!", "s");
$sth1 = mysql_query("select uid from planets where id=" . $covertops["target"]);
if (!$sth1) {
echo "Database dfasi!";
}
$uid_target = mysql_fetch_array($sth1);
ticker($uid_target["uid"], "Enemy spies deployed a deadly virus on Planet " . $planetname . " {$killed} were killed!", "s");
break;
case "A":
$sth1 = mysql_query("select imperium from users where id={$imperium}");
if (!$sth1) {
echo "Databsae faileru!";
}
$imp_name = mysql_fetch_array($sth1);
$sth1 = mysql_query("select id,name,value from admirals where uid={$imperium} order by rand()");
if (!$sth1) {
echo "Dtzasa faielru!";
}
if (mysql_num_rows($sth1) == 0) {
ticker($covertops["uid"], "Your spies didn't find an admiral of Imperium " . $imp_name["imperium"] . "!", "s");
return 0;
}
$admiral = mysql_fetch_array($sth1);
$sth1 = mysql_query("delete from admirals where id=" . $admiral["id"]);
if (!$sth1) {
echo "Dzasakhbd faileur!";
}
ticker($covertops["uid"], "Your spies killed Admiral " . $admiral["name"] . " of Imperium " . $imp_name["imperium"] . "!", "s");
ticker($imperium, "Admiral " . $admiral["name"] . " was assasinated!", "w");
break;
case "T":
$sth1 = mysql_query("select imperium from users where id={$imperium}");
if (!$sth1) {
echo "Databsae faileru!";
}
$imp_name = mysql_fetch_array($sth1);
$sth1 = mysql_query("select sid from tradestations where uid={$imperium}");
if (!$sth1) {
echo "Dtasgha faij!";
}
if (mysql_num_rows($sth1) == 0) {
ticker($covertops["uid"], $imp_name["imperium"] . " doesn't have a tradestation. Mission aborted.", "w");
}
list($stationid) = mysql_fetch_row($sth1);
$sth1 = mysql_query("update tradestations set fail_chance=fail_chance+(rand()*10+1) where sid={$stationid}");
if (!$sth1) {
echo "Datsbae fauO!";
}
ticker($covertops["uid"], "Your spies have successfully sabotaged " . $imp_name["imperium"] . "'s tradestation", "w");
break;
}
} else {
mt_srand((double) microtime() * 10000000);
$random = mt_rand(0, 100);
if ($random <= 50) {
if ($random <= 20) {
$sth1 = mysql_query("select name,imperium from users where id=" . $covertops["uid"]);
if (!$sth1) {
echo "Dtas afa!";
}
$att_name = mysql_fetch_array($sth1);
ticker($imperium, "Your spies intercepted some enemy spies. Their leader is " . $att_name["name"] . " (" . $att_name["imperium"] . ")!", "s");
} else {
ticker($imperium, "Your spies intercepted some enemy spies!", "s");
}
}
}
}
$sth = mysql_query("delete from covertops where time<=1");
if (!$sth) {
echo "Dtabas faislru!";
}
$sth = mysql_query("update covertops set time=time-'1'");
if (!$sth) {
echo "Dtasbwer failure!";
}
}
function transfer()
{
global $uid;
global $fleet;
global $PHP_SELF;
global $HTTP_REFFERRER;
if (!is_array($fleet)) {
show_error("You have to select a fleet and some ships in order to transfer!");
return 0;
}
$i = 0;
while (list($key, $value) = each($fleet)) {
if ($value == "Y") {
$fleets[$i] = new fleet($key);
if (!$fleets[$i]->uid == $uid) {
show_error("Hello! I'm your friend...Why are you trying such nasty things?");
return 0;
}
if (!$pid) {
$pid = $fleets[$i]->pid;
$sid = $fleets[$i]->sid;
} else {
if ($fleets[$i]->pid != $pid || $fleets[$i]->sid != $sid) {
show_error("You may only select fleets which are at the same planet and system!");
return 0;
}
}
}
$i++;
}
$new_fleet = new fleet();
echo "<form action=\"" . $PHP_SELF . "\" method=post>";
for ($i = 0; $i < sizeof($fleets); $i++) {
$temp_var = "fleet_" . $fleets[$i]->fid;
global ${$temp_var};
foreach ((array) ${$temp_var} as $key => $value) {
// Überprüfen ob die werte ok sind (key=>prod_id, value=>count)
if ($fleets[$i]->ships[$key] && $fleets[$i]->ships[$key][0] >= $value && (int) $value > 0) {
// Das wird nachher ausgelesen um die flotten auch um den wert zu reduzieren
$fleets[$i]->ships[$key][0] -= $value;
$aff_fleets[] = $fleets[$i]->fid;
$new_fleet->add_ships_arr(array($key => array($value, $fleets[$i]->ships[$key][1])));
} elseif ($value == 0) {
continue;
} else {
show_error("You entered a wrong shipcount for fleet " . $fleets[$i]->name . "!");
return 0;
}
form_hidden("fleet_" . $fleets[$i]->fid . "[" . $key . "]", $value);
}
}
$fids = get_fids_by_pid($pid, $uid, $sid);
for ($i = 0; $i < sizeof($fleets); $i++) {
// mop: was für nen toller hack
if (in_array($fleets[$i]->fid, $fids)) {
// mop: umdrehen, damit wir das unsetten können ohne das array komplett durchsuchen zu müssen
$fids_tmp = array_flip($fids);
unset($fids_tmp[$fleets[$i]->fid]);
// mop: und wieder zurück
$fids = array_flip($fids_tmp);
}
form_hidden("fid[" . $i . "]", $fleets[$i]->fid);
}
// mop: wenn fertig fidsarray neubauen
$fids = array_values($fids);
// mop: jetzt die ausgewählten flotten abwählen
for ($i = 0; $i < sizeof($fids); $i++) {
$trans_fleets[$i] = new fleet($fids[$i]);
}
if (sizeof($trans_fleets) == 0) {
center_headline("You have no fleets you could transfer these ships to:)");
go_back($_SERVER["PHP_SELF"]);
} else {
for ($i = 0; $i < sizeof($trans_fleets); $i++) {
$head_array = "";
$text_arr = "";
$prod_arr = "";
table_start("center", "80%");
table_head_text(array("Fleet " . $trans_fleets[$i]->name), "20");
$head_array[0] = " ";
$prod_arr[0] = "";
$text_arr[0] = "<input type=radio name=\"fleet\" value=\"" . $trans_fleets[$i]->fid . "\">";
reset($trans_fleets[$i]);
while (list($prod_id, $ship_arr) = each($trans_fleets[$i]->ships)) {
$head_array[] = get_name_by_prod_id($prod_id);
$text_arr[] = $ship_arr[0];
}
$mission = $trans_fleets[$i]->get_mission();
list($type, $location) = $trans_fleets[$i]->get_location();
if ($type == 0) {
$mission_text = $mission[0] . " ";
} else {
$mission_text = "On its way to " . $mission[1] . " ";
}
list($location_id, $location_type) = $location;
if ($location_type == 0) {
$mission_text .= "planet " . get_planetname($trans_fleets[$i]->pid);
$location_text = "Planet " . get_planetname($trans_fleets[$i]->pid) . "(" . get_systemname($trans_fleets[$i]->sid) . ")";
} else {
$mission_text .= "system " . get_system_coords($trans_fleets[$i]->sid);
$location_text = "System " . get_systemname($trans_fleets[$i]->sid);
}
table_text(array(" "), "", "", "20", "head");
table_text_open();
table_text_design("Mission:", "50", "", "", "smallhead");
table_text_design($mission_text, "", "", "19", "text");
table_text_close();
table_text($head_array, "", "", "", "smallhead");
table_text($text_arr, "", "", "", "text");
table_end();
echo "<br><br>\n";
}
form_hidden("act", "transferab");
echo "<center>\n";
echo "<input type=submit value=\"Transfer\">";
echo "</center>\n";
echo "</form>";
}
}
