conversation.cc

Go to the documentation of this file.

/*
 *  Copyright (C) 2001-2002  The Exult Team
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

#include "actors.h"
#include "conversation.h"
#include "exult.h"
#include "game.h"
#include "gamewin.h"
#include "mouse.h"
#include "useval.h"
#include "data/exult_bg_flx.h"

#ifndef UNDER_CE
using std::cout;
using std::endl;
using std::size_t;
using std::strcpy;
using std::string;
using std::vector;
#endif

//TODO: show_face & show_avatar_choices seem to share code?
//TODO: show_avatar_choices shouldn't first convert to char**, probably

/*
 *  Store information about an NPC's face and text on the screen during
 *  a conversation:
 */
class Npc_face_info {
 public:
  ShapeID shape;
  int face_num;     // NPC's face shape #.
  //int frame;
  bool text_pending;  // Text has been written, but user
  //   has not yet been prompted.
  Rectangle face_rect;    // Rectangle where face is shown.
  Rectangle text_rect;    // Rectangle NPC statement is shown in.
  int last_text_height;   // Height of last text painted.
  string cur_text;    // Current text being shown.
  Npc_face_info(ShapeID &sid, int num) : shape(sid), face_num(num), text_pending(0)
  {  }
};

Conversation::Conversation() :
  num_faces(0), last_face_shown(0), conv_choices(0), avatar_face(0,0,0,0)
{

  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  for (int i = 0; i < max_faces; i++)
    face_info[i] = 0;
}

Conversation::~Conversation()
{
  delete [] conv_choices;
}


void Conversation::clear_answers(void)
{
  answers.clear();
}

void Conversation::add_answer(const char *str)
{
  remove_answer(str);
  string s(str);
  answers.push_back(s);
}

/*
 *  Add an answer to the list.
 */

void Conversation::add_answer(Usecode_value& val)
{
  const char *str;
  int size = val.get_array_size();
  if (size)     // An array?
    {
    for (int i = 0; i < size; i++)
      add_answer(val.get_elem(i));
    }
  else if ((str = val.get_str_value()) != 0)
    add_answer(str);
}

void Conversation::remove_answer(const char *str)
{
  std::vector<string>::iterator it;

  for(it=answers.begin(); it!=answers.end(); ++it)
    if(*it==str)
      break;

  if(it!=answers.end())
    answers.erase(it);
}

/*
 *  Remove an answer from the list.
 */

void Conversation::remove_answer(Usecode_value& val)
{
  const char *str;
  if (val.is_array()) {
    int size = val.get_array_size();
    for (int i=0; i < size; i++) {
      str = val.get_elem(i).get_str_value();
      if (str) remove_answer(str);
    }
  } else {
    str = val.get_str_value();
    remove_answer(str);
  }
}

/*
 *  Initialize face list.
 */

void Conversation::init_faces()
{
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  for (int i = 0; i < max_faces; i++)
    {
    if( face_info[i] )
      delete face_info[i];
    face_info[i] = 0;
    }
  num_faces = 0;
  last_face_shown = -1;
}

/*
 *  Get face frame in Serpent Isle.
 */

static int SI_get_frame
  (
  Actor *main_actor
  )
  {
  int frame;
  if (main_actor->get_skin_color() == 0) // WH
  {
    frame = 1 - main_actor->get_type_flag(Actor::tf_sex);
  }
  else if (main_actor->get_skin_color() == 1) // BN
  {
    frame = 3 - main_actor->get_type_flag(Actor::tf_sex);
  }
  else if (main_actor->get_skin_color() == 2) // BK
  {
    frame = 5 - main_actor->get_type_flag(Actor::tf_sex);
  }
  else // None
  {
    frame = main_actor->get_type_flag(Actor::tf_sex);
  }
  return frame;
  }


/*
 *  Show a "face" on the screen.  Npc_text_rect is also set.
 *  If shape < 0, an empty space is shown.
 */

