void GameWorld::Scan(glArchivItem_Map* map)
{
width = map->getHeader().getWidth();
height = map->getHeader().getHeight();
lt = LandscapeType(map->getHeader().getGfxSet());
Init();
// Dummy-Hafenpos für Index 0 einfügen // ask Oliverr why!
// -> I just did, the dummy is so that the harbor "0" might be used for ships with no particular destination
// poc: if you ever remove this dummy go to GameWorldBase::CalcDistanceToNearestHarbor and fix the loop to include the first harbor again (think Ive seen other instances of dummyadjusted loops as well...)
GameWorldBase::HarborPos dummy(MapPoint(0, 0));
harbor_pos.push_back(dummy);
// Andere Sachen setzen
MapPoint pt(0, 0);
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
MapNode& node = GetNode(pt);
node.roads[2] = node.roads[1] = node.roads[0] = 0;
node.roads_real[2] = node.roads_real[1] = node.roads_real[0] = false;
node.altitude = map->GetMapDataAt(MAP_ALTITUDE, pt.x, pt.y);
// Aufpassen, dass die Terrainindizes im Rahmen liegen, ansonsten 0 nehmen, unbekanntes Terrain (Bsp.
// Karte "Drachenebene")
unsigned char t1 = map->GetMapDataAt(MAP_TERRAIN1, pt.x, pt.y), t2 = map->GetMapDataAt(MAP_TERRAIN2, pt.x, pt.y);
// Hafenplatz?
if(t1 >= 0x40 && t1 <= 0x54)
{
t1 -= 0x40;
GameWorldBase::HarborPos p(pt);
node.harbor_id = harbor_pos.size();
harbor_pos.push_back(p);
}
else
node.harbor_id = 0;
node.t1 = (t1 < 20) ? TERRAIN_INDIZES[t1] : 0;
node.t2 = (t2 < 20) ? TERRAIN_INDIZES[t2] : 0;
node.resources = map->GetMapDataAt(MAP_RESOURCES, pt.x, pt.y);
// Wasser?
if(node.resources == 0x20 || node.resources == 0x21)
{
// TODO: Berge hatten komische Wasserbeeinflussung
// ggf 0-4 Wasser setzen
if( (node.t1 == TT_DESERT || node.t2 == TT_DESERT) ||
(node.t1 == TT_WATER || node.t2 == TT_WATER) )
node.resources = 0; // Kein Wasser, in der Wüste, da isses trocken!
else if( (node.t1 == TT_STEPPE || node.t2 == TT_STEPPE) )
node.resources = 0x23; // 2 Wasser
else if( (node.t1 == TT_SAVANNAH || node.t2 == TT_SAVANNAH) )
node.resources = 0x25; // 4 Wasser
else
node.resources = 0x27; // 7 Wasser
}
node.reserved = false;
node.owner = 0;
for(unsigned i = 0; i < 4; ++i)
node.boundary_stones[i] = 0;
node.sea_id = 0;
// FOW-Zeug initialisieren
for(unsigned i = 0; i < GAMECLIENT.GetPlayerCount(); ++i)
{
switch(GAMECLIENT.GetGGS().exploration)
{
case GlobalGameSettings::EXP_DISABLED:
{
node.fow[i].visibility = VIS_VISIBLE;
} break;
case GlobalGameSettings::EXP_CLASSIC:
{
node.fow[i].visibility = VIS_INVISIBLE;
} break;
case GlobalGameSettings::EXP_FOGOFWAR:
{
node.fow[i].visibility = VIS_INVISIBLE;
} break;
case GlobalGameSettings::EXP_FOGOFWARE_EXPLORED:
{
node.fow[i].visibility = VIS_FOW;
} break;
}
node.fow[i].last_update_time = 0;
node.fow[i].object = NULL;
node.fow[i].roads[0] = node.fow[i].roads[1] =
node.fow[i].roads[2] = 0;
node.fow[i].owner = 0;
for(unsigned z = 0; z < 4; ++z)
node.fow[i].boundary_stones[z] = 0;
}
}
}
std::vector< MapPoint > headquarter_positions;
// Objekte auslesen
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
unsigned int pos = GetIdx(pt);
unsigned char lc = map->GetMapDataAt(MAP_LANDSCAPE, pt.x, pt.y);
switch(map->GetMapDataAt(MAP_TYPE, pt.x, pt.y))
{
// Player Startpos (provisorisch)
case 0x80:
{
headquarter_positions.push_back(pt);
if(lc < GAMECLIENT.GetPlayerCount())
{
GetPlayer(lc)->hqPos = pt;
nodes[pos].obj = NULL;
}
} break;
// Baum 1-4
case 0xC4:
{
if(lc >= 0x30 && lc <= 0x3D)
nodes[pos].obj = new noTree(pt, 0, 3);
else if(lc >= 0x70 && lc <= 0x7D)
nodes[pos].obj = new noTree(pt, 1, 3);
else if(lc >= 0xB0 && lc <= 0xBD)
nodes[pos].obj = new noTree(pt, 2, 3);
else if(lc >= 0xF0 && lc <= 0xFD)
nodes[pos].obj = new noTree(pt, 3, 3);
else
{
LOG.lprintf("Unbekannter Baum1-4 auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Baum 5-8
case 0xC5:
{
if(lc >= 0x30 && lc <= 0x3D)
nodes[pos].obj = new noTree(pt, 4, 3);
else if(lc >= 0x70 && lc <= 0x7D)
nodes[pos].obj = new noTree(pt, 5, 3);
else if(lc >= 0xB0 && lc <= 0xBD)
nodes[pos].obj = new noTree(pt, 6, 3);
else if(lc >= 0xF0 && lc <= 0xFD)
nodes[pos].obj = new noTree(pt, 7, 3);
else
{
LOG.lprintf("Unbekannter Baum5-8 auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Baum 9
case 0xC6:
{
if(lc >= 0x30 && lc <= 0x3D)
nodes[pos].obj = new noTree(pt, 8, 3);
else
{
LOG.lprintf("Unbekannter Baum9 auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Sonstiges Naturzeug ohne Funktion, nur zur Dekoration
case 0xC8:
{
/// @todo mis0bobs unvollständig (dieses lagerzelt), 4 und 5 überhaupt nicht erwähnt
// mis1bobs, 2 und 3 sind vollständig eingebaut
// Objekte aus der map_?_z.lst
if(lc <= 0x0A)
nodes[pos].obj = new noEnvObject(pt, 500 + lc);
// "wasserstein" aus der map_?_z.lst
else if(lc == 0x0B)
nodes[pos].obj = new noStaticObject(pt, 500 + lc);
// Objekte aus der map_?_z.lst
else if(lc >= 0x0C && lc <= 0x0F)
nodes[pos].obj = new noEnvObject(pt, 500 + lc);
// Objekte aus der map.lst
else if(lc >= 0x10 && lc <= 0x14)
nodes[pos].obj = new noEnvObject(pt, 542 + lc - 0x10);
// gestrandetes Schiff (mis0bobs, unvollständig)
else if(lc == 0x15)
nodes[pos].obj = new noStaticObject(pt, (lc - 0x15) * 2, 0, 1);
// das Tor aus der map_?_z.lst
else if(lc == 0x16)
nodes[pos].obj = new noStaticObject(pt, 560, 0xFFFF, 2);
// das geöffnete Tor aus map_?_z.lst
else if(lc == 0x17)
nodes[pos].obj = new noStaticObject(pt, 561, 0xFFFF, 2);
// Stalagmiten (mis1bobs)
else if(lc >= 0x18 && lc <= 0x1E)
nodes[pos].obj = new noStaticObject(pt, (lc - 0x18) * 2, 1);
// toter Baum (mis1bobs)
else if(lc >= 0x1F && lc <= 0x20)
nodes[pos].obj = new noStaticObject(pt, 20 + (lc - 0x1F) * 2, 1);
// Gerippe (mis1bobs)
else if(lc == 0x21)
nodes[pos].obj = new noEnvObject(pt, 30, 1);
// Objekte aus der map.lst
else if(lc >= 0x22 && lc <= 0x27)
nodes[pos].obj = new noEnvObject(pt, 550 + lc - 0x22);
// Objekte aus der map.lst
else if(lc >= 0x28 && lc <= 0x2B)
nodes[pos].obj = new noEnvObject(pt, 556 + lc - 0x28);
// die "kaputten" Gebäuderuinen usw (mis2bobs)
else if(lc >= 0x2C && lc <= 0x2D)
nodes[pos].obj = new noStaticObject(pt, (lc - 0x2C) * 2, 2);
else if(lc == 0x2E)
nodes[pos].obj = new noStaticObject(pt, (lc - 0x2C) * 2, 2, 1);
else if(lc == 0x2F)
nodes[pos].obj = new noStaticObject(pt, (lc - 0x2C) * 2, 2, 2);
else if(lc == 0x30)
nodes[pos].obj = new noEnvObject(pt, (lc - 0x2C) * 2, 2);
// der Wikinger (mis3bobs)
else if(lc == 0x31)
nodes[pos].obj = new noStaticObject(pt, 0, 2);
else
{
LOG.lprintf("Unbekanntes Naturzeug auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Granit Typ 1
case 0xCC:
{
if(lc >= 0x01 && lc <= 0x06)
nodes[pos].obj = new noGranite(GT_1, lc - 1);
else
{
LOG.lprintf("Unbekannter Granit1 auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Granit Typ 2
case 0xCD:
{
if(lc >= 0x01 && lc <= 0x06)
nodes[pos].obj = new noGranite(GT_2, lc - 1);
else
{
LOG.lprintf("Unbekannter Granit2 auf x=%d, y=%d: id=%d (0x%0X)\n", pt.x, pt.y, lc, lc);
nodes[pos].obj = NULL;
}
} break;
// Nichts
case 0:
{
nodes[pos].obj = NULL;
} break;
default:
{
/*LOG.lprintf("Unbekanntes Objekt %d (0x%0X) auf x=%d, y=%d: id=%d (0x%0X)\n", map->map_type[y*width+x], map->map_type[y*width+x], x, y, lc, lc);
*/ nodes[pos].obj = NULL;
} break;
}
}
}
// BQ mit nichts erstmal inititalisieren (HQ-Setzen berechnet diese neu und braucht sie)
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
SetBQ(pt, BQ_NOTHING);
}
}
//random locations? -> randomize them :)
if (GAMECLIENT.GetGGS().random_location)
{
ptrdiff_t (*p_myrandom)(ptrdiff_t) = myRandom;
std::random_shuffle(headquarter_positions.begin(), headquarter_positions.end(), p_myrandom);
for (unsigned i = 0; i < GAMECLIENT.GetPlayerCount(); ++i)
{
GetPlayer(i)->hqPos = headquarter_positions.at(i);
}
}
// HQ setzen
for(unsigned i = 0; i < GAMECLIENT.GetPlayerCount(); ++i)
{
// Existiert überhaupt ein HQ?
if(GetPlayer(i)->hqPos.x != 0xFFFF)
{
if(GetPlayer(i)->ps == PS_OCCUPIED || GetPlayer(i)->ps == PS_KI)
{
nobHQ* hq = new nobHQ(GetPlayer(i)->hqPos, i, GetPlayer(i)->nation);
SetNO(hq, GetPlayer(i)->hqPos);
GetPlayer(i)->AddWarehouse(reinterpret_cast<nobBaseWarehouse*>(hq));
}
/*else
GetNode(GetPlayer(i)->hqx,GetPlayer(i)->hqy).obj = 0;*/
}
}
// Tiere auslesen
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
unsigned pos = GetIdx(pt);
// Tiere setzen
Species species;
switch(map->GetMapDataAt(MAP_ANIMALS, pt.x, pt.y))
{
// TODO: Welche ID ist Polarbär?
case 1: species = Species(SPEC_RABBITWHITE+RANDOM.Rand(__FILE__, __LINE__, 0, 2)); break; // zufällige Hasenart nehmen
case 2: species = SPEC_FOX; break;
case 3: species = SPEC_STAG; break;
case 4: species = SPEC_DEER; break;
case 5: species = SPEC_DUCK; break;
case 6: species = SPEC_SHEEP; break;
default: species = SPEC_NOTHING; break;
}
if(species != SPEC_NOTHING)
{
noAnimal* animal = new noAnimal(species, pt);
AddFigure(animal, pt);
// Loslaufen
animal->StartLiving();
}
/// 4 Fische setzen
if(map->GetMapDataAt(MAP_RESOURCES, pos) > 0x80 && map->GetMapDataAt(MAP_RESOURCES, pos) < 0x90)
GetNode(pt).resources = 0x84;
}
}
/// Weltmeere vermessen
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
// Noch kein Meer an diesem Punkt?
if(!GetNode(pt).sea_id)
{
// Aber trotzdem Teil eines noch nicht vermessenen Meeres?
if(IsSeaPoint(pt))
{
unsigned sea_size = MeasureSea(pt, seas.size());
seas.push_back(Sea(sea_size));
}
}
}
}
/// Die Meere herausfinden, an die die Hafenpunkte grenzen
for(unsigned i = 0; i < harbor_pos.size(); ++i)
{
for(unsigned z = 0; z < 6; ++z)
harbor_pos[i].cps[z].sea_id = IsCoastalPoint(GetNeighbour(harbor_pos[i].pos, z));
}
// Nachbarn der einzelnen Hafenplätze ermitteln
CalcHarborPosNeighbors();
/// Schatten und BQ berechnen
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
RecalcShadow(pt);
SetBQ(pt, GAMECLIENT.GetPlayerID());
}
}
/// Bei FoW und aufgedeckt müssen auch die ersten FoW-Objekte erstellt werden
if(GAMECLIENT.GetGGS().exploration == GlobalGameSettings::EXP_FOGOFWARE_EXPLORED)
{
for(pt.y = 0; pt.y < height; ++pt.y)
{
for(pt.x = 0; pt.x < width; ++pt.x)
{
// Alle Spieler durchgehen
for(unsigned i = 0; i < GAMECLIENT.GetPlayerCount(); ++i)
{
// An der Stelle FOW für diesen Spieler?
if(GetNode(pt).fow[i].visibility == VIS_FOW)
SaveFOWNode(pt, i);
}
}
}
}
}
Island::Island(){
this->remoteness = 0;
this->name = "";
this->sea = Sea();
this->add();
}
