openboe/oboe
2
0
Fork 0
Code Issues 146 Pull Requests 4 Actions Packages Projects Releases Wiki Activity
Files
84f9d381982ab7ba74eb8fcd020b9cd29e620018
oboe/Blades of Exile/GUTILS.CPP
Chokboyz 84f9d38198 Classic Blades of Exile Beta 2 initial upload. 
Changelog (without any order) :

Bug Fixes :

- Giant Strength ability and Skill ability now use the ability strength rather than the item level to calculate effect.
- Won't take damage when moving boats over damaging terrains (fire, cold, magic, poison, disease) anymore.
- Won't take damage when horses refuses to enter a damaging terrain (fire, cold, magic) anymore.
- Horses won't enter damaging terrains (fire, cold, magic) or "horse blocking" terrains when outdoors anymore.
- Boom effects won't be displayed at random places when being damaged outdoors anymore.
- Damage won't be displayed in boom animation when attacking invulnerable monsters, when they are, in fact, unharmed ...
- The first pc won't become active with 0 AP anymore when a pc get killed by backshots.
- Fixed the town loading behavior so that Empties won't appear in Place Town Encounters anymore.
- Cleaned the ressource file (smaller executable).
- Changed the "force place monster" function to preferably flush a summoned monster if flushing is needed. Also prevent a potential infinite loop if trying to force place a monster and all the 60 monsters of a town have a life flag.
- Tweaked exploding arrows firing animation to be smoother (arrow fired, then explosion).
- The spell usable Stinking Cloud ability was protecting against acid instead of the Protection from Acid ability. Fixed.
- The Protection from Disease item ability should now works to the full extent.
- Removed a check on the item graphic when deciding whether to play the"swallow" sound; now checks only for item variety. (Celtic Minstrel)
- Corrected the code so that the party cannot be split again if already split.
- Various messages code cleaning/fixing (Celtic Minstrel)
- Removed the 50 node limit. To prevent infinite loop an interrupt sequence has been implemented (Ctrl-C).
- Cave Bridges battlefield should now appears instead of basic cave floor.
- Wall trims are now working.
- Slowdowns due to trims drawing (animated water, ...) should be fixed now.
- Scenarios in subfolders (under Scenarios/) are now found.
- No more limit for the number of listed scenarios.
- Clicking '?' icon on shopping and talk mode now gives help, even if in 'No instant help' mode.

Changes :

- All terrains and monsters sheets now loaded in memory to bypass storage sheet. That should speed up the game and fix some graphical oddities. Mac and Windows graphics can now be swapped on the fly (i.e without restarting the game). That also removes any graphical limitation in the game.
- In the same way, PC graphics will now be drawn directly to the game gworld.
- You can't end the scenario via a special node if the party is dead anymore (prevent saving an "all dead" party)
- Added a safety check to monsters with Absorb Spells ability to prevent negative health.
- Jobs dialog reimplemented (not useable for now).
- 'Burma Shave' Easter Egg readded.
- Debug Mode : ghost mode implemented.

Classic Scenario Editor Beta 2 :

- Dumping functions won't change current town/outdoor section anymore.
- Finished porting the file IO functions to 32 bits.
- Added a rudimentary custom intro picture behavior : if the intro picture is set to 100, the first icon on the custom sheet will be displayed in the scenario selection menu. Scenario intro pics must be drawn on the same scale as talk icons.
- Whenever the “Place Random Items” function is used, the editor will inform the user that it could not place all items because the town item # limit has been reached, regardless of how many items are actually in the town. That has been fixed (the message now displays only if the max number of items is indeed reached).
- Cleaned the ressources (smaller executable).
- Added a Monster data dumping function (dumps all info about monsters : wandering/special enc/town monsters details ...)
- Added a Specials data dumping function (dumps all info about specials : number, types, variables, ...)
- Town Room/Outdoors Info rectangles are now initialized at ((-1,-1),(-1,-1)) freeing the 0 coordinate and fixing the "Rectangle X" description at (0,0) in the game.
- Cleanse Rectangle SDF1 info rewritten to match actual behavior (0 leave force/fire/webs/crate/barrel, 1 cleans all).
- Corrected the Do SFX Burst info text (1 - telep., 2 - elec.)
- When placing an item with a custom graphic in a town, the editor will display the graphic in the upper-left corner of the space it is placed on. Fixed
- If you edit a monster’s abilities and click Cancel, the ability of that monster will be removed. Fixed.
- If you edit a item's ability, all previously unsaved modifications are erased. Fixed.
- Disappearences of right scroll bar fixed.

Chokboyz

git-svn-id: http://openexile.googlecode.com/svn/trunk@104 4ebdad44-0ea0-11de-aab3-ff745001d230
2009-06-29 15:43:59 +00:00

860 lines
30 KiB
C++
Raw Blame History

