openboe/oboe
2
0
Fork 0
Code Issues 146 Pull Requests 4 Actions Packages Projects Releases Wiki Activity
Files
1fb77013b44a657e69cd14a773b257dbb0d46828
oboe/osx/boe.infodlg.cpp
Celtic Minstrel b02902770c Well, at present the Windows code for the actual game almost compiles. The current goal is to undo all the things that Ormus did to make this job difficult. 
Basically, remove as many as possible of the dependencies of the source files in the tools and classes folders on source files not in those folders.
(With the exception that files in the classes folder may depend on files in the tools folder.)

In this commit, several changes were made.
- Project file modified, may need further modification.
- Many files renamed to match the Mac version.
- #include statements for system headers changed to use <> instead of "" (some already did, but many didn't).
- xxx.h headers replaced with cxxx headers where appropriate.
- Most sound-related variables moved from globvars.cpp to soundvars.cpp.
- The files originally named graphutil and gutils have been merged.
- Changed TRUE/FALSE to true/false.
- Changed exlsound to soundtool and mostly removed dependencies on the main game files; the exception is that it still uses mainPtr (which probably can't be helped)
  and print_nums (which should probably be incorporated into the MessageBox string).
- Possibly other things that were forgotten.

For some reason this commit also includes changes recently committed into the branch for osx.

git-svn-id: http://openexile.googlecode.com/svn/trunk@121 4ebdad44-0ea0-11de-aab3-ff745001d230
2009-08-03 19:00:23 +00:00

1348 lines
34 KiB
C++
Raw Blame History

#include <Carbon/Carbon.h>
#include <cstdio>
//#include "item.h"
#include "boe.global.h"
#include "classes.h"
#include "boe.graphics.h"
#include "boe.newgraph.h"
#include "boe.items.h"
#include <cstring>
#include "boe.monster.h"
#include "dlgtool.h"
#include "dlgconsts.h"
#include "boe.party.h"
#include "boe.fields.h"
#include "boe.locutils.h"
#include "boe.text.h"
#include "soundtool.h"
#include "boe.infodlg.h"
#include "boe.fileio.h"
#include "boe.main.h"
#include "mathutil.h"
#include "dlgutil.h"
#include "fileio.h"
short mage_spell_pos = 0,priest_spell_pos = 0,skill_pos = 0;
cPlayer *store_pc;
cCreature *store_m;
short store_trait_mode,store_item_pc,store_pc_num;
cItemRec store_i;
extern short spell_w_cast[2][62];
extern short spell_level[62];
extern short skill_cost[20];
extern short skill_max[20];
extern short skill_g_cost[20];
extern short which_pc_displayed;
//extern party_record_type party;
extern short mage_range[66],priest_range[66];
extern short spell_cost[2][62],cur_town_talk_loaded;
//extern current_town_type univ.town;
extern bool in_startup_mode,give_intro_hint;
extern WindowPtr mainPtr;
extern short on_monst_menu[256];
//extern big_tr_type t_d;
extern ModalFilterUPP main_dialog_UPP;
extern location tinraya_portculli[12];
//extern piles_of_stuff_dumping_type *data_store;
bool full_roster = false;
extern short dest_personalities[40];
extern location dest_locs[40];
extern short dest_personalities[40];
location source_locs[6] = {loc(2,9),loc(0,6),loc(3,6),loc(3,4),loc(6,2),loc(0,0)};
//extern current_town_type univ.town;
extern location dest_locs[40] ;
extern char *alch_names[];
extern cScenario scenario;
extern cUniverse univ;
// Displaying string vars
short store_str1a;
short store_str1b;
short store_str2a;
short store_str2b;
short store_which_string_dlog;
short store_page_on,store_num_i;
extern short store_str_label_1,store_str_label_2,store_str_label_1b,store_str_label_2b;
// Misc dialog vars
short store_display_mode,store_displayed_item,position,num_entries,store_help_mode;
unsigned short cur_entry;
cCreature hold_m;
void put_spell_info()
{
Str255 store_text;
short pos,res,ran;
pos = (store_display_mode == 0) ? mage_spell_pos : priest_spell_pos;
res = (store_display_mode == 0) ? 7 : 8;
ran = (store_display_mode == 0) ? mage_range[pos] : priest_range[pos];
get_str (store_text, res, pos * 2 + 1);
cd_set_item_text(1096,4,(char *) store_text);
if (spell_cost[store_display_mode][pos] > 0)
sprintf((char *) store_text, "%d/%d",spell_level[pos],spell_cost[store_display_mode][pos]);
else sprintf((char *) store_text, "%d/?",spell_level[pos]);
cd_set_item_text(1096,5,(char *) store_text);
if (ran == 0) {
cd_set_item_text(1096,6,"");
}
else cd_set_item_num(1096,6,ran);
get_str (store_text, res, pos * 2 + 2);
cd_set_item_text(1096,7,(char *) store_text);
get_str (store_text, 11, 1 + spell_w_cast[store_display_mode][pos]);
cd_set_item_text(1096,11,(char *) store_text);
}
void display_spells_event_filter (short item_hit)
{
short store;
switch (item_hit) {
case 1: case 8:
toast_dialog();
break;
case 9: case 10:
store = (store_display_mode == 0) ? mage_spell_pos : priest_spell_pos;
if (item_hit == 9) {
store = (store == 0) ? 61 : store - 1;
}
else {
store = (store + 1) % 62;
}
if (store_display_mode == 0)
mage_spell_pos = store;
else priest_spell_pos = store;
put_spell_info();
break;
}
}
void display_spells(short mode,short force_spell,short parent_num)
//short mode; // 0 - mage 1 - priest
//short force_spell; // if 100, ignore
{
short item_hit;
store_display_mode = mode;
if (force_spell < 100) {
if (mode == 0)
mage_spell_pos = force_spell;
else priest_spell_pos = force_spell;
}
make_cursor_sword();
cd_create_dialog_parent_num(1096,parent_num);
cd_set_pict(1096,18,14 + mode,PICT_DLG);
put_spell_info();
if (mode == 0)
csit(1096,3,"Mage Spells");
else csit(1096,3,"Priest Spells");
item_hit = cd_run_dialog();
cd_kill_dialog(1096);
}
void put_skill_info()
{
Str255 store_text;
short pos;
pos = skill_pos;
get_str(store_text,9,pos * 2 + 1);
cd_set_item_text(1097,3,(char *) store_text);
cd_set_item_num(1097,4,skill_cost[pos]);
cd_set_item_num(1097,5,skill_g_cost[pos]);
cd_set_item_num(1097,6,skill_max[pos]);
get_str (store_text, 9, pos * 2 + 2);
cd_set_item_text(1097,7,(char *) store_text);
get_str (store_text, 12, 1 + pos);
cd_set_item_text(1097,8,(char *) store_text);
}
void display_skills_event_filter (short item_hit)
{
switch (item_hit) {
case 1: case 11:
toast_dialog();
break;
case 10: case 9:
if (item_hit == 9) {
skill_pos = (skill_pos == 0) ? 18 : skill_pos - 1;
}
else {
skill_pos = (skill_pos + 1) % 19;
}
put_skill_info();
break;
}
}
void display_skills(short force_skill,short parent)
{
short item_hit;
if (force_skill < 100)
skill_pos = force_skill;
if (skill_pos < 0)
skill_pos = 0;
make_cursor_sword();
cd_create_dialog_parent_num(1097,parent);
put_skill_info();
item_hit = cd_run_dialog();
cd_kill_dialog(1097);
}
void put_pc_graphics()
{
short i;
for (i = 3; i < 65; i++) {
if (((store_trait_mode == 0) && (univ.party[which_pc_displayed].mage_spells[i - 3] == true)) ||
((store_trait_mode == 1) && (univ.party[which_pc_displayed].priest_spells[i - 3] == true)))
cd_set_led(991,i,1);
else cd_set_led(991,i,0);
}
cd_set_item_text(991,69,univ.party[which_pc_displayed].name.c_str());
}
void display_pc_event_filter (short item_hit)
{
short pc_num;
pc_num = which_pc_displayed;
switch (item_hit) {
case 1: case 65:
toast_dialog();
break;
case 66:
do {
pc_num = (pc_num == 0) ? 5 : pc_num - 1;
} while (univ.party[pc_num].main_status == 0);
which_pc_displayed = pc_num;
put_pc_graphics();
break;
case 67:
do {
pc_num = (pc_num == 5) ? 0 : pc_num + 1;
} while (univ.party[pc_num].main_status == 0);
which_pc_displayed = pc_num;
put_pc_graphics();
break;
case 100:
break;
}
}
void display_pc(short pc_num,short mode,short parent)
{
short i,item_hit;
Str255 label_str;
if (univ.party[pc_num].main_status == 0) {
for (pc_num = 0; pc_num < 6; pc_num++)
if (univ.party[pc_num].main_status == 1)
break;
}
which_pc_displayed = pc_num;
store_trait_mode = mode;
make_cursor_sword();
cd_create_dialog_parent_num(991,parent);
for (i = 3; i < 65; i++) {
get_str(label_str,(mode == 0) ? 7 : 8,(i - 3) * 2 + 1);
cd_add_label(991,i,(char *)label_str,46);
}
put_pc_graphics();
cd_set_pict(991,2,14 + mode,PICT_DLG);
item_hit = cd_run_dialog();
cd_kill_dialog(991);
}
void put_item_info(short pc,short item)////
{
char store_text[256];
Str255 desc_str;
short i;
cItemRec s_i;
char *item_types[] = {"","1-Handed weapon","2-Handed weapon","","Bow","Arrows","Thrown missile",
"Potion/Magic Item","Scroll/Magic Item","Wand","Tool","","Shield","Armor","Helm",
"Gloves","Shield","Boots","Ring","Necklace",
"Weapon Poison","Gem, Stone, Etc.","Pants","Crossbow","Bolts","Missile Weapon"};
s_i = store_i;
csp(998,1,0,PICT_BLANK);
if (s_i.graphic_num >= 1000) // was 150
csp(998,1,s_i.graphic_num - 1000,PICT_CUSTOM + PICT_ITEM);
else csp(998,1,s_i.graphic_num,PICT_ITEM);
// id? magic?
if (store_i.magic && store_i.ident)
cd_set_led(998,17,1);
else cd_set_led(998,17,0);
if (store_i.ident)
cd_set_led(998,16,1);
else cd_set_led(998,16,0);
cd_set_item_text(998,4, item_types[s_i.variety]);
// Clear fields
for (i = 5; i < 13; i++) {
cd_set_item_text(998,i, "");
}
if (!s_i.ident) {
cd_set_item_text(998,3, s_i.name.c_str());
return;
}
cd_set_item_text(998,3, s_i.full_name.c_str());
i = s_i.item_weight();
cd_set_item_num(998,20,i);
cd_set_item_num(998,5,(s_i.charges > 0) ? s_i.value * s_i.charges : s_i.value);
if (s_i.ability > 0) {////
if (s_i.concealed) {
cd_set_item_text(998,12,"???");
} else {
get_str(desc_str,23,s_i.ability + 1);
cd_set_item_text(998,12,(char *) desc_str);
}
}
if (s_i.charges > 0)
cd_set_item_num(998,10,s_i.charges);
if (s_i.protection > 0)
cd_set_item_num(998,8,s_i.protection);
switch (s_i.variety) {
case ITEM_TYPE_ONE_HANDED:
case ITEM_TYPE_TWO_HANDED:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
switch (s_i.type) {
case ITEM_EDGED:
sprintf((char *) store_text, "Edged weapon");
break;
case ITEM_BASHING:
sprintf((char *) store_text, "Bashing weapon");
break;
case ITEM_POLE:
sprintf((char *) store_text, "Pole weapon");
break;
case ITEM_NOT_MELEE:
default:
sprintf((char*)store_text, "Error weapon"); // should never be reached
}
if (s_i.ability == 0)
cd_set_item_text(998,12,store_text);
break;
case ITEM_TYPE_BOW:
case ITEM_TYPE_CROSSBOW:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
break;
case ITEM_TYPE_ARROW:
case ITEM_TYPE_THROWN_MISSILE:
case ITEM_TYPE_BOLTS:
case ITEM_TYPE_MISSILE_NO_AMMO:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
break;
case ITEM_TYPE_POTION:
case ITEM_TYPE_RING:
case ITEM_TYPE_SCROLL: // TODO: Does this make sense for a scroll, though?
case ITEM_TYPE_TOOL: // and what about for a tool?
case ITEM_TYPE_WAND: // and a wand? Maybe showing ability strength would be better...
case ITEM_TYPE_NECKLACE: // TODO: This doesn't seem right for a necklace...
cd_set_item_num(998,11,s_i.item_level);
break;
case ITEM_TYPE_SHIELD:
case ITEM_TYPE_ARMOR:
case ITEM_TYPE_HELM:
case ITEM_TYPE_GLOVES:
case ITEM_TYPE_SHIELD_2:
case ITEM_TYPE_BOOTS: // TODO: Should this also check ITEM_TYPE_PANTS?
cd_set_item_num(998,7,s_i.bonus + s_i.protection);
cd_set_item_num(998,8,s_i.item_level);
cd_set_item_num(998,9,s_i.awkward);
break;
case ITEM_TYPE_WEAPON_POISON:
cd_set_item_num(998,11,s_i.item_level);
break;
default:
// no item, gold, food, non-use, unused 1 and 2: do nothing
break;
}
}
void display_pc_item_event_filter (short item_hit)
{
short item,pc_num;
item = store_displayed_item;
pc_num = store_item_pc;
switch (item_hit) {
case 1: case 13:
toast_dialog();
break;
case 14:
do {
item = (item == 0) ? 23 : item - 1;
} while (univ.party[pc_num].items[item].variety == 0);
store_displayed_item = item;
store_i = univ.party[pc_num].items[item];
put_item_info(pc_num,item);
break;
case 15:
do {
item = (item == 23) ? 0 : item + 1;
} while (univ.party[pc_num].items[item].variety == 0);
store_displayed_item = item;
store_i = univ.party[pc_num].items[item];
put_item_info(pc_num,item);
break;
case 100:
break;
}
}
void display_pc_item(short pc_num,short item,cItemRec si,short parent)
{
short item_hit;
store_item_pc = pc_num;
if (pc_num == 6)
store_i = si;
else store_i = univ.party[pc_num].items[item];
store_displayed_item = item;
make_cursor_sword();
if (cd_create_dialog_parent_num(998,parent) < 0)
return;
if (store_item_pc >= 6) {
cd_activate_item(998,14,0);
cd_activate_item(998,15,0);
}
cd_add_label(998,3,"Name:",1026);
cd_add_label(998,4,"Type:",1026);
cd_add_label(998,5,"Value:",1020);
cd_add_label(998,6,"Damage:",1026);
cd_add_label(998,7,"Bonus:",1024);
cd_add_label(998,8,"Defend:",1025);
cd_add_label(998,9,"Encumb.:",1029);
cd_add_label(998,10,"Uses:",1019);
cd_add_label(998,11,"Item Level:",1037);
cd_add_label(998,12,"Ability:",1026);
cd_add_label(998,16,"ID?",1013);
cd_add_label(998,17,"Magic?",1022);
cd_add_label(998,20 ,"Weight",1027);
cd_activate_item(998,18,0);
cd_activate_item(998,19,0);
put_item_info(pc_num,item);
item_hit = cd_run_dialog();
cd_kill_dialog(998);
}
void put_monst_info()////
{
string store_text;
Str255 str;
short abil,i;
if ( store_m->spec_skill == MONSTER_INVISIBLE)
cd_set_pict(999,4,400,PICT_MONST);// TODO: should probably be PICT_BLANK?
else if (store_m->picture_num < 1000)
cd_set_pict(999,4,store_m->picture_num,PICT_MONST);
else {
short type_g = PICT_CUSTOM + PICT_MONST;
short size_g = store_m->picture_num / 1000;
switch(size_g){
case 2:
type_g += PICT_WIDE_MONSTER;
break;
case 3:
type_g += PICT_TALL_MONSTER;
break;
case 4:
type_g += PICT_WIDE_MONSTER + PICT_TALL_MONSTER;
break;
}
cd_set_pict(999,4,(store_m->picture_num % 1000), type_g);
}
store_text = get_m_name(store_m->number);
cd_set_item_text(999,5,store_text.c_str());
// Clear fields
for (i = 6; i < 20; i++) {
cd_set_item_text(999,i,"");
}
abil = store_m->spec_skill;
get_str(str,20,abil + 1);
cd_set_item_text(999,19,(char *) str);
get_str(str,20,store_m->radiate_1 + 50);
cd_set_item_text(999,31,(char *) str);
for (i = 0; i < 3; i++)
if (store_m->a[i] > 0) {
std::ostringstream sout(store_text);
sout << store_m->a[i] / 100 + 1 << 'd' << store_m->a[i] % 100;
store_text = sout.str();
cd_set_item_text(999,13 + i,store_text.c_str());
}
cd_set_item_num(999,6,store_m->level);
cd_set_item_num(999,7,store_m->health);
cd_set_item_num(999,8,store_m->mp);
cd_set_item_num(999,9,store_m->armor);
cd_set_item_num(999,10,store_m->skill);
cd_set_item_num(999,11,store_m->morale);
cd_set_item_num(999,12,store_m->speed);
cd_set_item_num(999,16,store_m->mu);
cd_set_item_num(999,17,store_m->cl);
cd_set_item_num(999,18,store_m->poison);
// 2140 - lit 2141 - dark
// immunities
for (i = 0; i < 8; i++)
if (store_m->immunities & (char)(s_pow(2,i)))
cd_set_led(999,20 + i,1);
else cd_set_led(999,20 + i,0);
}
void display_monst_event_filter (short item_hit)
{
short i,dummy = 0;
switch (item_hit) {
case 1: case 3:
toast_dialog();
break;
case 28:
if (position == 0) {
for (i = 255; on_monst_menu[i] < 0 && i > 0; i--)
dummy++;
position = i;
}
else position--;
if (on_monst_menu[position] < 0)
position = 0;
store_m->number = on_monst_menu[position];
*store_m = *store_m; // to fill in fields that wouldn't otherwise be filled in; replaces return_monster_template
put_monst_info();
break;
case 29:
position++;
if (on_monst_menu[position] < 0)
position = 0;
store_m->number = on_monst_menu[position];
*store_m = *store_m; // no, this is not redundant
put_monst_info();
break;
case 100:
break;
}
}
void display_monst(short array_pos,cCreature *which_m,short mode)
//creature_data_type *which_m; // if NULL, show full roster
//short mode; // if 1, full roster, else use monster from storwhich_me_m
{
short item_hit;
position = array_pos;
full_roster = false;
if (mode == 1) {
full_roster = true;
store_m = &hold_m;
store_m->number = on_monst_menu[array_pos];
*store_m = *store_m; // yes, this DOES do something
}
else {
hold_m = *which_m;
store_m = which_m;
}
make_cursor_sword();
cd_create_dialog(999,mainPtr);
if (full_roster == false) {
cd_activate_item(999,28,0);
cd_activate_item(999,29,0);
}
cd_add_label(999,5,"Name",1026);
cd_add_label(999,6,"Level",1021);
cd_add_label(999,7,"Health",1024);
cd_add_label(999,8,"Magic Pts.",1032);
cd_add_label(999,9,"Armor",1023);
cd_add_label(999,10,"Skill",1018);
cd_add_label(999,11,"Morale",1023);
cd_add_label(999,12,"Speed",1019);
cd_add_label(999,13,"Att #1",1026);
cd_add_label(999,14,"Att #2",1023);
cd_add_label(999,15,"Att #3",1022);
cd_add_label(999,16,"Mage L.",1034);
cd_add_label(999,17,"Priest L.",1030);
cd_add_label(999,18,"Poison",1023);
cd_add_label(999,19,"Ability 1",1029);
cd_add_label(999,31,"Ability 2",1029);
cd_add_label(999,20,"Magic Resistant",45);
cd_add_label(999,21,"Immune To Magic",45);
cd_add_label(999,22,"Fire Resistant",45);
cd_add_label(999,23,"Immune To Fire",45);
cd_add_label(999,24,"Cold Resistant",45);
cd_add_label(999,25,"Immune To Cold",45);
cd_add_label(999,26,"Poison Resistant",45);
cd_add_label(999,27,"Immune To Poison",45);
put_monst_info();
item_hit = cd_run_dialog();
cd_kill_dialog(999);
}
void display_help_event_filter (short item_hit)
{
Str255 get_text;
switch (item_hit) {
case 1: case 3:
toast_dialog();
break;
case 4: case 5:
if (item_hit == 4)
cur_entry = (cur_entry == 3) ? num_entries + 2 : cur_entry - 1;
else cur_entry = (cur_entry == num_entries + 2) ? 3 : cur_entry + 1;
get_str (get_text, 25 + store_help_mode, cur_entry);
cd_set_item_text(997,7,(char *) get_text);
break;
}
}
void display_help(short mode,short parent)
{
Str255 get_text;
long get_val;
short item_hit;
store_help_mode = mode;
cur_entry = 3;
make_cursor_sword();
cd_create_dialog_parent_num(997,parent);
get_str (get_text, 25 + mode, 1);
csit( 997,6,(char *) get_text);
GetIndString (get_text, 25 + mode, 2);
StringToNum(get_text,&get_val);
num_entries = (short) get_val;
get_str (get_text, 25 + mode, cur_entry);
csit( 997,7,(char *) get_text);
item_hit = cd_run_dialog();
cd_kill_dialog(997);
}
void display_alchemy_event_filter (short item_hit)
{
switch (item_hit) {
case 1: case 3:
toast_dialog();
break;
}
}
void display_alchemy()
{
short i,item_hit;
make_cursor_sword();
cd_create_dialog_parent_num(996,1019);
for (i = 0; i < 20; i++) {
cd_add_label(996,i + 4,alch_names[i],1083);
if (univ.party.alchemy[i] > 0)
cd_set_led(996,i + 4,1);
else cd_set_led(996,i + 4,0);
}
item_hit = cd_run_dialog();
cd_kill_dialog(996);
untoast_dialog();
}
void display_traits_graphics()
{
short i,store;
for (i = 0; i < 3; i++) {
cd_set_led(1013,4 + i,(store_pc->race == i) ? 1 : 0);
}
for (i = 0; i < 10; i++) {
cd_set_led(1013,7 + i,(store_pc->traits[i] > 0) ? 1 : 0);
}
for (i = 0; i < 5; i++) {
cd_set_led(1013,36 + i,(store_pc->traits[10 + i] > 0) ? 1 : 0);
}
store = store_pc->get_tnl();
cdsin(1013,18,store);
}
void pick_race_abil_event_filter(short item_hit)
{
Str255 abil_str;
cPlayer *pc;
pc = store_pc;
switch (item_hit) {
case 3:
toast_dialog();
break;
case 4: case 5: case 6:
if (store_trait_mode == 0)
pc->race = (eRace) (item_hit - 4);
display_traits_graphics();
get_str(abil_str,5,12 + item_hit);
csit(1013,19,(char *) abil_str);
break;
case 36: case 37: case 38: case 39: case 40:
if (store_trait_mode != 1)
pc->traits[item_hit - 36 + 10] = (pc->traits[item_hit - 36 + 10] == true) ? false : true;
display_traits_graphics();
get_str(abil_str,5,item_hit - 36 + 11);
csit(1013,19,(char *) abil_str);
break;
default:
if (item_hit >= 100)
return;
if (store_trait_mode != 1)
pc->traits[item_hit - 7] = (pc->traits[item_hit - 7] == true) ? false : true;
display_traits_graphics();
get_str(abil_str,5,item_hit - 6);
csit(1013,19,(char *) abil_str);
break;
}
}
void pick_race_abil(cPlayer *pc,short mode,short parent_num)
//mode; // 0 - edit 1 - just display 2 - can't change race
{
char *start_str1 = "Click on button by name for description.";
char *start_str2 = "Click on advantage button to add/remove.";
short item_hit;
store_trait_mode = mode;
store_pc = pc;
make_cursor_sword();
cd_create_dialog_parent_num(1013,parent_num);
display_traits_graphics();
if (mode == 1)
csit(1013,19,start_str1);
else csit(1013,19,start_str2);
item_hit = cd_run_dialog();
cd_kill_dialog(1013);
untoast_dialog();
}
void display_pc_info()
{
short i,store;
Str255 str;
short pc;
char to_draw[60];
short weap1 = 24,weap2 = 24,hit_adj = 0, dam_adj = 0,skill_item;
pc = store_pc_num;
store = pc_carry_weight(pc);
i = amount_pc_can_carry(pc);
sprintf ((char *) to_draw, "%s is carrying %d stones out of %d.",univ.party[pc].name.c_str(),store,i);
csit(1019,69,(char *) to_draw);
sprintf((char *) str,"%d out of %d.",
univ.party[pc].cur_health,univ.party[pc].max_health);
csit(1019,65,(char *) str);
sprintf((char *) str,"%d out of %d.",
univ.party[pc].cur_sp,univ.party[pc].max_sp);
csit(1019,67,(char *) str);
for (i = 0; i < 19; i++) {
cdsin(1019,18 + i * 2,univ.party[pc].skills[i]);
}
store = total_encumberance(pc);
cdsin(1019,62,store);
csit(1019,9,univ.party[pc].name.c_str());
cdsin(1019,11,univ.party[pc].level);
cdsin(1019,13,univ.party[pc].experience);
cdsin(1019,71,univ.party[pc].skill_pts);
store = univ.party[pc].level * univ.party[pc].get_tnl();
cdsin(1019,15,store);
csp(1019,7,800 + univ.party[pc].which_graphic,PICT_PC);
// Fight bonuses
for (i = 0; i < 24; i++)
if (((univ.party[pc].items[i].variety == 1) || (univ.party[pc].items[i].variety == 2)) &&
(univ.party[pc].equip[i] == true)) {
if (weap1 == 24)
weap1 = i;
else weap2 = i;
}
hit_adj = stat_adj(pc,1) * 5 - (total_encumberance(pc)) * 5
+ 5 * minmax(-8,8,univ.party[pc].status[1]);
if ((univ.party[pc].traits[2] == false) && (weap2 < 24))
hit_adj -= 25;
dam_adj = stat_adj(pc,0) + minmax(-8,8,univ.party[pc].status[1]);
if ((skill_item = text_pc_has_abil_equip(pc,37)) < 24) {
hit_adj += 5 * (univ.party[pc].items[skill_item].item_level / 2 + 1);
dam_adj += univ.party[pc].items[skill_item].item_level / 2;
}
if ((skill_item = text_pc_has_abil_equip(pc,43)) < 24) {
dam_adj += univ.party[pc].items[skill_item].item_level;
hit_adj += univ.party[pc].items[skill_item].item_level * 2;
}
csit(1019,56,"No weapon.");
csit(1019,57,"");
csit(1019,59,"No weapon.");
csit(1019,60,"");
if (weap1 < 24) {
if (!univ.party[pc].items[weap1].ident)
csit(1019,56,"Not identified.");
else {
if (hit_adj + 5 * univ.party[pc].items[weap1].bonus < 0)
sprintf(to_draw,"Penalty to hit: %%%d",hit_adj + 5 * univ.party[pc].items[weap1].bonus);
else sprintf(to_draw,"Bonus to hit: +%%%d",hit_adj + 5 * univ.party[pc].items[weap1].bonus);
csit(1019,56,to_draw);
sprintf(to_draw,"Damage: (1-%d) + %d",univ.party[pc].items[weap1].item_level
,dam_adj + univ.party[pc].items[weap1].bonus);
csit(1019,57,to_draw);
}
}
if (weap2 < 24) {
if (!univ.party[pc].items[weap2].ident)
csit(1019,59,"Not identified.");
else {
if (hit_adj + 5 * univ.party[pc].items[weap2].bonus < 0)
sprintf(to_draw,"Penalty to hit: %%%d",hit_adj + 5 * univ.party[pc].items[weap2].bonus);
else sprintf(to_draw,"Bonus to hit: +%%%d",hit_adj + 5 * univ.party[pc].items[weap2].bonus);
csit(1019,59,to_draw);
sprintf(to_draw,"Damage: (1-%d) + %d",univ.party[pc].items[weap2].item_level
,dam_adj + univ.party[pc].items[weap2].bonus);
csit(1019,60,to_draw);
}
}
}
void give_pc_info_event_filter(short item_hit)
{
short pc;
pc = store_pc_num;
switch (item_hit) {
case 1:
toast_dialog();
break;
case 2:
do
store_pc_num = (store_pc_num == 0) ? 5 : store_pc_num - 1;
while (univ.party[store_pc_num].main_status != 1);
display_pc_info();
break;
case 3:
do
store_pc_num = (store_pc_num + 1) % 6;
while (univ.party[store_pc_num].main_status != 1);
display_pc_info();
break;
case 4:
display_pc(pc,0,1019);
break;
case 5:
display_pc(pc,1,1019);
break;
case 6:
pick_race_abil(&univ.party[pc],1,1019);
break;
case 68:
display_alchemy();
break;
}
}
void give_pc_info(short pc_num)
{
short item_hit ,i;
Str255 str;
store_pc_num = pc_num;
make_cursor_sword();
cd_create_dialog_parent_num(1019,0);
for (i = 0; i < 19; i++) {
get_str(str,9,1 + i * 2);
csit(1019,17 + i * 2,(char *) str);
}
display_pc_info();
item_hit = cd_run_dialog();
cd_kill_dialog(1019);
}
void adventure_notes_event_filter (short item_hit)
{
unsigned short i;
Str255 place_str;
switch (item_hit) {
case 1:
toast_dialog();
break;
case 7: case 8:
if (item_hit == 7) {
if (store_page_on == 0)
store_page_on = (store_num_i - 1) / 3;
else store_page_on--;
}
else {
if (store_page_on == (store_num_i - 1) / 3)
store_page_on = 0;
else store_page_on++;
}
break;
case 10: case 9: case 11:
short which_to_delete = (store_page_on * 3) + item_hit - 9;
cParty::encIter iter = univ.party.special_notes.begin();
iter += which_to_delete;
univ.party.special_notes.erase(iter);
//univ.party.special_notes_str[(store_page_on * 3) + item_hit - 9][0] = -1;
break;
}
for (i = 0; i < 3; i++) {
if (univ.party.special_notes.size() > i) {
switch (univ.party.special_notes[i].str_num / 1000) {
case 0:
strcpy((char *) place_str,scenario.scen_strs(univ.party.special_notes[i].str_num % 1000)); break;
case 1:
load_outdoor_str(loc(univ.party.special_notes[i].where % scenario.out_width,
univ.party.special_notes[i].where / scenario.out_width),univ.party.special_notes[i].str_num % 1000,(char *)place_str);
break;
case 2:
load_town_str(univ.party.special_notes[i].where,univ.party.special_notes[i].str_num,(char *)place_str); break;
}
get_str(place_str,univ.party.special_notes[i].str_num,univ.party.special_notes[i].where);
csit(961,3 + i,(char *) place_str);
cd_activate_item(961,9 + i,1);
}
else cd_activate_item(961,9 + i,0);
}
for (i = store_page_on * 3; i < (store_page_on * 3) + 3; i++) {
if (univ.party.special_notes.size() > i) {
switch (univ.party.special_notes[i].str_num / 1000) {
case 0:
strcpy((char *) place_str,scenario.scen_strs(univ.party.special_notes[i].str_num % 1000)); break;
case 1:
load_outdoor_str(loc(univ.party.special_notes[i].where % scenario.out_width,
univ.party.special_notes[i].where / scenario.out_width), univ.party.special_notes[i].str_num % 1000,(char *)place_str);
break;
case 2:
load_town_str(univ.party.special_notes[i].where,univ.party.special_notes[i].str_num % 1000,(char *)place_str); break;
}
csit(961,3 + (i - store_page_on * 3),(char *) place_str);
cd_activate_item(961,9 + (i - store_page_on * 3),1);
}
else {
csit(961,3 + (i - store_page_on * 3),"");
cd_activate_item(961,9 + (i - store_page_on * 3),0);
}
}
}
void adventure_notes()
{
unsigned short i;
short item_hit;
Str255 place_str;
store_num_i = 0;
//for (i = 0; i < 140; i++)
//if (univ.party.special_notes_str[i][0] > 0)
store_num_i = univ.party.special_notes.size(); //i + 1;
store_page_on = 0;
if (store_num_i == 0) {
ASB("Nothing in your journal.");
print_buf();
return;
}
make_cursor_sword();
cd_create_dialog_parent_num(961,0);
for (i = 0; i < 3; i++) {
if (univ.party.special_notes.size() > i) {
switch (univ.party.special_notes[i].str_num / 1000) {
case 0:
strcpy((char *) place_str,scenario.scen_strs(univ.party.special_notes[i].str_num % 1000)); break;
case 1:
load_outdoor_str(loc(univ.party.special_notes[i].where % scenario.out_width,
univ.party.special_notes[i].where / scenario.out_width), univ.party.special_notes[i].str_num % 1000,(char *)place_str);
break;
case 2:
load_town_str(univ.party.special_notes[i].where,univ.party.special_notes[i].str_num % 1000,(char *)place_str); break;
}
csit(961,3 + i,(char *) place_str);
cd_activate_item(961,9 + i,1);
}
else cd_activate_item(961,9 + i,0);
}
if (store_num_i <= 3) {
cd_activate_item(961,7,0);
cd_activate_item(961,8,0);
}
item_hit = cd_run_dialog();
cd_kill_dialog(961);
}
void put_talk()
{
short personality;
Str255 place_str;
csit(960,3,"");
csit(960,5,"");
csit(960,7,"");
csit(960,9,"");
if ((personality = univ.party.talk_save[store_page_on].personality) >= 0) {
if (personality / 10 != univ.town.cur_talk_loaded){
if(personality / 10 == univ.town.num) univ.town.cur_talk = &univ.town->talking;
else load_town(personality / 10,*univ.town.cur_talk);
univ.town.cur_talk_loaded = personality / 10;
}
load_town_str(univ.party.talk_save[store_page_on].town_num,0,(char *) place_str);
csit(960,9,(char *) place_str);
//get_str(place_str,120 + ((personality - 1) / 10),((personality - 1) % 10) + 1);
csit(960,7,univ.town.cur_talk->talk_strs[personality % 10]);
if (univ.party.talk_save[store_page_on].str_num1 >= 1000) {
if (univ.party.talk_save[store_page_on].str_num1 >= 3000)
csit(960,3,scenario.scen_strs(univ.party.talk_save[store_page_on].str_num1 - 3000));
else {
load_town_str(univ.party.talk_save[store_page_on].town_num,
univ.party.talk_save[store_page_on].str_num1 - 2000 ,(char *) place_str);
csit(960,3,(char *) place_str);
}
}
else if (univ.party.talk_save[store_page_on].str_num1 > 0)
csit(960,3,univ.town.cur_talk->talk_strs[univ.party.talk_save[store_page_on].str_num1]);
if (univ.party.talk_save[store_page_on].str_num2 >= 1000) {
if (univ.party.talk_save[store_page_on].str_num2 >= 3000)
csit(960,5,scenario.scen_strs(univ.party.talk_save[store_page_on].str_num2 - 3000 + 160));
else {
load_town_str(univ.party.talk_save[store_page_on].town_num,
univ.party.talk_save[store_page_on].str_num2 - 2000/* + 20*/,(char *) place_str);
csit(960,5,(char *) place_str);
}
}
else if (univ.party.talk_save[store_page_on].str_num2 > 0)
csit(960,5,univ.town.cur_talk->talk_strs[univ.party.talk_save[store_page_on].str_num2]);
}
}
void talk_notes_event_filter (short item_hit)
{
switch (item_hit) {
case 1:
toast_dialog();
break;
case 10: case 11:
if (item_hit == 10) {
if (store_page_on == 0)
store_page_on = store_num_i - 1;
else store_page_on--;
}
else {
if (store_page_on == store_num_i - 1)
store_page_on = 0;
else store_page_on++;
}
break;
case 12:
univ.party.talk_save[store_page_on].personality = -1;
break;
}
put_talk();
}
void talk_notes()
{
short i,item_hit;
store_num_i = 0;
for (i = 0; i < 120; i++)
if (univ.party.talk_save[i].personality != -1)
store_num_i = i + 1;
store_page_on = 0;
if (store_num_i == 0) {
ASB("Nothing in your talk journal.");
print_buf();
return;
}
make_cursor_sword();
cd_create_dialog_parent_num(960,0);
put_talk();
if (store_num_i == 1) {
cd_activate_item(960,10,0);
cd_activate_item(960,11,0);
}
item_hit = cd_run_dialog();
cd_kill_dialog(960);
}
void journal_event_filter (short item_hit)
{
short i;
Str255 place_str;
switch (item_hit) {
case 1:
toast_dialog();
break;
case 7: case 8:
if (item_hit == 7) {
if (store_page_on == 0)
store_page_on = (store_num_i - 1) / 3;
else store_page_on--;
}
else {
if (store_page_on == (store_num_i - 1) / 3)
store_page_on = 0;
else store_page_on++;
}
break;
}
for (i = 0; i < 3; i++) {
if ((long)univ.party.journal.size() > i + (store_page_on * 3)) {
////get_str(place_str,17,univ.party.journal_str[i + (store_page_on * 3)]);
csit(962,3 + i,scenario.scen_strs(univ.party.journal[i].str_num + 10));
sprintf((char *)place_str,"Day: %d",univ.party.journal[i + (store_page_on * 3)].day);
csit(962,9 + i,(char *)place_str);
}
else{
csit(962,3 + i,"");csit(962,9 + i,"");
}
}
}
void journal()
{
unsigned short i;
short item_hit;
Str255 place_str;
store_num_i = 0;
//for (i = 0; i < 120; i++)
//if (univ.party.journal[i].str_num > 0)
store_num_i = univ.party.journal.size();//i + 1;
store_page_on = 0;
make_cursor_sword();
cd_create_dialog_parent_num(962,0);
for (i = 0; i < 3; i++) {
if (univ.party.journal.size() > i) {
////get_str(place_str,17,univ.party.journal_str[i]);
csit(962,3 + i,scenario.scen_strs(univ.party.journal[i].str_num + 10));
sprintf((char *)place_str,"Day: %d",univ.party.journal[i].day);
csit(962,9 + i,(char *)place_str);
}
}
if (store_num_i <= 3) {
cd_activate_item(962,7,0);
cd_activate_item(962,8,0);
}
item_hit = cd_run_dialog();
cd_kill_dialog(962);
}
void add_to_journal(short event)
{
if(univ.party.add_to_journal(event, calc_day()))
ASB("Something was added to your journal.");
}
// Only call these when main window is in foreground!
void display_enc_string(short val1,short val2,short sound)
{
// display_strings(val1,val2,0,0,"",sound,708,0);
}
void display_2_enc_string(short val1,short val2,short val3,short val4,short sound)
{
// display_strings(val1,val2,val3,val4,"",sound,708,0);
}
// Call call this anywhere, but don't forget parent!!!
void give_help(short help1,short help2,short parent_num)
{
bool help_forced = false;
Str255 str1,str2;
if (help1 >= 200) {
help_forced = true;
help1 -= 200;
}
if ((PSD[SDF_NO_INSTANT_HELP] > 0) && (help_forced == false))
return;
if (univ.party.help_received[help1] > 0)
return;
//if (help1 >= 20)
univ.party.help_received[help1] = 1;
get_str(str1,10,help1);
if (help2 > 0)
get_str(str2,10,help2);
if (help2 == 0)
display_strings((char *)str1, "",-1,-1,-1,-1,"Instant Help",57,24,PICT_DLG, parent_num);
else display_strings((char *)str1,(char *)str2,-1,-1,-1,-1,"Instant Help",57,24,PICT_DLG, parent_num);
}
void put_spec_item_info (short which_i)
{
display_strings(scenario.scen_strs(60 + 1 + which_i * 2),"",
-1,-1,-1,-1,
scenario.scen_strs(60 + which_i * 2),57,scenario.intro_pic,PICT_SCEN,0);
//get_str(item_name,6,1 + which_i * 2);
//display_strings(6,2 + which_i * 2,0,0,
//(char *)item_name,-1,702,0);
}
void record_display_strings(){
bool had1 = false, had2 = false;
unsigned int i;
play_sound(0);
for (i = 0; i < univ.party.special_notes.size(); i++)
if ((store_str_label_1 == univ.party.special_notes[i].str_num) &&
(store_str_label_1b == univ.party.special_notes[i].where))
had1 = true;
if (!had1) {
give_help(58,0,store_which_string_dlog);
univ.party.record(store_str_label_1, store_str_label_1b);
}
for (i = 0; i < univ.party.special_notes.size(); i++)
if ((store_str_label_2 == univ.party.special_notes[i].str_num) &&
(store_str_label_2b == univ.party.special_notes[i].where))
had2 = true;
if (!had2) {
univ.party.record(store_str_label_2,store_str_label_2b);
}
}
Reference in New Issue View Git Blame Copy Permalink