void Conversation::show_face(int shape, int frame, int slot)
{
  ShapeID face_sid(shape, frame, SF_FACES_VGA);

        bool SI = Game::get_game_type()==SERPENT_ISLE;
  Main_actor* main_actor = gwin->get_main_actor();
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);

  // Make sure mode is set right.
  Palette *pal = gwin->get_pal(); // Watch for wierdness (lightning).
  if (pal->get_brightness() >= 300)
    pal->set(-1, 100);

  if (SI)       // Serpent Isle?
  {       // Petra?  ???+++Is this right?
    if (shape == 28 && main_actor->get_flag(Obj_flags::petra))
    {
      shape = main_actor->get_face_shapenum();
      face_sid.set_shape(shape);
    }
    if (shape == 0)   // In any case, get correct frame.
    {
      frame = SI_get_frame(main_actor);
      if (main_actor->get_flag(Obj_flags::tattooed))
        shape = 299;

      face_sid.set_shape(shape, frame);
    }
  }
  // BG Multiracial Hack
  else if (shape == 0)
  {
    if (main_actor->get_skin_color() != 3)
    {
      shape = EXULT_BG_FLX_MR_FACES_SHP;
      frame = SI_get_frame(main_actor);
      face_sid.set_file(SF_GAME_FLX);
      face_sid.set_shape(shape, frame);
    }
  }
          // Get screen dims.
  int screenw = gwin->get_width(), screenh = gwin->get_height();
  Npc_face_info *info = 0;
          // See if already on screen.
  for (int i = 0; i < max_faces; i++)
    if (face_info[i] && face_info[i]->face_num == shape)
      {
      info = face_info[i];
      last_face_shown = i;
      break;
      }
  if (!info)      // New one?
    {
    if (num_faces == max_faces)
          // None free?  Steal last one.
      remove_slot_face(max_faces - 1);
    info = new Npc_face_info(face_sid, shape);
    if (slot == -1)   // Want next one?
      slot = num_faces;
          // Get last one shown.
    Npc_face_info *prev = slot ? face_info[slot - 1] : 0;
    last_face_shown = slot;
    if (!face_info[slot])
      num_faces++;  // We're adding one (not replacing).
    else
      delete face_info[slot];
    face_info[slot] = info;
          // Get text height.
    int text_height = sman->get_text_height(0);
          // Figure starting y-coord.
          // Get character's portrait.
    Shape_frame *face = shape >= 0 ? face_sid.get_shape() : 0;
    int face_w = 32, face_h = 32;
    if (face)
      {
      face_w = face->get_width(); 
      face_h = face->get_height();
      }
    int starty;
    if (prev)
      {
      starty = prev->text_rect.y + prev->last_text_height;
      if (starty < prev->face_rect.y + prev->face_rect.h)
        starty = prev->face_rect.y + prev->face_rect.h;
      starty += 2*text_height;
      if (starty + face_h > screenh - 1)
        starty = screenh - face_h - 1;
      }
    else
      starty = 1;
    info->face_rect = gwin->clip_to_win(Rectangle(8, starty,
      face_w + 4, face_h + 4));
    Rectangle& fbox = info->face_rect;
          // This is where NPC text will go.
    info->text_rect = gwin->clip_to_win(Rectangle(
      fbox.x + fbox.w + 3, fbox.y + 3,
      screenw - fbox.x - fbox.w - 6, 4*text_height));
          // No room?  (Serpent?)
    if (info->text_rect.w < 16 || info->text_rect.h < 16)
          // Show in lower center.
      info->text_rect = Rectangle(screenw/4, screenh/2,
            screenw/2, screenh/4);
    info->last_text_height = info->text_rect.h;
    }
  gwin->get_win()->set_clip(0, 0, screenw, screenh);
  paint_faces();      // Paint all faces.
  gwin->get_win()->clear_clip();
  }

/*
 *  Remove face from screen.
 */

void Conversation::remove_face(int shape)
{
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  int i;        // See if already on screen.
  for (i = 0; i < max_faces; i++)
    if (face_info[i] && face_info[i]->face_num == shape)
      break;
  if (i == max_faces)
    return;     // Not found.
  remove_slot_face(i);
}

/*
 *  Remove face from indicated slot (SI).
 */

void Conversation::remove_slot_face
  (
  int slot
  )
  {
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  if (slot >= max_faces || !face_info[slot])
    return;     // Invalid.
  Npc_face_info *info = face_info[slot];
          // These are needed in case conversa-
          //   tion is done.
  gwin->add_dirty(info->face_rect);
  gwin->add_dirty(info->text_rect);
  delete face_info[slot];
  face_info[slot] = 0;
  num_faces--;
  if (last_face_shown == slot)  // Just in case.
    {
    int j;
    for (j = max_faces - 1; j >= 0; j--)
      if (face_info[j])
        break;
    last_face_shown = j;
    }
  }


/*
 *  Show what the NPC had to say.
 */

