Sokan gy gondoljk, hogy holdlvsre vannak klnbz receptek. Az albbiakban errl a legendrl fogom lerntani a leplet... tnzzk kicsit a hold ltrehozsrt felels programrszletet melybl ki fog derlni az igazsg.
$debris = $zlom["metal"] + $zlom["krysztal"]; Az sszes df kiszmolsa Fm+Kristly
$deb = "Jelenlegi koordintid {$zlom["metal"]} Fm s {$zlom["krysztal"]} Kristly .";
Az rtk megjelentse a csatajelentsben
$szansa2 = $debris/100000; A % kiszmtsa.
$enemyrow =doquery("SELECT * FROM {{table}} WHERE galaxy={$f['fleet_end_galaxy']} AND system={$f['fleet_end_system']} AND planet={$f['fleet_end_planet']}",'planets',true);
Rgzti a csata koordintit ksbbi felhasznls cljbl.
$galenemyrow =doquery("SELECT * FROM {{table}} WHERE galaxy={$f['fleet_end_galaxy']} AND system={$f['fleet_end_system']} AND planet={$f['fleet_end_planet']}",'galaxy',true);
Szintn a csata koordintit rgzti.
$maxtemp = $enemyrow['temp_max']-rand(10, 45);
$mintemp = $enemyrow['temp_min']-rand(10, 45); A hold min s max hmrsklett lltja be.
$sre = rand(4000, 10000);
if($debris > 2000000){
$szansa2 = 20; Ha a DF tbb, mint 2M akkor is 20% legyen a maximlis holdesly.
}
if($debris < 100000){
$szansa = 0; Ha a DF kevesebb, mint 100k, akkor a holdesly legyen 0%.
$szanmoon = "";
} elseif ($debris >= 100000){
$szansa = rand(1, 100); Egy vletlenszm generlsa 1 s 100 kztt.
$szanmoon = "Eslyt egy holdra ltrehozta $szansa2 % "; Az esly megjelentse a csatajelentsben.
}
if(($szansa > and ($szansa <= $szansa2) and $galenemyrow['id_luna'] == 0){
Ha a generlt % kissebb, mint a holdesly akkor ltrehozza a holdat. A tovbbiakban mr csak a ltrejtt hold adatait rgzti a program az adatbzisban..
doquery("INSERT INTO {{table}} SET
`name`='moon',
`galaxy`='{$f['fleet_end_galaxy']}',
`system`='{$f['fleet_end_system']}',
`lunapos`='{$f['fleet_end_planet']}',
`id_owner`='{$enemyrow['id_owner']}',
`temp_max`='$maxtemp',
`temp_min`='$mintemp',
`diameter`='$sre',
`id_luna`='{$f['fleet_start_time']}'"
,"lunas");
$lunarow =doquery("SELECT * FROM {{table}} WHERE galaxy={$f['fleet_end_galaxy']} AND system={$f['fleet_end_system']} AND lunapos={$f['fleet_end_planet']}",'lunas',true);
doquery("UPDATE {{table}} SET
`id_luna`='{$lunarow['id']}',
`luna`='0' WHERE
`galaxy`='{$f['fleet_end_galaxy']}' AND
`system`='{$f['fleet_end_system']}' AND
`planet`='{$f['fleet_end_planet']}'"
,"galaxy");
$powtal = "Tebrikler!! {$enemyrow['name']} [{$f['fleet_end_galaxy']}:{$f['fleet_end_system']}:{$f['fleet_end_planet']}] Yeni Bir Ay Olusturdunuz!";
} elseif ($szansa = 0 or $szansa > $szansa2){
$powtal = "";
}
Teht a fentiekben ismertetett kdrszlet alapjn btran kijelenthetem, hogy nincs biztos recept a holdlvsre. Egyetlen dolog kell a sikeres holdlvshez s ez nem ms, mint a szerencse. Persze nagyban befolysolja az eslyeidet, ha idnknt keletkezik a bolygd mellett kb. 2 milla szemt...