openboe/oboe
2
0
Fork 0
Code Issues 146 Pull Requests 4 Actions Packages Projects Releases Wiki Activity
Files
5417fda4cacc991f6708c2708f31e1c8f8a374f2
oboe/Win32/Blades of Exile/INFODLGS.CPP
Chokboyz b203c94ab7 Initial Import of Win32 Classic Blades of Exile and associated Scenario Editor codes. 
Chokboyz

git-svn-id: http://openexile.googlecode.com/svn/trunk@70 4ebdad44-0ea0-11de-aab3-ff745001d230
2009-05-24 23:32:16 +00:00

1260 lines
34 KiB
C++
Raw Blame History

#include <windows.h>
#include "stdio.h"
#include "global.h"
#include "graphics.h"
#include "newgraph.h"
#include "items.h"
#include "string.h"
#include "monster.h"
#include "dlogtool.h"
#include "party.h"
#include "fields.h"
#include "locutils.h"
#include "text.h"
#include "exlsound.h"
#include "infodlgs.h"
#include "fileio.h"
#include "globvar.h"
void put_spell_info()
{
char store_text[256];
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];
GetIndString(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);
GetIndString(store_text, res, pos * 2 + 2);
cd_set_item_text(1096,7,(char *) store_text);
GetIndString(store_text, 11, 1 + spell_w_cast[store_display_mode][pos]);
cd_set_item_text(1096,11,(char *) store_text);
}
Boolean display_spells_event_filter (short item_hit)
{
short store;
switch (item_hit) {
case 1: case 8:
dialog_not_toast = FALSE;
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;
}
return FALSE;
}
void display_spells(short mode,short force_spell,short parent_num)
//short mode; // 0 - mage 1 - priest
//short force_spell; // if 100, ignore
{
store_display_mode = mode;
if (force_spell < 100) {
if (mode == 0)
mage_spell_pos = force_spell;
else priest_spell_pos = force_spell;
}
SetCursor(sword_curs);
cd_create_dialog_parent_num(1096,parent_num);
cd_set_pict(1096,18,714 + mode);
put_spell_info();
if (mode == 0)
csit(1096,3,"Mage Spells");
else csit(1096,3,"Priest Spells");
while (dialog_not_toast)
ModalDialog();
cd_kill_dialog(1096,0);
}
void put_skill_info()
{
char store_text[256];
short pos;
pos = skill_pos;
GetIndString(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]);
GetIndString(store_text, 9, pos * 2 + 2);
cd_set_item_text(1097,7,(char *) store_text);
GetIndString(store_text, 12, 1 + pos);
cd_set_item_text(1097,8,(char *) store_text);
}
Boolean display_skills_event_filter (short item_hit)
{
switch (item_hit) {
case 1: case 11:
dialog_not_toast = FALSE;
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;
}
return FALSE;
}
void display_skills(short force_skill,short parent)
{
if (force_skill < 100) skill_pos = force_skill;
if (skill_pos < 0) skill_pos = 0;
SetCursor(sword_curs);
cd_create_dialog_parent_num(1097,parent);
put_skill_info();
while (dialog_not_toast)
ModalDialog();
cd_kill_dialog(1097,0);
}
void put_pc_graphics()
{
short i;
for (i = 3; i < 65; i++) {
if (((store_trait_mode == 0) && (adven[which_pc_displayed].mage_spells[i - 3] == TRUE)) ||
((store_trait_mode == 1) && (adven[which_pc_displayed].priest_spells[i - 3] == TRUE)))
cd_set_led(991,i,2);
else cd_set_led(991,i,0);
}
cd_set_item_text(991,69,adven[which_pc_displayed].name);
}
Boolean display_pc_event_filter (short item_hit)
{
short pc_num;
pc_num = which_pc_displayed;
switch (item_hit) {
case 1: case 65:
dialog_not_toast = FALSE;
break;
case 66:
do {
pc_num = (pc_num == 0) ? 5 : pc_num - 1;
} while (adven[pc_num].main_status == MAIN_STATUS_ABSENT);
which_pc_displayed = pc_num;
put_pc_graphics();
break;
case 67:
do {
pc_num = (pc_num == 5) ? 0 : pc_num + 1;
} while (adven[pc_num].main_status == MAIN_STATUS_ABSENT);
which_pc_displayed = pc_num;
put_pc_graphics();
break;
case 100:
break;
}
return FALSE;
}
void display_pc(short pc_num,short mode,short parent)
{
short i;
char label_str[256];
if (adven[pc_num].main_status == MAIN_STATUS_ABSENT) {
for (pc_num = 0; pc_num < 6; pc_num++)
if (adven[pc_num].isAlive())
break;
}
which_pc_displayed = pc_num;
store_trait_mode = mode;
SetCursor(sword_curs);
cd_create_dialog_parent_num(991,parent);
for (i = 3; i < 65; i++) {
GetIndString(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,714 + mode);
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(991,0);
}
void put_item_info()
{
char store_text[256];
char desc_str[256];
short i;
item_record_type 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,950);
if (s_i.graphic_num >= 150)
csp(998,1,s_i.graphic_num - 150 + 2000);
else csp(998,1,1800 + s_i.graphic_num);
// id? magic?
if (store_i.isMagic() && store_i.isIdent())
cd_set_led(998,17,1);
else cd_set_led(998,17,0);
if (store_i.isIdent())
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.isIdent() == false) {
cd_set_item_text(998,3, s_i.name);
cd_set_item_text(998,12, "???"); // cosmetic change, display ??? in ability when the item isn't identified
return;
}
cd_set_item_text(998,3, s_i.full_name);
i = item_weight(s_i);
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) {////
// GetIndString(desc_str,23,s_i.ability + 1);
// cd_set_item_text(998,12,(char *) desc_str);
// }
if (s_i.isConcealed()){cd_set_item_text(998,12,"???");} //check if the item ability is to be concealed and print "???" in ability if so
else{
GetIndString(desc_str,23,s_i.ability + 1); //else it display the item ability as usual
cd_set_item_text(998,12,(char *) desc_str); //note : common items weren't displaying the "No ability" string. It is restored here.
}
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 1: case 2:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
switch (s_i.type) {
case 1:sprintf((char *) store_text, "Edged weapon");
break;
case 2:sprintf((char *) store_text, "Bashing weapon");
break;
case 3:sprintf((char *) store_text, "Pole weapon");
break;
}
if (s_i.ability == 0)
cd_set_item_text(998,12,store_text);
break;
case 4: case 23:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
break;
case 5: case 6: case 24: case 25:
cd_set_item_num(998,6,s_i.item_level);
cd_set_item_num(998,7,s_i.bonus);
break;
case 7: case 18:
cd_set_item_num(998,11,s_i.item_level);
break;
case 12: case 13: case 14: case 15: case 16: case 17:
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 20:
cd_set_item_num(998,11,s_i.item_level);
break;
}
}
Boolean 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:
dialog_not_toast = FALSE;
break;
case 14:
do {
item = (item == 0) ? 23 : item - 1;
} while (adven[pc_num].items[item].variety == 0);
store_displayed_item = item;
store_i = adven[pc_num].items[item];
put_item_info();
break;
case 15:
do {
item = (item == 23) ? 0 : item + 1;
} while (adven[pc_num].items[item].variety == 0);
store_displayed_item = item;
store_i = adven[pc_num].items[item];
put_item_info();
break;
case 100:
break;
}
return FALSE;
}
void display_pc_item(short pc_num,short item,item_record_type si,short parent)
{
store_item_pc = pc_num;
if (pc_num == 6)
store_i = si;
else store_i = adven[pc_num].items[item];
store_displayed_item = item;
SetCursor(sword_curs);
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",1022);
put_item_info();
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(998,0);
}
void put_monst_info()
{
char store_text[256];
char str[256];
short abil,i;
if ( store_m->m_d.spec_skill == 11)
cd_set_pict(999,4,400);
else if (store_m->m_d.picture_num < 1000)
cd_set_pict(999,4,400 + store_m->m_d.picture_num);
else cd_set_pict(999,4,2000 + (store_m->m_d.picture_num % 1000));
get_m_name((char *) store_text,store_m->number);
cd_set_item_text(999,5,store_text);
// Clear fields
for (i = 6; i < 20; i++) {
cd_set_item_text(999,i,"");
}
abil = store_m->m_d.spec_skill;
GetIndString(str,20,abil + 1);
cd_set_item_text(999,19,(char *) str);
GetIndString(str,20,store_m->m_d.radiate_1 + 50);
cd_set_item_text(999,31,(char *) str);
for (i = 0; i < 3; i++)
if (store_m->m_d.a[i] > 0) {
sprintf((char *) store_text," %dd%d ",
store_m->m_d.a[i] / 100 + 1, store_m->m_d.a[i] % 100);
cd_set_item_text(999,13 + i,store_text);
}
cd_set_item_num(999,6,store_m->m_d.level);
cd_set_item_num(999,7,store_m->m_d.health);
cd_set_item_num(999,8,store_m->m_d.mp);
cd_set_item_num(999,9,store_m->m_d.armor);
cd_set_item_num(999,10,store_m->m_d.skill);
cd_set_item_num(999,11,store_m->m_d.morale);
cd_set_item_num(999,12,store_m->m_d.speed);
cd_set_item_num(999,16,store_m->m_d.mu);
cd_set_item_num(999,17,store_m->m_d.cl);
cd_set_item_num(999,18,store_m->m_d.poison);
// 2140 - lit 2141 - dark
// immunities
for (i = 0; i < 8; i++)
if (store_m->m_d.immunities & (char)(s_pow(2,i)))
cd_set_led(999,20 + i,1);
else cd_set_led(999,20 + i,0);
}
Boolean display_monst_event_filter (short item_hit)
{
short i,dummy = 0;
switch (item_hit) {
case 1: case 3:
dialog_not_toast = FALSE;
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 = (unsigned char)on_monst_menu[position];
store_m->m_d = return_monster_template((unsigned char)on_monst_menu[position]);
put_monst_info();
break;
case 29:
position++;
if (on_monst_menu[position] < 0)
position = 0;
store_m->number = (unsigned char)on_monst_menu[position];
store_m->m_d = return_monster_template((unsigned char)on_monst_menu[position]);
put_monst_info();
break;
case 100:
break;
}
return FALSE;
}
void display_monst(short array_pos,creature_data_type *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
{
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->m_d = return_monster_template((unsigned char)on_monst_menu[array_pos]);
}
else {
hold_m = *which_m;
store_m = which_m;
}
SetCursor(sword_curs);
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();
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(999,0);
}
Boolean display_help_event_filter (short item_hit)
{
char get_text[256];
switch (item_hit) {
case 1: case 3:
dialog_not_toast = FALSE;
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;
GetIndString(get_text, 25 + store_help_mode, cur_entry);
cd_set_item_text(997,7,(char *) get_text);
break;
}
return FALSE;
}
void display_help(short mode,short parent)
{
char get_text[256];
long get_val;
store_help_mode = mode;
cur_entry = 3;
SetCursor(sword_curs);
cd_create_dialog_parent_num(997,parent);
GetIndString(get_text, 25 + mode, 1);
csit( 997,6,(char *) get_text);
GetIndString (get_text, 25 + mode, 2);
//StringToNum(get_text,&get_val);
get_val = atol(get_text);
num_entries = (short) get_val;
GetIndString(get_text, 25 + mode, cur_entry);
csit( 997,7,(char *) get_text);
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(997,0);
}
Boolean display_alchemy_event_filter (short item_hit)
{
switch (item_hit) {
case 1: case 3:
dialog_not_toast = FALSE;
break;
}
return FALSE;
}
void display_alchemy()
{
short i;
char *alch_names[] =
{
"Weak Curing Potion (1)",
"Weak Healing Potion (1)",
"Weak Poison (1)",
"Weak Speed Potion (3)",
"Medium Poison (3)",
"Medium Heal Potion (4)",
"Strong Curing (5)",
"Medium Speed Potion (5)",
"Graymold Salve (7)",
"Weak Energy Potion (9)",
"Potion of Clarity (9)",
"Strong Poison (10)",
"Strong Heal Potion (12)",
"Killer Poison (12)",
"Resurrection Balm (9)",
"Medium Energy Ptn. (14)",
"Knowledge Brew (19)",
"Strong Strength (10)",
"Bliss (16)",
"Strong Power (20)"
};
SetCursor(sword_curs);
cd_create_dialog_parent_num(996,1019);
for (i = 0; i < 20; i++) {
cd_add_label(996,i + 4,alch_names[i],1083);
if (party.alchemy[i] > 0)
cd_set_led(996,i + 4,1);
else cd_set_led(996,i + 4,0);
}
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(996,0);
dialog_not_toast = TRUE;
}
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 = get_tnl(store_pc);
cdsin(1013,18,store);
}
void pick_race_abil_event_filter(short item_hit)
{
char abil_str[256];
pc_record_type *pc;
pc = store_pc;
switch (item_hit) {
case 3:
dialog_not_toast = FALSE;
break;
case 4: case 5: case 6:
if (store_trait_mode == 0)
pc->race = item_hit - 4;
display_traits_graphics();
GetIndString(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 - 26] = (pc->traits[item_hit - 26] == TRUE) ? FALSE : TRUE;
display_traits_graphics();
GetIndString(abil_str,5,item_hit - 25);
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();
GetIndString(abil_str,5,item_hit - 6);
csit(1013,19,(char *) abil_str);
break;
}
}
void pick_race_abil(pc_record_type *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.";
store_trait_mode = mode;
store_pc = pc;
SetCursor(sword_curs);
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);
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(1013,0);
dialog_not_toast = TRUE;
}
void display_pc_info()
{
short i,store;
char str[256];
short pc;
char to_draw[60];
short weap1 = 24,weap2 = 24,hit_adj = 0, dam_adj = 0,skill_item;
pc = store_pc_num;
store = adven[pc].amountCarried();
i = adven[pc].amountCanCarry();
sprintf ((char *) to_draw, "%s is carrying %d stones out of %d.",adven[pc].name,store,i);
csit(1019,69,(char *) to_draw);
sprintf((char *) str,"%d out of %d.",
adven[pc].cur_health,adven[pc].max_health);
csit(1019,65,(char *) str);
sprintf((char *) str,"%d out of %d.",
adven[pc].cur_sp,adven[pc].max_sp);
csit(1019,67,(char *) str);
for (i = 0; i < 19; i++) {
cdsin(1019,18 + i * 2,adven[pc].skills[i]);
}
store = total_encumberance(pc);
cdsin(1019,62,store);
csit(1019,9,adven[pc].name);
cdsin(1019,11,adven[pc].level);
cdsin(1019,13,adven[pc].experience);
cdsin(1019,71,adven[pc].skill_pts);
store = adven[pc].level * get_tnl(&adven[pc]);
cdsin(1019,15,store);
csp(1019,7,800 + adven[pc].which_graphic);
// Fight bonuses
for (i = 0; i < 24; i++)
if (((adven[pc].items[i].variety == 1) || (adven[pc].items[i].variety == 2)) &&
(adven[pc].equip[i] == TRUE)) {
if (weap1 == 24)
weap1 = i;
else weap2 = i;
}
hit_adj = adven[pc].statAdj(1) * 5 - (total_encumberance(pc)) * 5
+ (5 * minmax(-8,8,(int)adven[pc].status[1]));
if ((adven[pc].traits[TRAIT_AMBIDEXTROUS] == FALSE) && (weap2 < 24))
hit_adj -= 25;
dam_adj = adven[pc].statAdj(0) + minmax(-8,8,(int)adven[pc].status[1]);
if ((skill_item = text_pc_has_abil_equip(pc,101)) < 24) {
hit_adj += 5 * (adven[pc].items[skill_item].item_level + 1);
dam_adj += adven[pc].items[skill_item].item_level;
}
if ((skill_item = text_pc_has_abil_equip(pc,96)) < 24) {
dam_adj += 2;
hit_adj += 1;
}
if ((skill_item = text_pc_has_abil_equip(pc,97)) < 24) {
hit_adj += 5;
dam_adj += 3;
}
csit(1019,56,"No weapon.");
csit(1019,57,"");
csit(1019,59,"No weapon.");
csit(1019,60,"");
if (weap1 < 24) {
if (adven[pc].items[weap1].isIdent() == false)
csit(1019,56,"Not identified.");
else {
if (hit_adj + 5 * adven[pc].items[weap1].bonus < 0)
sprintf(to_draw,"Penalty to hit: %%%d",hit_adj + 5 * adven[pc].items[weap1].bonus);
else sprintf(to_draw,"Bonus to hit: +%%%d",hit_adj + 5 * adven[pc].items[weap1].bonus);
csit(1019,56,to_draw);
sprintf(to_draw,"Damage: (1-%d) + %d",adven[pc].items[weap1].item_level
,dam_adj + adven[pc].items[weap1].bonus);
csit(1019,57,to_draw);
}
}
if (weap2 < 24) {
if (adven[pc].items[weap2].isIdent() == false)
csit(1019,59,"Not identified.");
else {
if (hit_adj + 5 * adven[pc].items[weap2].bonus < 0)
sprintf(to_draw,"Penalty to hit: %%%d",hit_adj + 5 * adven[pc].items[weap2].bonus);
else sprintf(to_draw,"Bonus to hit: +%%%d",hit_adj + 5 * adven[pc].items[weap2].bonus);
csit(1019,59,to_draw);
sprintf(to_draw,"Damage: (1-%d) + %d",adven[pc].items[weap2].item_level
,dam_adj + adven[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:
dialog_not_toast = FALSE;
break;
case 2:
do
store_pc_num = (store_pc_num == 0) ? 5 : store_pc_num - 1;
while (adven[store_pc_num].isAlive() == false);
display_pc_info();
break;
case 3:
do
store_pc_num = (store_pc_num + 1) % 6;
while (adven[store_pc_num].isAlive() == false);
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(&adven[pc],1,1019);
break;
case 68:
display_alchemy();
break;
}
}
void give_pc_info(short pc_num)
{
short i;
char str[256];
store_pc_num = pc_num;
SetCursor(sword_curs);
cd_create_dialog_parent_num(1019,0);
for (i = 0; i < 19; i++) {
GetIndString(str,9,1 + i * 2);
csit(1019,17 + i * 2,(char *) str);
}
display_pc_info();
while (dialog_not_toast)
ModalDialog(); cd_kill_dialog(1019,0);
}
void adventure_notes_event_filter (short item_hit)
{
short i;
char place_str[256];
switch (item_hit) {
case 1:
dialog_not_toast = FALSE;
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:
party.special_notes_str[(store_page_on * 3) + item_hit - 9][0] = -1;
break;
}
for (i = 0; i < 3; i++) {
if (party.special_notes_str[i][0] > 0) {
switch (party.special_notes_str[i][0] / 1000) {
case 0: if (party.special_notes_str[i][0] % 1000 < 160)
strcpy((char *) place_str,data_store5->scen_strs[party.special_notes_str[i][0] % 1000]);
else strcpy((char *) place_str,scen_strs2[(party.special_notes_str[i][0] % 1000) - 160]);
break;
case 1:
load_outdoors(party.special_notes_str[i][1] % scenario.out_width,
party.special_notes_str[i][1] / scenario.out_width,
0,0,1,party.special_notes_str[i][0] % 1000,(char *)place_str);
break;
case 2: load_town(party.special_notes_str[i][1],2,party.special_notes_str[i][0],(char *)place_str); break;
}
GetIndString(place_str,party.special_notes_str[i][0],party.special_notes_str[i][1]);
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 (party.special_notes_str[i][0] > 0) {
switch (party.special_notes_str[i][0] / 1000) {
case 0: if (party.special_notes_str[i][0] % 1000 < 160)
strcpy((char *) place_str,data_store5->scen_strs[party.special_notes_str[i][0] % 1000]);
else strcpy((char *) place_str,scen_strs2[(party.special_notes_str[i][0] % 1000) - 160]);
break;
case 1:
load_outdoors(party.special_notes_str[i][1] % scenario.out_width,
party.special_notes_str[i][1] / scenario.out_width,
0,0,1,party.special_notes_str[i][0] % 1000,(char *)place_str);
break;
case 2: load_town(party.special_notes_str[i][1],2,party.special_notes_str[i][0] % 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()
{
short i;
char place_str[256];
store_num_i = 0;
for (i = 0; i < 140; i++)
if (party.special_notes_str[i][0] > 0)
store_num_i = i + 1;
store_page_on = 0;
if (store_num_i == 0) {
ASB("Nothing in your journal.");
print_buf();
return;
}
SetCursor(sword_curs);
cd_create_dialog_parent_num(961,0);
for (i = 0; i < 3; i++) {
if (party.special_notes_str[i][0] > 0) {
switch (party.special_notes_str[i][0] / 1000) {
case 0:
if (party.special_notes_str[i][0] % 1000 < 160)
strcpy((char *) place_str,data_store5->scen_strs[party.special_notes_str[i][0] % 1000]);
else strcpy((char *) place_str,scen_strs2[(party.special_notes_str[i][0] % 1000) - 160]);
break;
case 1:
load_outdoors(party.special_notes_str[i][1] % scenario.out_width,
party.special_notes_str[i][1] / scenario.out_width,
0,0,1,party.special_notes_str[i][0] % 1000,(char *)place_str);
break;
case 2: load_town(party.special_notes_str[i][1],2,party.special_notes_str[i][0] % 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);
}
while (dialog_not_toast)
ModalDialog();
cd_kill_dialog(961,0);
}
void put_talk()
{
short personality;
char place_str[256];
csit(960,3,"");
csit(960,5,"");
csit(960,7,"");
csit(960,9,"");
if ((personality = party.talk_save[store_page_on].personality) >= 0) {
if (personality / 10 != cur_town_talk_loaded)
load_town(personality / 10,1,0,NULL);
load_town(party.talk_save[store_page_on].town_num,2,0,(char *) place_str);
csit(960,9,(char *) place_str);
//GetIndString(place_str,120 + ((personality - 1) / 10),((personality - 1) % 10) + 1);
csit(960,7,data_store3->talk_strs[personality % 10]);
if (party.talk_save[store_page_on].str1 >= 1000) {
if (party.talk_save[store_page_on].str1 >= 3000) {
if (party.talk_save[store_page_on].str1 - 3000 < 160)
csit(960,3,data_store5->scen_strs[party.talk_save[store_page_on].str1 - 3000 ]);
else csit(960,3,scen_strs2[party.talk_save[store_page_on].str1 - 3000 - 160]);
}
else {
load_town(party.talk_save[store_page_on].town_num,2,
party.talk_save[store_page_on].str1 - 2000 ,(char *) place_str);
csit(960,3,(char *) place_str);
}
}
else if ((party.talk_save[store_page_on].str1 > 0) &&
(party.talk_save[store_page_on].str1 < 170))
csit(960,3,data_store3->talk_strs[party.talk_save[store_page_on].str1]);
if (party.talk_save[store_page_on].str2 >= 1000) {
if (party.talk_save[store_page_on].str2 >= 3000) {
if (party.talk_save[store_page_on].str2 - 3000 < 160)
csit(960,5,data_store5->scen_strs[party.talk_save[store_page_on].str2 - 3000 ]);
else csit(960,5,scen_strs2[party.talk_save[store_page_on].str2 - 3000 - 160]);
}
else {
load_town(party.talk_save[store_page_on].town_num,2,
party.talk_save[store_page_on].str2 - 2000,(char *) place_str);
csit(960,5,(char *) place_str);
}
}
else if ((party.talk_save[store_page_on].str2 > 0) &&
(party.talk_save[store_page_on].str2 < 170))
csit(960,5,data_store3->talk_strs[party.talk_save[store_page_on].str2]);
}
}
void talk_notes_event_filter (short item_hit)
{
switch (item_hit) {
case 1:
dialog_not_toast = FALSE;
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:
party.talk_save[store_page_on].personality = -1;
break;
}
put_talk();
}
void talk_notes()
{
short i;
store_num_i = 0;
for (i = 0; i < 120; i++)
if (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;
}
SetCursor(sword_curs);
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);
}
while (dialog_not_toast)
ModalDialog();
cd_kill_dialog(960,0);
}
// Call this anywhere, but don't forget parent!!!
void give_help(short help1,short help2,short parent_num)
{
Boolean help_forced = FALSE;
char str1[256],str2[256];
if (help1 >= 200) {
help_forced = TRUE;
help1 -= 200;
}
if ((PSD[306][4] > 0) && (help_forced == FALSE))
return;
if (party.help_received[help1] > 0)
return;
party.help_received[help1] = 1;
GetIndString(str1,10,help1);
if (help2 > 0)
GetIndString(str2,10,help2);
if (help2 == 0)
display_strings((char *)str1, "",-1,-1,-1,-1,"Instant Help",57,724, parent_num);
else display_strings((char *)str1,(char *)str2,-1,-1,-1,-1,"Instant Help",57,724, parent_num);
}
void put_spec_item_info (short which_i)
{
display_strings(data_store5->scen_strs[60 + 1 + which_i * 2],"",
-1,-1,-1,-1,
data_store5->scen_strs[60 + which_i * 2],57,1600 + scenario.intro_pic,0);
}
void display_strings_event_filter (short item_hit)
{
short i;
Boolean had1 = FALSE, had2 = FALSE;
switch (item_hit) {
case 1:
dialog_not_toast = FALSE;
break;
case 2:
play_sound(0);
for (i = 0; i < 140; i++)
if ((store_str_label_1 == party.special_notes_str[i][0]) &&
(store_str_label_1b == party.special_notes_str[i][1]))
had1 = TRUE;
if (had1 == FALSE) {
//give_help(58,0,store_which_string_dlog);
for (i = 0; i < 140; i++)
if (party.special_notes_str[i][0] <= 0) {
party.special_notes_str[i][0] = store_str_label_1;
party.special_notes_str[i][1] = store_str_label_1b;
//party.special_notes_str[i][1] = store_str1b;
ASB("Info added to Encounter Notes.");
i = 140;
}
}
for (i = 0; i < 140; i++)
if ((store_str_label_2 == party.special_notes_str[i][0]) &&
(store_str_label_2b == party.special_notes_str[i][1]))
had2 = TRUE;
if (had2 == FALSE) {
for (i = 0; i < 140; i++)
if (party.special_notes_str[i][0] <= 0) {
party.special_notes_str[i][0] = store_str_label_2;
party.special_notes_str[i][1] = store_str_label_2b;
//party.special_notes_str[i][1] = store_str2b;
i = 140;
}
}
break;
}
}
// str_label_1 & str_label_2 uysed for saving button for journal
// 1000 + x scen 2000 + x out 3000 + x town
void display_strings(char *text1, char *text2,short str_label_1,short str_label_2,short str_label_1b,
short str_label_2b,
char *title,short sound_num,short graphic_num,short parent_num)
{
SetCursor(sword_curs);
store_str_label_1 = str_label_1;
store_str_label_2 = str_label_2;
store_str_label_1b = str_label_1b;
store_str_label_2b = str_label_2b;
store_which_string_dlog = 970;
if (strlen(title) > 0)
store_which_string_dlog += 2;
if ((text2 != NULL) && (text2[0] != 0))
store_which_string_dlog++;
cd_create_dialog_parent_num(store_which_string_dlog,parent_num);
csp(store_which_string_dlog,store_which_string_dlog,graphic_num);
csit(store_which_string_dlog,4,(char *) text1);
if (text2 != NULL) {
csit(store_which_string_dlog,5,(char *) text2);
}
if (strlen(title) > 0)
csit(store_which_string_dlog,6,title);
csp(store_which_string_dlog,3,graphic_num);
if (sound_num >= 0)
play_sound(sound_num);
if ((str_label_1 < 0) && (str_label_2 < 0))
cd_activate_item(store_which_string_dlog,2,0);
while (dialog_not_toast)
ModalDialog(); //cd_kill_dialog(store_which_string_dlog,0);
final_process_dialog(store_which_string_dlog);
}
void give_error(char *text1, char *text2,short parent_num)
{
display_strings(text1,text2,-1,-1,-1,-1,"Error!",57,716,parent_num);
}
void display_strings_with_nums(short a1,short a2, short b1, short b2,
char *title,short sound_num,short graphic_num,short parent_num)
{
char str1[256] = "", str2[256] = "";
if ((a1 > 0) && (a2 > 0))
GetIndString(str1,a1,a2);
if ((b1 > 0) && (b2 > 0))
GetIndString(str2,b1,b2);
display_strings((char *) str1,(char *) str2,-1,-1,-1,-1,
title, sound_num, graphic_num, parent_num);
}
Reference in New Issue View Git Blame Copy Permalink