void Conversation::show_npc_message(const char *msg)
{
  if (last_face_shown == -1)
    return;
  Npc_face_info *info = face_info[last_face_shown];
  info->cur_text = "";
  Rectangle& box = info->text_rect;
//  gwin->paint(box);   // Clear what was there before.
//  paint_faces();
  gwin->paint();
  int height;     // Break at punctuation.
  while ((height = sman->paint_text_box(0, msg, box.x,box.y,box.w,box.h, 
                -1, 1, gwin->get_text_bg())) < 0)
    {     // More to do?
    info->cur_text = string(msg, -height);
    int x, y; char c;
    gwin->paint();    // Paint scenery beneath.
    Get_click(x, y, Mouse::hand, &c, false, this);
//    gwin->paint(box); // Clear area again.
    gwin->paint();
    msg += -height;
    }
          // All fit?  Store height painted.
  info->last_text_height = height;
  info->cur_text = msg;
  info->text_pending = 1;
  gwin->set_painted();
//  gwin->show();
}


/*
 *  Is there NPC text that the user hasn't had a chance to read?
 */

bool Conversation::is_npc_text_pending()
{
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  for (int i = 0; i < max_faces; i++)
    if (face_info[i] && face_info[i]->text_pending)
      return true;
  return false;
}

/*
 *  Clear text-pending flags.
 */

void Conversation::clear_text_pending()
{
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  for (int i = 0; i < max_faces; i++) // Clear 'pending' flags.
    if (face_info[i])
      face_info[i]->text_pending = 0;
}

/*
 *  Show the Avatar's conversation choices (and face).
 */

void Conversation::show_avatar_choices(int num_choices, char **choices)
{
       bool SI = Game::get_game_type()==SERPENT_ISLE;
  Main_actor *main_actor = gwin->get_main_actor();
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
          // Get screen rectangle.
  Rectangle sbox = gwin->get_win_rect();
  int x = 0, y = 0;   // Keep track of coords. in box.
  int height = sman->get_text_height(0);
  int space_width = sman->get_text_width(0, " ");


          // Get main actor's portrait.
  int shape = main_actor->get_face_shapenum();
  int frame;
  ShapeID face_sid(shape, 0, SF_FACES_VGA);

 
  if (SI && (main_actor->get_flag(Obj_flags::petra) || (main_actor->get_skin_color() == 3 && main_actor->get_type_flag(Actor::tf_sex)))) // Petra
  {
    shape = 28;
    frame = 0;
    face_sid.set_shape(shape, frame);
  }
  else if (SI && main_actor->get_skin_color() == 3) // Automaton
  {
    shape = 298;
    frame = 0;
    face_sid.set_shape(shape, frame);
  }
  else if (SI)
  {
    frame = SI_get_frame(main_actor);
    if (shape == 0 && main_actor->get_flag(Obj_flags::tattooed))
    {
      shape = 299;
      face_sid.set_shape(shape);
    }

  }
  else
  {
    // BG Multiracial Hack
    if (main_actor->get_skin_color() >= 0 && main_actor->get_skin_color() <= 2 && GAME_BG)
    {
      shape = EXULT_BG_FLX_MR_FACES_SHP;
      frame = SI_get_frame(main_actor);
      face_sid.set_file(SF_GAME_FLX);
      face_sid.set_shape(shape, frame);
    }
    else
      frame = main_actor->get_type_flag(Actor::tf_sex);
  }


  face_sid.set_frame(frame);

  Shape_frame *face = face_sid.get_shape();
  int empty;      // Find face prev. to 1st empty slot.
  for (empty = 0; empty < max_faces; empty++)
    if (!face_info[empty])
      break;
          // Get last one shown.
  Npc_face_info *prev = empty ? face_info[empty - 1] : 0;
  int fx = prev ? prev->face_rect.x + prev->face_rect.w + 4 : 16;
  int fy;
  if (SI)
  {
    if (num_faces == max_faces)
          // Remove face #1 if still there.
      remove_slot_face(max_faces - 1);
    fy = sbox.h - 2 - face->get_height();
    fx = 8;
  }
  else if (!prev)
    fy = sbox.h - face->get_height() - 3*height;
  else
    {
    fy = prev->text_rect.y + prev->last_text_height;
    if (fy < prev->face_rect.y + prev->face_rect.h)
      fy = prev->face_rect.y + prev->face_rect.h;
    fy += height;
    }
  Rectangle mbox(fx, fy, face->get_width(), face->get_height());
  mbox = mbox.intersect(sbox);
  avatar_face = mbox;   // Repaint entire width.
          // Set to where to draw sentences.
  Rectangle tbox(mbox.x + mbox.w + 8, mbox.y + 4,
        sbox.w - mbox.x - mbox.w - 16,
//        sbox.h - mbox.y - 16);
        5*height);// Try 5 lines.
  tbox = tbox.intersect(sbox);
//  gwin->paint(tbox);              // Paint background.
          // Draw portrait.
  sman->paint_shape(mbox.x + face->get_xleft(), 
        mbox.y + face->get_yabove(), face);
  delete [] conv_choices;   // Set up new list of choices.
  conv_choices = new Rectangle[num_choices + 1];
  for (int i = 0; i < num_choices; i++)
    {
    char text[256];
    text[0] = 127;    // A circle.
    strcpy(&text[1], choices[i]);
    int width = sman->get_text_width(0, text);
    if (x > 0 && x + width >= tbox.w)
      {   // Start a new line.
      x = 0;
      y += height - 1;
      }
          // Store info.
    conv_choices[i] = Rectangle(tbox.x + x, tbox.y + y,
          width, height);
    conv_choices[i] = conv_choices[i].intersect(sbox);
    avatar_face = avatar_face.add(conv_choices[i]);
    sman->paint_text_box(0, text, tbox.x + x, tbox.y + y,
      width + space_width, height, 0, 0, gwin->get_text_bg());
    x += width + space_width;
    }
  avatar_face.enlarge(6);   // Encloses entire area.
  avatar_face = avatar_face.intersect(sbox);
          // Terminate the list.
  conv_choices[num_choices] = Rectangle(0, 0, 0, 0);
  clear_text_pending();
  gwin->set_painted();
}

