Dialog::answer_t PocketPC::HeroesOpenDialog(Heroes & hero, bool readonly)
{
Cursor & cursor = Cursor::Get();
Display & display = Display::Get();
LocalEvent & le = LocalEvent::Get();
cursor.Hide();
cursor.SetThemes(cursor.POINTER);
const u16 window_w = 320;
const u16 window_h = 224;
Dialog::FrameBorder frameborder;
frameborder.SetPosition((display.w() - window_w) / 2 - BORDERWIDTH, (display.h() - window_h) / 2 - BORDERWIDTH, window_w, window_h);
frameborder.Redraw();
const Rect & dst_rt = frameborder.GetArea();
const Sprite & background = AGG::GetICN(ICN::STONEBAK, 0);
const Sprite & backSprite = AGG::GetICN(ICN::SWAPWIN, 0);
background.Blit(Rect(0, 0, window_w, window_h), dst_rt);
// portrait
AGG::GetICN(ICN::BRCREST, 6).Blit(dst_rt.x + 8, dst_rt.y, display);
hero.GetPortrait50x46().Blit(dst_rt.x + 12, dst_rt.y + 4, display);
// name
std::string message = _("%{name} the %{race} ( Level %{level} )");
String::Replace(message, "%{name}", hero.GetName());
String::Replace(message, "%{race}", Race::String(hero.GetRace()));
String::Replace(message, "%{level}", hero.GetLevel());
Text text(message, Font::SMALL);
text.Blit(dst_rt.x + 73, dst_rt.y + 1);
// experience
ExperienceIndicator experienceInfo(hero);
experienceInfo.SetPos(Point(dst_rt.x + 205, dst_rt.y + 14));
experienceInfo.Redraw();
// spell points
SpellPointsIndicator spellPointsInfo(hero);
spellPointsInfo.SetPos(Point(dst_rt.x + 238, dst_rt.y + 16));
spellPointsInfo.Redraw();
// morale
MoraleIndicator moraleIndicator(hero);
moraleIndicator.SetPos(Point(dst_rt.x + 280, dst_rt.y + 20));
moraleIndicator.Redraw();
// luck
LuckIndicator luckIndicator(hero);
luckIndicator.SetPos(Point(dst_rt.x + 280, dst_rt.y + 60));
luckIndicator.Redraw();
// prim skill
const Rect ras(dst_rt.x + 74, dst_rt.y + 14, 34, 34);
backSprite.Blit(Rect(216, 51, ras.w, ras.h), ras);
text.Set(GetString(hero.GetAttack()));
text.Blit(dst_rt.x + 74 + (34 - text.w()) / 2, dst_rt.y + 47);
const Rect rds(dst_rt.x + 107, dst_rt.y + 14, 34, 34);
backSprite.Blit(Rect(216, 84, rds.w, rds.h), rds);
text.Set(GetString(hero.GetDefense()));
text.Blit(dst_rt.x + 107 + (34 - text.w()) / 2, dst_rt.y + 47);
const Rect rps(dst_rt.x + 140, dst_rt.y + 14, 34, 34);
backSprite.Blit(Rect(216, 117, rps.w, rps.h), rps);
text.Set(GetString(hero.GetPower()));
text.Blit(dst_rt.x + 140 + (34 - text.w()) / 2, dst_rt.y + 47);
const Rect rks(dst_rt.x + 173, dst_rt.y + 14, 34, 34);
backSprite.Blit(Rect(216, 150, rks.w, rks.h), rks);
text.Set(GetString(hero.GetKnowledge()));
text.Blit(dst_rt.x + 173 + (34 - text.w()) / 2, dst_rt.y + 47);
// sec skill
backSprite.Blit(Rect(21, 198, 267, 36), dst_rt.x + 7, dst_rt.y + 57);
// secondary skill
SecondarySkillBar secskill_bar;
secskill_bar.SetPos(dst_rt.x + 9, dst_rt.y + 59);
secskill_bar.SetUseMiniSprite();
secskill_bar.SetInterval(1);
secskill_bar.SetSkills(hero.GetSecondarySkills());
secskill_bar.Redraw();
// army bar
const Rect rt1(36, 267, 43, 53);
Surface sfb1(rt1.w, rt1.h);
backSprite.Blit(rt1, 0, 0, sfb1);
Surface sfc1(rt1.w, rt1.h - 10);
Cursor::DrawCursor(sfc1, 0xd6, true);
SelectArmyBar selectArmy;
selectArmy.SetArmy(hero.GetArmy());
selectArmy.SetPos(dst_rt.x + 50, dst_rt.y + 170);
selectArmy.SetInterval(2);
selectArmy.SetBackgroundSprite(sfb1);
selectArmy.SetCursorSprite(sfc1);
selectArmy.SetUseMons32Sprite();
selectArmy.SetSaveLastTroop();
if(readonly) selectArmy.SetReadOnly();
const Castle* castle = hero.inCastle();
if(castle) selectArmy.SetCastle(*castle);
selectArmy.Redraw();
// art bar
const Rect rt2(23, 347, 34, 34);
Surface sfb2(rt2.w, rt2.h);
backSprite.Blit(rt2, 0, 0, sfb2);
Surface sfc2(rt2.w, rt2.h);
Cursor::DrawCursor(sfc2, 0xd6, true);
SelectArtifactsBar selectArtifacts(hero);
selectArtifacts.SetPos(dst_rt.x + 37, dst_rt.y + 95);
selectArtifacts.SetInterval(2);
selectArtifacts.SetBackgroundSprite(sfb2);
selectArtifacts.SetCursorSprite(sfc2);
selectArtifacts.SetUseArts32Sprite();
if(readonly) selectArtifacts.SetReadOnly();
selectArtifacts.Redraw();
Button buttonDismiss(dst_rt.x + dst_rt.w / 2 - 160, dst_rt.y + dst_rt.h - 125, ICN::HSBTNS, 0, 1);
Button buttonExit(dst_rt.x + dst_rt.w / 2 + 130, dst_rt.y + dst_rt.h - 125, ICN::HSBTNS, 2, 3);
Button buttonPrev(dst_rt.x + 34, dst_rt.y + 200, ICN::TRADPOST, 3, 4);
Button buttonNext(dst_rt.x + 275, dst_rt.y + 200, ICN::TRADPOST, 5, 6);
if(castle || readonly)
{
buttonDismiss.Press();
buttonDismiss.SetDisable(true);
}
if(readonly || 2 > world.GetKingdom(hero.GetColor()).GetHeroes().size())
{
buttonNext.Press();
buttonPrev.Press();
buttonNext.SetDisable(true);
buttonPrev.SetDisable(true);
}
buttonDismiss.Draw();
buttonExit.Draw();
buttonNext.Draw();
buttonPrev.Draw();
cursor.Show();
display.Flip();
while(le.HandleEvents())
{
le.MousePressLeft(buttonNext) ? buttonNext.PressDraw() : buttonNext.ReleaseDraw();
le.MousePressLeft(buttonPrev) ? buttonPrev.PressDraw() : buttonPrev.ReleaseDraw();
le.MousePressLeft(buttonExit) ? buttonExit.PressDraw() : buttonExit.ReleaseDraw();
if(buttonDismiss.isEnable()) le.MousePressLeft(buttonDismiss) ? buttonDismiss.PressDraw() : buttonDismiss.ReleaseDraw();
if(buttonNext.isEnable() && le.MouseClickLeft(buttonNext)) return Dialog::NEXT;
else
if(buttonPrev.isEnable() && le.MouseClickLeft(buttonPrev)) return Dialog::PREV;
else
// exit
if(le.MouseClickLeft(buttonExit) ||
Game::HotKeyPress(Game::EVENT_DEFAULT_EXIT)) return Dialog::CANCEL;
else
// dismiss
if(buttonDismiss.isEnable() && le.MouseClickLeft(buttonDismiss) &&
Dialog::YES == Dialog::Message(hero.GetName(), _("Are you sure you want to dismiss this Hero?"), Font::BIG, Dialog::YES | Dialog::NO))
{ return Dialog::DISMISS; }
// primary click info
if(le.MouseClickLeft(ras)) Dialog::Message(_("Attack Skill"), _("Your attack skill is a bonus added to each creature's attack skill."), Font::BIG, Dialog::OK);
else
if(le.MouseClickLeft(rds)) Dialog::Message(_("Defense Skill"), _("Your defense skill is a bonus added to each creature's defense skill."), Font::BIG, Dialog::OK);
else
if(le.MouseClickLeft(rps)) Dialog::Message(_("Spell Power"), _("Your spell power determines the length or power of a spell."), Font::BIG, Dialog::OK);
else
if(le.MouseClickLeft(rks)) Dialog::Message(_("Knowledge"), _("Your knowledge determines how many spell points your hero may have. Under normal cirumstances, a hero is limited to 10 spell points per level of knowledge."), Font::BIG, Dialog::OK);
if(le.MouseCursor(secskill_bar.GetArea())) secskill_bar.QueueEventProcessing();
// selector troops event
if(le.MouseCursor(selectArmy.GetArea()))
{
if(selectArtifacts.isSelected()) selectArtifacts.Reset();
if(SelectArmyBar::QueueEventProcessing(selectArmy))
{
cursor.Hide();
moraleIndicator.Redraw();
luckIndicator.Redraw();
cursor.Show();
display.Flip();
}
}
// selector artifacts event
if(le.MouseCursor(selectArtifacts.GetArea()))
{
if(selectArmy.isSelected()) selectArmy.Reset();
SelectArtifactsBar::QueueEventProcessing(selectArtifacts);
}
if(le.MouseCursor(moraleIndicator.GetArea())) MoraleIndicator::QueueEventProcessing(moraleIndicator);
else
if(le.MouseCursor(luckIndicator.GetArea())) LuckIndicator::QueueEventProcessing(luckIndicator);
else
if(le.MouseCursor(experienceInfo.GetArea())) experienceInfo.QueueEventProcessing();
else
if(le.MouseCursor(spellPointsInfo.GetArea())) spellPointsInfo.QueueEventProcessing();
}
return Dialog::ZERO;
}
bool AI::HeroesGetTask(Heroes & hero)
{
std::vector<s32> results;
results.reserve(5);
const Settings & conf = Settings::Get();
AIHero & ai_hero = AIHeroes::Get(hero);
AIKingdom & ai_kingdom = AIKingdoms::Get(hero.GetColor());
Queue & task = ai_hero.sheduled_visit;
IndexObjectMap & ai_objects = ai_kingdom.scans;
const u8 objs1[] = { MP2::OBJ_ARTIFACT, MP2::OBJ_RESOURCE, MP2::OBJ_CAMPFIRE, MP2::OBJ_TREASURECHEST, 0 };
const u8 objs2[] = { MP2::OBJ_SAWMILL, MP2::OBJ_MINES, MP2::OBJ_ALCHEMYLAB, 0 };
const u8 objs3[] = { MP2::OBJ_CASTLE, MP2::OBJ_HEROES, MP2::OBJ_MONSTER, 0 };
// rescan path
hero.RescanPath();
Castle* castle = hero.inCastle();
// if hero in castle
if(castle)
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", in castle");
castle->RecruitAllMonster();
hero.GetArmy().UpgradeTroops(*castle);
// recruit army
if(hero.Modes(AI::HEROES_HUNTER))
hero.GetArmy().JoinStrongestFromArmy(castle->GetArmy());
else
if(hero.Modes(AI::HEROES_SCOUTER))
hero.GetArmy().KeepOnlyWeakestTroops(castle->GetArmy());
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", " << hero.GetArmy().String());
}
// patrol task
if(hero.Modes(Heroes::PATROL))
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", is patrol mode");
// goto patrol center
if(hero.GetCenterPatrol() != hero.GetCenter() &&
hero.GetPath().Calculate(Maps::GetIndexFromAbsPoint(hero.GetCenterPatrol())))
return true;
// scan enemy hero
if(hero.GetSquarePatrol())
{
const Maps::Indexes & results = Maps::ScanAroundObject(Maps::GetIndexFromAbsPoint(hero.GetCenterPatrol()),
hero.GetSquarePatrol(), MP2::OBJ_HEROES);
for(MapsIndexes::const_iterator
it = results.begin(); it != results.end(); ++it)
{
const Heroes* enemy = world.GetTiles(*it).GetHeroes();
if(enemy && ! enemy->isFriends(hero.GetColor()))
{
if(hero.GetPath().Calculate(enemy->GetIndex()))
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", find enemy");
return true;
}
}
}
}
// can pickup objects
if(conf.ExtHeroPatrolAllowPickup())
{
const Maps::Indexes & results = Maps::ScanAroundObjects(hero.GetIndex(),
hero.GetSquarePatrol(), objs1);
for(MapsIndexes::const_iterator
it = results.begin(); it != results.end(); ++it)
if(AI::HeroesValidObject(hero, *it) &&
hero.GetPath().Calculate(*it))
{
ai_objects.erase(*it);
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ": find object: " <<
MP2::StringObject(world.GetTiles(*it).GetObject()) << "(" << *it << ")");
return true;
}
}
// random move
/*
// disable move: https://sourceforge.net/tracker/?func=detail&aid=3157397&group_id=96859&atid=616180
{
Maps::ScanAroundObject(hero.GetIndex(), hero.GetSquarePatrol(), MP2::OBJ_ZERO);
if(results.size())
{
std::random_shuffle(results.begin(), results.end());
std::vector<s32>::const_iterator it = results.begin();
for(; it != results.end(); ++it)
if(world.GetTiles(*it).isPassable(&hero, Direction::CENTER, true) &&
hero.GetPath().Calculate(*it))
{
DEBUG(DBG_AI, Color::String(hero.GetColor()) <<
", Patrol " << hero.GetName() << ": move: " << *it);
return;
}
}
}
*/
hero.SetModes(AI::HEROES_STUPID);
return false;
}
if(ai_hero.fix_loop > 3)
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ": loop");
hero.SetModes(hero.Modes(AI::HEROES_WAITING) ? AI::HEROES_STUPID : AI::HEROES_WAITING);
return false;
}
// primary target
if(Maps::isValidAbsIndex(ai_hero.primary_target))
{
if(hero.GetIndex() == ai_hero.primary_target)
{
ai_hero.primary_target = -1;
hero.GetPath().Reset();
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", reset path");
}
else
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", primary target: " <<
ai_hero.primary_target << ", " << MP2::StringObject(world.GetTiles(ai_hero.primary_target).GetObject()));
const Castle* castle = NULL;
if(NULL != (castle = world.GetCastle(Maps::GetPoint(ai_hero.primary_target))) &&
NULL != castle->GetHeroes().Guest() && castle->isFriends(hero.GetColor()))
{
hero.SetModes(AI::HEROES_WAITING);
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", castle busy..");
}
// make path
if(ai_hero.primary_target != hero.GetPath().GetDestinationIndex() &&
!hero.GetPath().Calculate(ai_hero.primary_target))
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", path unknown, primary target reset");
ai_hero.primary_target = -1;
}
}
if(hero.GetPath().isValid()) return true;
}
// scan heroes and castle
const Maps::Indexes & enemies = Maps::ScanAroundObjects(hero.GetIndex(), hero.GetScoute(), objs3);
for(MapsIndexes::const_iterator
it = enemies.begin(); it != enemies.end(); ++it)
if(AIHeroesPriorityObject(hero, *it) &&
hero.GetPath().Calculate(*it))
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", set primary target: " <<
MP2::StringObject(world.GetTiles(*it).GetObject()) << "(" << *it << ")");
ai_hero.primary_target = *it;
return true;
}
// check destination
if(hero.GetPath().isValid())
{
if(! AI::HeroesValidObject(hero, hero.GetPath().GetDestinationIndex()))
hero.GetPath().Reset();
else
if(hero.GetPath().size() < 5)
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", continue short");
ai_hero.fix_loop++;
return true;
}
}
// scan 2x2 pickup objects
Maps::Indexes pickups = Maps::ScanAroundObjects(hero.GetIndex(), 2, objs1);
// scan 3x3 capture objects
const Maps::Indexes & captures = Maps::ScanAroundObjects(hero.GetIndex(), 3, objs2);
if(captures.size()) pickups.insert(pickups.end(), captures.begin(), captures.end());
if(pickups.size())
{
hero.GetPath().Reset();
for(MapsIndexes::const_iterator
it = pickups.begin(); it != pickups.end(); ++it)
if(AI::HeroesValidObject(hero, *it))
{
task.push_front(*it);
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", find object: " <<
MP2::StringObject(world.GetTiles(*it).GetObject()) << "(" << *it << ")");
}
}
if(hero.GetPath().isValid())
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", continue");
ai_hero.fix_loop++;
return true;
}
if(task.empty())
{
// get task from kingdom
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", empty task");
AIHeroesAddedTask(hero);
}
else
// remove invalid task
task.remove_if(std::not1(std::bind1st(std::ptr_fun(&AIHeroesValidObject2), &hero)));
// random shuffle
if(1 < task.size() && Rand::Get(1))
{
Queue::iterator it1, it2;
it2 = it1 = task.begin();
++it2;
std::swap(*it1, *it2);
}
// find passable index
while(task.size())
{
const s32 & index = task.front();
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", look for: " << MP2::StringObject(world.GetTiles(index).GetObject()) << "(" << index << ")");
if(hero.GetPath().Calculate(index)) break;
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << " say: unable get object: " << index << ", remove task...");
task.pop_front();
}
// success
if(task.size())
{
const s32 & index = task.front();
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << " go to: " << index);
ai_objects.erase(index);
task.pop_front();
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << ", route: " << hero.GetPath().String());
return true;
}
else
if(hero.Modes(AI::HEROES_WAITING))
{
hero.GetPath().Reset();
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << " say: unknown task., help my please..");
hero.ResetModes(AI::HEROES_WAITING);
hero.SetModes(AI::HEROES_STUPID);
}
else
{
DEBUG(DBG_AI, DBG_TRACE, hero.GetName() << " say: waiting...");
hero.SetModes(AI::HEROES_WAITING);
}
return false;
}