#include <windows.h>
#include "global.h"
#include "gutils.h"
#include "text.h"
#include "fields.h"
#include "locutils.h"
#include "graphics.h"
#include "infodlgs.h"
#include "monster.h"
#include "dlogtool.h"
#include "exlsound.h"
#include "graphutl.h"
#include "stdio.h"
#include "globvar.h"
void draw_one_terrain_spot (short i,short j,short terrain_to_draw,short dest)
//short dest; // 0 - terrain gworld 1 - screen
// if terrain_to_draw is -1, do black
// if terrain_to_draw >= 10000, force to draw graphic which is terrain_to_draw - 10000
{
RECT where_draw;
RECT source_rect;
HBITMAP source_gworld;
short anim_type = 0;
location l;
HDC hdc;
HBITMAP store_bmp;
l.x = i; l.y = j;
if ((supressing_some_spaces == TRUE) &&
(same_point(l,ok_space[0]) == FALSE) &&
(same_point(l,ok_space[1]) == FALSE) &&
(same_point(l,ok_space[2]) == FALSE) &&
(same_point(l,ok_space[3]) == FALSE))
return;
where_draw = calc_rect(i,j);
OffsetRect(&where_draw,13,13);
if (terrain_to_draw == -1) {
if (terrain_there[i][j] == 300) {
return;
}
terrain_there[i][j] = 300;
hdc = CreateCompatibleDC(main_dc);
store_bmp = (HBITMAP) SelectObject(hdc,terrain_screen_gworld);
SelectObject(hdc,GetStockObject(BLACK_BRUSH));
Rectangle(hdc,where_draw.left,where_draw.top,where_draw.right,where_draw.bottom);
SelectObject(hdc,store_bmp);
if (!DeleteDC(hdc)) DebugQuit("Cannot release DC 24");
return;
}
if (terrain_to_draw >= 10000) { // force using a specific graphic
if (terrain_there[i][j] == terrain_to_draw - 10000)
return;
source_gworld = terrains_gworld[(terrain_to_draw -10000) / 50];
terrain_there[i][j] = terrain_to_draw - 10000;
source_rect = return_item_rect(terrain_to_draw - 10000);
anim_type = -1;
}
else if (terrain_pic[terrain_to_draw] >= 2000) { // animated custom
source_gworld = spec_scen_g;
source_rect = get_custom_rect(terrain_pic[terrain_to_draw] - 2000 + (anim_ticks % 4));
anim_type = 0;
terrain_there[i][j] = -1;
}
else if (terrain_pic[terrain_to_draw] >= 1000) { // custom
source_gworld = spec_scen_g;
source_rect = get_custom_rect(terrain_pic[terrain_to_draw] - 1000);
terrain_there[i][j] = -1;
}
else if (terrain_pic[terrain_to_draw] >= 400) { // animated
source_gworld = ter_anim_gworld;
source_rect = return_item_rect(terrain_pic[terrain_to_draw]);
terrain_there[i][j] = -1;
anim_type = 0;
}
else {
if (terrain_there[i][j] == terrain_pic[terrain_to_draw]) {
return;
}
terrain_there[i][j] = terrain_pic[terrain_to_draw];
source_gworld = terrains_gworld[(terrain_pic[terrain_to_draw]) / 50];
source_rect = return_item_rect(terrain_pic[terrain_to_draw]);
anim_type = -1;
}
if (anim_type >= 0)
{
if ((is_town()) || (is_out()))
anim_onscreen = TRUE;
}
if (dest == 0)
rect_draw_some_item(source_gworld, source_rect, terrain_screen_gworld, where_draw, (unsigned char) 0, 0);
else rect_draw_some_item(source_gworld, source_rect, terrain_screen_gworld, where_draw, (unsigned char) 0, 1);
}
void draw_monsters()
{
short i,j = 0,k;
short width,height;
RECT source_rect,to_rect;
location where_draw,store_loc;
HBITMAP source_gworld;
short picture_wanted;
unsigned char ter;
RECT monst_rects[4][4] = {{{0,0,28,36},{0,0,0,0},{0,0,0,0},{0,0,0,0}},
{{7,0,21,18},{7,18,21,36},{0,0,0,0},{0,0,0,0}},
{{0,9,14,27},{14,9,28,27},{0,0,0,0},{0,0,0,0}},
{{0,0,14,18},{14,0,28,18},{0,18,14,36},{14,18,28,36}}};
if (is_out())
for (i = 0; i < 10; i++)
if (party.out_c[i].exists == TRUE) {
if ((point_onscreen(party.p_loc, party.out_c[i].m_loc) == TRUE) &&
(can_see(party.p_loc, party.out_c[i].m_loc,0) < 5)) {
where_draw.x = party.out_c[i].m_loc.x - party.p_loc.x + 4;
where_draw.y = party.out_c[i].m_loc.y - party.p_loc.y + 4;
terrain_there[where_draw.x][where_draw.y] = -1;
j = 0;
while ((party.out_c[i].what_monst.monst[j] == 0) && (j < 7))
j++;
if (j == 7) party.out_c[i].exists = FALSE; // begin watch out
else picture_wanted = get_monst_picnum(party.out_c[i].what_monst.monst[j]);
// end watch out
if (party.out_c[i].exists == TRUE) {
get_monst_dims(party.out_c[i].what_monst.monst[j],&width,&height);
if (picture_wanted >= 1000) {
for (k = 0; k < width * height; k++) {
source_rect = get_custom_rect(picture_wanted % 1000 +
((party.out_c[i].direction < 4) ? 0 : (width * height)) + k);
to_rect = monst_rects[(width - 1) * 2 + height - 1][k];
rect_draw_some_item(spec_scen_g, source_rect, small_temp_gworld,to_rect, 0, 0);
source_rect = to_rect;
OffsetRect(&to_rect,13 + 28 * where_draw.x,13 + 36 * where_draw.y);
rect_draw_some_item(small_temp_gworld, source_rect, terrain_screen_gworld,to_rect, 1, 0);
}
}
if (picture_wanted < 1000) {
for (k = 0; k < width * height; k++) {
if (picture_wanted == 73 && k == 1){//drake special case (split on two sheets)
source_gworld = monsters_gworld[4];
source_rect = get_monster_template_rect(20,
(party.out_c[i].direction < 4) ? 0 : 1,0);
}
else if (picture_wanted == 101 && k == 1){//bear special case (split on two columns)
source_gworld = monsters_gworld[5];
source_rect = get_monster_template_rect(10,
(party.out_c[i].direction < 4) ? 0 : 1,0);
}
else{
source_gworld = monsters_gworld[m_pic_sheet[picture_wanted]];
source_rect = get_monster_template_rect(party.out_c[i].what_monst.monst[j],
(party.out_c[i].direction < 4) ? 0 : 1,k);
}
to_rect = monst_rects[(width - 1) * 2 + height - 1][k];
rect_draw_some_item(source_gworld, source_rect, small_temp_gworld,to_rect, 0, 0);
source_rect = to_rect;
OffsetRect(&to_rect,13 + 28 * where_draw.x,13 + 36 * where_draw.y);
rect_draw_some_item(small_temp_gworld, source_rect, terrain_screen_gworld,to_rect, 1, 0);
}
}
}
}
}
if (is_town())
for (i = 0; i < T_M; i++)
if ((c_town.monst.dudes[i].active != 0) && (c_town.monst.dudes[i].m_d.spec_skill != 11))
if (party_can_see_monst(i)) {
where_draw.x = c_town.monst.dudes[i].m_loc.x - center.x + 4;
where_draw.y = c_town.monst.dudes[i].m_loc.y - center.y + 4;
get_monst_dims(c_town.monst.dudes[i].number,&width,&height);
for (k = 0; k < width * height; k++) {
store_loc = where_draw;
store_loc.x += k % width;
store_loc.y += k / width;
// customize?
if (c_town.monst.dudes[i].m_d.picture_num >= 1000) {
source_rect = get_custom_rect((c_town.monst.dudes[i].m_d.picture_num % 1000) +
k + ((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : width * height)
+ ((combat_posing_monster == i + 100) ? (2 * width * height) : 0));
Draw_Some_Item(spec_scen_g, source_rect, terrain_screen_gworld, store_loc, 1, 0);
}
if (c_town.monst.dudes[i].m_d.picture_num < 1000) {
if (c_town.monst.dudes[i].m_d.picture_num == 73 && k == 1){//drake special case (split on two sheets)
source_gworld = monsters_gworld[4];
source_rect = get_monster_template_rect(20,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0),0);
}
else if (c_town.monst.dudes[i].m_d.picture_num == 101 && k == 1){//bear special case (split on two columns)
source_gworld = monsters_gworld[5];
source_rect = get_monster_template_rect(10,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0),0);
}
else{
source_gworld = monsters_gworld[m_pic_sheet[c_town.monst.dudes[i].m_d.picture_num]];
source_rect = get_monster_template_rect(c_town.monst.dudes[i].number,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0),k);
}
ter = t_d.terrain[c_town.monst.dudes[i].m_loc.x][c_town.monst.dudes[i].m_loc.y];
// in bed?
if ((store_loc.x >= 0) && (store_loc.x < 9) && (store_loc.y >= 0) && (store_loc.y < 9) &&
(scenario.ter_types[ter].picture == 143) &&
((c_town.monst.dudes[i].m_d.m_type < 7)
&& (c_town.monst.dudes[i].m_d.m_type != 1) && (c_town.monst.dudes[i].m_d.m_type != 2))
&& ((c_town.monst.dudes[i].active == 1) || (monst_target[i] == 6)) &&
(width == 1) && (height == 1)) ////
draw_one_terrain_spot((short) where_draw.x,(short) where_draw.y,10230,0);
else Draw_Some_Item(source_gworld, source_rect, terrain_screen_gworld, store_loc, 1, 0);
}
}
}
if (is_combat()) {
for (i = 0; i < T_M; i++)
if ((c_town.monst.dudes[i].active != 0) && (c_town.monst.dudes[i].m_d.spec_skill != 11))
if ((point_onscreen(center,c_town.monst.dudes[i].m_loc) == TRUE) && (party_can_see_monst(i) == TRUE)) {
where_draw.x = c_town.monst.dudes[i].m_loc.x - center.x + 4;
where_draw.y = c_town.monst.dudes[i].m_loc.y - center.y + 4;
get_monst_dims(c_town.monst.dudes[i].number,&width,&height);
for (k = 0; k < width * height; k++) {
store_loc = where_draw;
store_loc.x += k % width;
store_loc.y += k / width;
// customize?
if (c_town.monst.dudes[i].m_d.picture_num >= 1000) {
source_rect = get_custom_rect((c_town.monst.dudes[i].m_d.picture_num % 1000) +
k + ((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : width * height)
+ ((combat_posing_monster == i + 100) ? (2 * width * height) : 0));
Draw_Some_Item(spec_scen_g, source_rect, terrain_screen_gworld, store_loc, 1, 0);
}
if (c_town.monst.dudes[i].m_d.picture_num < 1000) {
if (c_town.monst.dudes[i].m_d.picture_num == 73 && k == 1){//drake special case (split on two sheets)
source_gworld = monsters_gworld[4];
source_rect = get_monster_template_rect(20,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0),0);
}
else if (c_town.monst.dudes[i].m_d.picture_num == 101 && k == 1){//bear special case (split on two columns)
source_gworld = monsters_gworld[5];
source_rect = get_monster_template_rect(10,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0),0);
}
else{
source_gworld = monsters_gworld[m_pic_sheet[c_town.monst.dudes[i].m_d.picture_num]];
source_rect = get_monster_template_rect(c_town.monst.dudes[i].number,
((c_town.monst.dudes[i].m_d.direction < 4) ? 0 : 1) + ((combat_posing_monster == i + 100) ? 10 : 0)
,k);
}
ter = t_d.terrain[c_town.monst.dudes[i].m_loc.x][c_town.monst.dudes[i].m_loc.y];
if ((store_loc.x >= 0) && (store_loc.x < 9) && (store_loc.y >= 0) && (store_loc.y < 9) &&
(scenario.ter_types[ter].picture == 143) &&
((c_town.monst.dudes[i].m_d.m_type < 7)
&& (c_town.monst.dudes[i].m_d.m_type != 1) && (c_town.monst.dudes[i].m_d.m_type != 2))
&& ((c_town.monst.dudes[i].active == 1) || (monst_target[i] == 6)) &&
(width == 1) && (height == 1))
draw_one_terrain_spot((short) where_draw.x,(short) where_draw.y,10230,0); ////
else Draw_Some_Item(source_gworld, source_rect, terrain_screen_gworld, store_loc, 1, 0);
}
}
}
}
}
void draw_pcs(location center,short mode)
//short mode; // 0 - put pcs in gworld 1 - only rectangle around active pc
{
short i;
RECT source_rect;
location where_draw;
if (party_toast() == TRUE) return; // is party dead
if (can_draw_pcs == FALSE) return;
for (i = 0; i < NUM_OF_PCS; i++)
if (adven[i].isAlive())
if ((point_onscreen(center, pc_pos[i]) == TRUE) &&
(party_can_see(pc_pos[i]) < 6)){
where_draw.x = pc_pos[i].x - center.x + 4;
where_draw.y = pc_pos[i].y - center.y + 4;
source_rect = get_party_template_rect(i,(pc_dir[i] < 4) ? 0 : 1);
if (combat_posing_monster == i)
OffsetRect(&source_rect,280,0);
if (mode == 0)
Draw_Some_Item(pcs_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
if ((current_pc == i) && (mode == 1) && (monsters_going == FALSE))
frame_space(pc_pos[current_pc],1,1,1);
}
if (current_pc == INVALID_PC) return;
// Draw current pc on top
if ((current_pc < 6) && ((point_onscreen(center, pc_pos[current_pc])) == TRUE) && (adven[current_pc].isAlive())) {
where_draw.x = pc_pos[current_pc].x - center.x + 4;
where_draw.y = pc_pos[current_pc].y - center.y + 4;
source_rect = get_party_template_rect(current_pc,(pc_dir[current_pc] < 4) ? 0 : 1);
if (combat_posing_monster == current_pc)
OffsetRect(&source_rect,280,0);
if (mode == 0)
Draw_Some_Item(pcs_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
}
}
void draw_items()
{
short i;
RECT source_rect,dest_rect;
location where_draw;
for (i = 0; i < NUM_TOWN_ITEMS; i++) {
if (t_i.items[i].variety != 0) {
where_draw.x = t_i.items[i].item_loc.x - center.x + 4;
where_draw.y = t_i.items[i].item_loc.y - center.y + 4;
if ((supressing_some_spaces == TRUE) &&
(same_point(where_draw,ok_space[0]) == FALSE) &&
(same_point(where_draw,ok_space[1]) == FALSE) &&
(same_point(where_draw,ok_space[2]) == FALSE) &&
(same_point(where_draw,ok_space[3]) == FALSE))
;
else if ((point_onscreen(center, t_i.items[i].item_loc) == TRUE) &&
(t_i.items[i].isContained() == false) && (party_can_see(t_i.items[i].item_loc) < 6)) {
if (t_i.items[i].graphic_num >= 150) {
source_rect = get_custom_rect(t_i.items[i].graphic_num - 150);
dest_rect = coord_to_rect(where_draw.x,where_draw.y);
terrain_there[where_draw.x][where_draw.y] = -1;
rect_draw_some_item(spec_scen_g,
source_rect, terrain_screen_gworld, dest_rect, 1, 0);
}
else {
source_rect = get_item_template_rect(t_i.items[i].graphic_num);
dest_rect = coord_to_rect(where_draw.x,where_draw.y);
terrain_there[where_draw.x][where_draw.y] = -1;
if (t_i.items[i].graphic_num >= 45) {
dest_rect.top += 9;
dest_rect.bottom -= 9;
dest_rect.left += 5;
dest_rect.right -= 5;
}
rect_draw_some_item((t_i.items[i].graphic_num < 45) ? items_gworld : tiny_obj_gworld,
source_rect, terrain_screen_gworld, dest_rect, 1, 0);
}
}
}
}
}
void draw_outd_boats(location center)
{
location where_draw;
RECT source_rect;
short i;
for (i = 0; i < 30; i++)
if ((point_onscreen(center, party.boats[i].boat_loc) == TRUE) && (party.boats[i].exists == TRUE) &&
(party.boats[i].which_town == INVALID_TOWN) &&
(can_see(center, party.boats[i].boat_loc,0) < 5) && (party.in_boat != i)) {
where_draw.x = party.boats[i].boat_loc.x - center.x + 4;
where_draw.y = party.boats[i].boat_loc.y - center.y + 4;
source_rect = boat_rects[0];
OffsetRect(&source_rect,61,0);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
}
for (i = 0; i < 30; i++)
if ((point_onscreen(center, party.horses[i].horse_loc) == TRUE) && (party.horses[i].exists == TRUE) &&
(party.horses[i].which_town == INVALID_TOWN) &&
(can_see(center, party.horses[i].horse_loc,0) < 5) && (party.in_horse != i)) {
where_draw.x = party.horses[i].horse_loc.x - center.x + 4;
where_draw.y = party.horses[i].horse_loc.y - center.y + 4;
source_rect = boat_rects[0];
OffsetRect(&source_rect,61,0);
OffsetRect(&source_rect,0,74);
OffsetRect(&source_rect,56,36);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
}
}
void draw_town_boat(location center)
{
location where_draw;
RECT source_rect;
short i;
for (i = 0; i < 30; i++)
if ((party.boats[i].which_town == c_town.town_num) &&
((point_onscreen(center, party.boats[i].boat_loc) == TRUE) &&
(can_see(center, party.boats[i].boat_loc,0) < 5) && (party.in_boat != i)
&& (pt_in_light(center,party.boats[i].boat_loc) == TRUE))) {
where_draw.x = party.boats[i].boat_loc.x - center.x + 4;
where_draw.y = party.boats[i].boat_loc.y - center.y + 4;
source_rect = boat_rects[0];
OffsetRect(&source_rect,61,0);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
}
for (i = 0; i < 30; i++)
if ((party.horses[i].which_town == c_town.town_num) &&
((point_onscreen(center, party.horses[i].horse_loc) == TRUE) &&
(can_see(center, party.horses[i].horse_loc,0) < 5) && (party.in_horse != i)
&& (pt_in_light(center,party.horses[i].horse_loc) == TRUE))) {
where_draw.x = party.horses[i].horse_loc.x - center.x + 4;
where_draw.y = party.horses[i].horse_loc.y - center.y + 4;
source_rect = boat_rects[0];
OffsetRect(&source_rect,61,0);
OffsetRect(&source_rect,0,74);
OffsetRect(&source_rect,56,36);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, where_draw, 1, 0);
}
}
void draw_sfx()
{
short q,r,i,flag;
location where_draw,loc;
RECT orig_rect = {0,0,28,36},source_rect;
if (PSD[306][2] > 0)
return;
for (q = 0; q < 9; q++)
for (r = 0; r < 9; r++)
{
where_draw = center;where_draw.x += q - 4;where_draw.y += r - 4;
if ((where_draw.x < 0) || (where_draw.x > town_size[town_type] - 1)
|| (where_draw.y < 0) || (where_draw.y > town_size[town_type] - 1))
;
else if (sfx[where_draw.x][where_draw.y] != 0) {
for (i = 0; i < 8; i++) {
flag = s_pow(2,i);
if (sfx[where_draw.x][where_draw.y] & flag)
if (spot_seen[q][r] > 0) {
loc.x = q; loc.y = r;
source_rect = orig_rect;
OffsetRect(&source_rect,28 * i,36 * 3);
Draw_Some_Item(fields_gworld,source_rect,terrain_screen_gworld,loc,
1,0);
}
}
}
}
}
void draw_one_field(unsigned char flag,short source_x,short source_y)
{
short q,r;
location where_draw,loc;
RECT orig_rect = {0,0,28,36},source_rect;
for (q = 0; q < 9; q++)
for (r = 0; r < 9; r++)
{
where_draw = center;where_draw.x += q - 4;where_draw.y += r - 4;
if ((where_draw.x < 0) || (where_draw.x > town_size[town_type] - 1)
|| (where_draw.y < 0) || (where_draw.y > town_size[town_type] - 1))
;
else {
if (misc_i[where_draw.x][where_draw.y] & flag)
if (spot_seen[q][r] > 0) {
loc.x = q; loc.y = r;
source_rect = orig_rect;
OffsetRect(&source_rect,28 * source_x,36 * source_y);
Draw_Some_Item(fields_gworld,source_rect,terrain_screen_gworld,loc,
1,0);
if ((is_town()) && ((flag == 32) || (flag == 64)))
anim_onscreen = TRUE;
}
}
}
}
void draw_one_spec_item(unsigned char flag,short source_x,short source_y)
{
short q,r;
location where_draw,loc;
RECT orig_rect = {0,0,28,36},source_rect;
for (q = 0; q < 9; q++)
for (r = 0; r < 9; r++)
{
where_draw = center;where_draw.x += q - 4;where_draw.y += r - 4;
if ((where_draw.x < 0) || (where_draw.x > town_size[town_type] - 1)
|| (where_draw.y < 0) || (where_draw.y > town_size[town_type] - 1))
;
else {
if (c_town.explored[where_draw.x][where_draw.y] & flag)
if (spot_seen[q][r] > 0) {
loc.x = q; loc.y = r;
source_rect = orig_rect;
OffsetRect(&source_rect,28 * source_x,36 * source_y);
Draw_Some_Item(fields_gworld,source_rect,terrain_screen_gworld,loc,
1,0);
}
}
}
}
void draw_party_symbol(location center)
{
RECT source_rect;
location target = location(4,4);
short i = 0;
short dir_array[8] = {0,3,3,3,2,1,1,1};
if (can_draw_pcs == FALSE) return;
if (party_toast() == TRUE) return;
if ((is_town()) && (c_town.p_loc.x > 70)) return;
if (overall_mode == 36)
{
target.x += c_town.p_loc.x - center.x;
target.y += c_town.p_loc.y - center.y;
}
if ((party.in_boat < 0) && (party.in_horse < 0)) {
i = first_active_pc();
source_rect = get_party_template_rect(i,(party.direction < 4) ? 0 : 1);
// now wedge in bed graphic
if ((is_town()) && (scenario.ter_types[t_d.terrain[c_town.p_loc.x][c_town.p_loc.y]].picture == 143))
draw_one_terrain_spot((short) target.x,(short) target.y,10230,0);
else Draw_Some_Item(pcs_gworld, source_rect, terrain_screen_gworld, target, 1, 0);
}
else if (party.in_boat >= 0) {
source_rect = boat_rects[dir_array[party.direction]];
OffsetRect(&source_rect,61,0);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, target, 1, 0);
}
else {
source_rect = boat_rects[(party.direction < 4) ? 0 : 1];
OffsetRect(&source_rect,61,0);
OffsetRect(&source_rect,0,74);
Draw_Some_Item(mixed_gworld, source_rect, terrain_screen_gworld, target, 1, 0);
}
}
RECT return_item_rect(short wanted)
{
RECT orig_rect = {0,0,28,36};
short ter;
if (wanted >= 400) {
ter = wanted - 400;
OffsetRect(&orig_rect, 112 * (ter / 5) + 28 * (anim_ticks % 4), 36 * (ter % 5));
return orig_rect;
}
else{
ter = wanted % 50;
OffsetRect(&orig_rect,28 * (ter % 10),36 * (ter / 10));
return orig_rect;
}
}
// Give the position of the monster graphic in the template in memory
RECT get_monster_template_rect (unsigned char type_wanted,short mode,short which_part)
//mode; // 0 - left 1 - right +10 - combat mode
{
RECT store_rect = {0,0,28,36};
short picture_wanted;
// short adj = 0;
// if (mode >= 10) {adj = 2000; mode -= 10;}
picture_wanted = get_monst_picnum(type_wanted);
if (picture_wanted >= 1000)
return store_rect;
picture_wanted = m_pic_index[picture_wanted];// + which_part;
picture_wanted = picture_wanted % 20;
if(mode >= 10)
OffsetRect(&store_rect, 112 + 56 * (picture_wanted / 10) + 28 * (mode-10), 36 * ((picture_wanted % 10) + which_part));
else
OffsetRect(&store_rect, 56 * (picture_wanted / 10) + 28 * mode, 36 * ((picture_wanted % 10)+ which_part));
return store_rect;
}
// Returns rect for drawing an item, if num < 25, rect is in big item template,
// otherwise in small item template
RECT get_item_template_rect (short type_wanted)
{
RECT store_rect;
if (type_wanted < 45) {
store_rect.top = (type_wanted / 5) * BITMAP_HEIGHT;
store_rect.bottom = store_rect.top + BITMAP_HEIGHT;
store_rect.left = (type_wanted % 5) * BITMAP_WIDTH;
store_rect.right = store_rect.left + BITMAP_WIDTH;
}
else {
store_rect.top = (type_wanted / 10) * 18;
store_rect.bottom = store_rect.top + 18;
store_rect.left = (type_wanted % 10) * 18;
store_rect.right = store_rect.left + 18;
}
return store_rect;
}
unsigned char get_t_t(int x, int y) // returns terrain type at where
{
if (is_out())
return out[x][y];
else if (is_town())
return t_d.terrain[x][y];
else return combat_terrain[x][y];
}
// Is this is subterranean fluid that gets shore plopped down on it?
Boolean is_fluid(unsigned char ter_type)////
{
if (((ter_type >= 71) && (ter_type <= 76)) || (ter_type == 90))
return TRUE;
return FALSE;
}
// Is this is subterranean beach that gets shore plopped down next to it?
Boolean is_shore(unsigned char ter_type)////
{
if (is_fluid(ter_type) == TRUE) return FALSE;
if (ter_type == 77) return FALSE;
if (ter_type == 90) return FALSE;
return TRUE;
}
// These two functions used to determine wall round-cornering
Boolean is_wall(unsigned char ter_type)////
{
short pic = scenario.ter_types[ter_type].picture;
if ((pic >= 88) && (pic <= 120))
return TRUE;
return FALSE;
}
Boolean is_ground(unsigned char ter_type)
{
short pic = scenario.ter_types[ter_type].picture;
if ((pic >= 0) && (pic <= 87)) return TRUE;
if ((pic >= 121) && (pic <= 122)) return TRUE;
if ((pic >= 179) && (pic <= 208)) return TRUE;
if ((pic >= 211) && (pic <= 212)) return TRUE;
if ((pic >= 215) && (pic <= 245)) return TRUE;
return FALSE;
}
void make_town_trim(short mode)
//mode; // 0 - town 1 - outdoor combat
{
short store_mode;
store_mode = overall_mode;
overall_mode = (mode == MODE_OUTDOORS) ? 1 : 10;
for (int x = 0; x < town_size[town_type]; x++)
for (int y = 0; y < town_size[town_type]; y++)
town_trim[x][y] = add_trim_to_array(x, y,
(mode == 0) ? t_d.terrain[x][y] : combat_terrain[x][y]);
for (int x = 0; x < town_size[town_type]; x++)
for (int y = 0; y < town_size[town_type]; y++)
{
if (town_trim[x][y] & 1) town_trim[x][y] &= 125;
if (town_trim[x][y] & 4) town_trim[x][y] &= 245;
if (town_trim[x][y] & 10) town_trim[x][y] &= 215;
if (town_trim[x][y] & 64) town_trim[x][y] &= 95;
}
overall_mode = store_mode;
}
void make_out_trim()
{
short store_mode;
store_mode = overall_mode;
overall_mode = MODE_OUTDOORS;
for (int x = 0; x < 96; x++)
for (int y = 0; y < 96; y++)
out_trim[x][y] = add_trim_to_array(x, y, out[x][y]);
for (int x = 0; x < 96; x++)
for (int y = 0; y < 96; y++)
{
if (out_trim[x][y] & 1) out_trim[x][y] &= 125;
if (out_trim[x][y] & 4) out_trim[x][y] &= 245;
if (out_trim[x][y] & 10) out_trim[x][y] &= 215;
if (out_trim[x][y] & 64) out_trim[x][y] &= 95;
}
overall_mode = store_mode;
}
/* fixup */
char add_trim_to_array(location where,unsigned char ter_type)
{
return add_trim_to_array(where.x, where.y, ter_type);
}
char add_trim_to_array(int x, int y, unsigned char ter_type)
{
Boolean at_top = FALSE,at_bot = FALSE,at_left = FALSE,at_right = FALSE;
unsigned char store;
char to_return = 0;
if (x == 0) at_left = TRUE;
if (y == 0) at_top = TRUE;
if ((overall_mode == MODE_OUTDOORS) || (overall_mode == 35))
{
if (x == 95) at_right = TRUE;
if (y == 95) at_bot = TRUE;
}
else
{
if (x == town_size[town_type] - 1) at_right = TRUE;
if (y == town_size[town_type] - 1) at_bot = TRUE;
}
// Set up trim for fluids
if (is_fluid(ter_type) == TRUE) {
if (at_left == FALSE) {
store = get_t_t(x - 1,y);
if (is_shore(store) == TRUE) to_return |= 64;
}
if (at_right == FALSE) {
store = get_t_t(x + 1,y);
if (is_shore(store) == TRUE) to_return |= 4;
}
if (at_top == FALSE) {
store = get_t_t(x,y - 1);
if (is_shore(store) == TRUE) to_return |= 1;
}
if (at_bot == FALSE) {
store = get_t_t(x,y + 1);
if (is_shore(store) == TRUE) to_return |= 16;
}
if ((at_left == FALSE) && (at_top == FALSE)) {
store = get_t_t(x - 1,y - 1);
if (is_shore(store) == TRUE) to_return |= 128;
}
if ((at_right == FALSE) && (at_top == FALSE)) {
store = get_t_t(x + 1,y + 1);
if (is_shore(store) == TRUE) to_return |= 8;
}
if ((at_right == FALSE) && (at_bot == FALSE)) {
store = get_t_t(x + 1,y - 1);
if (is_shore(store) == TRUE) to_return |= 2;
}
if ((at_left == FALSE) && (at_bot == FALSE)) {
store = get_t_t(x - 1,y + 1);
if (is_shore(store) == TRUE) to_return |= 32;
}
}
return to_return;
}
/* this is NOT the same as PtInRect() function */
Boolean pt_in_rect(location loc, RECT16 rect)
{
if ((loc.x >= rect.left) && (loc.x <= rect.right) && (loc.y >= rect.top) && (loc.y <= rect.bottom))
return TRUE;
return FALSE;
}
// Time for some chicanery
// The how to item for monsters will be 599
// item 600 + i will mean monster i.
void adjust_monst_menu()
{
short i,monst_pos = 0;
char monst_name[256];
HMENU menu,big_menu;
short total_added = 0;
if (in_startup_mode == TRUE)
return;
big_menu = GetMenu(mainPtr);
menu = GetSubMenu(big_menu,5);
if (menu == NULL)
return;
for (i = 0; i < 256; i++)
on_monst_menu[i] = -1;
for (i = 1; i < 256; i++)
if ((i == 1) || (party.m_seen[i] > 0)) {
on_monst_menu[monst_pos] = i;
monst_pos++;
}
for (i = 0; i < 256; i++)
DeleteMenu(menu,600 + i,MF_BYCOMMAND);
for (i = 0; i < 256; i++)
if (on_monst_menu[i] >= 0) {
//GetIndString(monst_name, 2,on_monst_menu[i]);
sprintf((char *) monst_name,"%s",scen_item_list->monst_names[on_monst_menu[i]]); if ((total_added % 24 == 0) && (total_added > 0))
InsertMenu(menu,599,MF_MENUBREAK | MF_BYCOMMAND | MF_ENABLED | MF_STRING, 600 + i, monst_name);
else InsertMenu(menu,599,MF_BYCOMMAND | MF_ENABLED | MF_STRING, 600 + i, monst_name);
total_added++;
}
}
void frame_space(location where,short mode,short width,short height)
//mode; // 0 - red 1 - green
{
location where_put;
RECT to_frame;
HDC hdc;
HPEN hpen,old_pen;
COLORREF x[3] = {RGB(200,0,0),RGB(102,255,0),RGB(200,0,200)};//RGB(204,204,204);
if (point_onscreen(center,where) == FALSE)
return;
where_put.x = 4 + where.x - center.x;
where_put.y = 4 + where.y - center.y;
to_frame.top = 18 + where_put.y * 36;
to_frame.left = 18 + where_put.x * 28;
to_frame.bottom = 54 + where_put.y * 36 + 36 * (height - 1);
to_frame.right = 46 + where_put.x * 28 + 28 * (width - 1);
hdc = GetDC(mainPtr);
SetViewportOrgEx(hdc,ulx,uly,NULL);
hpen = CreatePen(PS_SOLID,1,x[mode]);
old_pen = (HPEN) SelectObject(hdc,hpen);
MoveToEx(hdc,to_frame.left,to_frame.top, NULL);
LineTo(hdc,to_frame.right,to_frame.top);
LineTo(hdc,to_frame.right,to_frame.bottom);
LineTo(hdc,to_frame.left,to_frame.bottom);
LineTo(hdc,to_frame.left,to_frame.top);
SelectObject(hdc,old_pen);
ReleaseDC(mainPtr,hdc);
DeleteObject(hpen);
}
Reference in New Issue View Git Blame Copy Permalink