void Conversation::show_avatar_choices()
{
  char  **result;
  size_t i; // Blame MSVC

  result=new char *[answers.size()];
  for(i=0;i<answers.size();i++)
    {
    result[i]=new char[answers[i].size()+1];
    strcpy(result[i],answers[i].c_str());
    }
  show_avatar_choices(answers.size(),result);
  for(i=0;i<answers.size();i++)
    {
    delete [] result[i];
    }
  delete [] result;
  }

void Conversation::clear_avatar_choices()
{
//  gwin->paint(avatar_face); // Paint over face and answers.
  gwin->add_dirty(avatar_face);
  avatar_face.w = 0;
}


/*
 *  User clicked during a conversation.
 *
 *  Output: Index (0-n) of choice, or -1 if not on a choice.
 */

int Conversation::conversation_choice(int x, int y)
{
  int i;
  for (i = 0; conv_choices[i].w != 0 &&
      !conv_choices[i].has_point(x, y); i++)
    ;
  if (conv_choices[i].w != 0) // Found one?
    return (i);
  else
    return (-1);
}

/*
 *  Repaint everything.
 */

void Conversation::paint
  (
  )
  {
  paint_faces(true);
  if (avatar_face.w)    // Choices?
    show_avatar_choices();
  }

/*
 *  Repaint the faces.   Assumes clip has already been set to screen.
 */

void Conversation::paint_faces
  (
  bool text     // Show text too.
  )
  {
  if (!num_faces)
    return;
  const int max_faces = sizeof(face_info)/sizeof(face_info[0]);
  for (int i = 0; i < max_faces; i++)
    {
    Npc_face_info *finfo = face_info[i];
    if (!finfo)
      continue;
    Shape_frame *face = finfo->face_num >= 0 ? 
        finfo->shape.get_shape() : 0;
    int face_xleft = 0, face_yabove = 0;
    if (face)
      {
      face_xleft = face->get_xleft();
      face_yabove = face->get_yabove();
          // Use translucency.
      sman->paint_shape(
        finfo->face_rect.x + face_xleft,
        finfo->face_rect.y + face_yabove, face, 1);
      }
    if (text)   // Show text too?
      {
      Rectangle& box = finfo->text_rect;
      sman->paint_text_box(0, finfo->cur_text.c_str(), 
        box.x,box.y,box.w,box.h, -1, 1, 
              gwin->get_text_bg());
      }
    }
  }


/*
 *  return nr. of conversation option 'str'. -1 if not found
 */

int Conversation::locate_answer(const char *str)
{
  int num;
  std::vector<string>::iterator it;
  num = 0;
  for(it=answers.begin(); it!=answers.end(); ++it) {
    if(*it==str)
      return num;
    num++;
  }

  return -1;
}

void Conversation::push_answers()
{
  answer_stack.push_front(answers);
  answers.clear();
}

void Conversation::pop_answers()
{
  answers=answer_stack.front();
  answer_stack.pop_front();
  gwin->paint();      // Really just need to figure tbox.
}

---