#include #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" extern HWND mainPtr; extern RECT windRect; extern short stat_window,give_delays,overall_mode; extern short current_spell_range,town_type; extern Boolean in_startup_mode,anim_onscreen,registered,play_sounds,frills_on,startup_loaded,cartoon_happening; extern short town_size[3]; extern party_record_type far party; extern piles_of_stuff_dumping_type *data_store; extern piles_of_stuff_dumping_type2 *data_store2; extern talking_record_type far talking; extern scenario_data_type far scenario; extern pc_record_type far adven[6]; extern big_tr_type far t_d; extern outdoor_record_type far outdoors[2][2]; extern current_town_type far c_town; extern town_item_list far t_i; extern unsigned char far out[96][96]; extern unsigned char far out_e[96][96]; extern unsigned char far combat_terrain[64][64]; extern effect_pat_type current_pat; extern Boolean web,crate,barrel,fire_barrier,force_barrier,quickfire,force_wall,fire_wall,antimagic,scloud,ice_wall,blade_wall; extern Boolean sleep_field; extern unsigned char far misc_i[64][64],sfx[64][64]; extern short on_monst_menu[256]; extern HWND modeless_dialogs[18]; extern short monst_target[T_M]; // 0-5 target that pc 6 - no target 100 + x - target monster x extern short combat_posing_monster , current_working_monster ; // 0-5 PC 100 + x - monster x extern Boolean cat,cow,chicken,dog,sheep; extern HBITMAP storage_gworld,terrain_screen_gworld,party_template_gworld,items_gworld,tiny_obj_gworld; extern HBITMAP fields_gworld,mixed_gworld,small_temp_gworld,spec_scen_g; extern short far which_g_stored[STORED_GRAPHICS]; extern short far wish_list[STORED_GRAPHICS]; extern short far storage_status[STORED_GRAPHICS]; // 0 - empty 1 - in use 2 - there, not in use extern short terrain_there[9][9]; extern short ulx,uly; extern location pc_pos[6],center; extern short which_combat_type,pc_dir[6],current_pc; extern Boolean monsters_going,anim_onscreen; extern short pc_moves[6]; extern short num_targets_left; extern location spell_targets[8]; extern short display_mode; extern long anim_ticks; extern short far terrain_pic[256]; extern char spot_seen[9][9]; extern char far out_trim[96][96]; extern char far town_trim[64][64]; extern short monster_index[21]; extern Boolean supressing_some_spaces; extern location ok_space[4]; extern Boolean can_draw_pcs; extern HPALETTE hpal; extern far PALETTEENTRY ape[256]; extern HDC main_dc,main_dc2,main_dc3; extern HFONT font,small_bold_font,italic_font,underline_font,bold_font; RECT boat_rects[4] = {{0,0,28,36}, {28,0,56,36},{56,0,84,36},{84,0,112,36}}; /**/ Boolean gave_no_g_error = FALSE; unsigned char m_pic_index[200] = {//// 1,2,3,4,5,6,7,8,9,10, 11,12,13,14,15,16,17,18,19,20, 21,22,23,24,25, 26,27,28,29,30, 31,32,33,34,35, 36,37,38,39,40, 41,42,43,44,46,47,48,49,50,51, 53,55,57,59,60,61,62,63,64,65, 66,67,68,69,70, 71,72,73,74,75, 76,77,78,79,81, 82,83,85,86,87, 88,89,90,91,92, 93,94,95,96,97, 98,99,100,101,102, 103,104,105,106,107, 108,109,111,112,113, 114,116,117,118,119, //100 120,122,123,125,127, 128,129,130,131,135, 136,137,139,140,141,142,143,144,145,146, 147,148,149,150,151,152,152,154,155,159, 160,164,166,168,170,171,172,173,174,175, 176,177,178,179,180,181,182,183,184,185, 186,187,188,189,190,191,192,193,194,195, 196,197,198,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0}; unsigned char m_pic_index_x[200] = { 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,2,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,2,1,1,1,2,1,1,1,1, // 100 2,1,1,1,1,1,1,1,2,1, 1,2,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,2,1, 2,2,2,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1}; unsigned char m_pic_index_y[200] = { 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,2, 2,2,2,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,2,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,2,2,1,1,1,1,2,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,2,1, 2,1,1,2,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1}; 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 >= 1000, force to draw graphic which is terrain_to_draw - 1000 { RECT where_draw; RECT source_rect; RECT anim_rects[4] = {{0,0,28,36},{28,0,56,36},{56,0,84,36},{84,0,112,36}}; /**/ HBITMAP ter_source_gworld,source_gworld; short anim_type = 0; location l; HDC hdc; HBITMAP store_bmp; source_gworld = storage_gworld; 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 ((cartoon_happening == FALSE) && (terrain_there[i][j] == 300)) { return; } terrain_there[i][j] = 300; hdc = CreateCompatibleDC(main_dc); store_bmp = 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); DeleteObject(hdc); return; } if (terrain_to_draw >= 10000) { // force using a specific graphic if (terrain_there[i][j] == terrain_to_draw - 10000) return; 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) { // 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_rect = return_item_rect(terrain_pic[terrain_to_draw] + 600 + 100 * (anim_ticks % 4)); terrain_there[i][j] = -1; anim_type = 0; } else { if (cartoon_happening == FALSE) { if (terrain_there[i][j] == terrain_pic[terrain_to_draw]) { return; } terrain_there[i][j] = terrain_pic[terrain_to_draw]; } 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,l; short width,height; RECT source_rect,to_rect; location where_draw,store_loc; char debug[60]; 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); } //source_rect = to_rect = monst_rects[0][0]; //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++) { 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(storage_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); } //source_rect = to_rect = monst_rects[0][0]; //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)) { check_if_monst_seen(c_town.monst.dudes[i].number); 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) { 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(storage_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) && (cartoon_happening == TRUE)) || (party_can_see_monst(i) == TRUE)) { check_if_monst_seen(c_town.monst.dudes[i].number); 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) { 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(storage_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,active_pc_rect; location where_draw; if (party_toast() == TRUE) return; if (can_draw_pcs == FALSE) return; if ((mode == 1) && (cartoon_happening == TRUE)) return; for (i = 0; i < 6; i++) if (adven[i].main_status == 1) if (((point_onscreen(center, pc_pos[i])) == TRUE) && ((cartoon_happening == 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,0,108); if (mode == 0) { Draw_Some_Item(party_template_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 == 6) { return; } // Draw current pc on top if ((current_pc < 6) && ((point_onscreen(center, pc_pos[current_pc])) == TRUE) && (adven[current_pc].main_status == 1)) { 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,0,108); if (mode == 0) Draw_Some_Item(party_template_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) && (is_contained(t_i.items[i]) == FALSE) && ((cartoon_happening == TRUE) || (party_can_see(t_i.items[i].item_loc) < 6))) { // safety valve //if ((t_i.items[i].graphic_num < 0) || // ((t_i.items[i].graphic_num >= NUM_ITEM_G) && (t_i.items[i].graphic_num < 1000))) { // t_i.items[i].variety = 0; // t_i.items[i].graphic_num = 0; // } 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 == 200) && (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 == 200) && (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_fields() { if (crate == TRUE) draw_one_field(8,6,0); if (barrel == TRUE) draw_one_field(16,7,0); if (web == TRUE) draw_one_field(4,5,0); if (quickfire == TRUE) draw_one_field(128,7,1); if (fire_barrier == TRUE) draw_one_field(32,anim_ticks % 4,2); if (force_barrier == TRUE) draw_one_field(64,anim_ticks % 4,2); } void draw_spec_items() { if (force_wall == TRUE) draw_one_spec_item(2,0,1); if (fire_wall == TRUE) draw_one_spec_item(4,1,1); if (antimagic == TRUE) draw_one_spec_item(8,2,1); if (scloud == TRUE) draw_one_spec_item(16,3,1); if (ice_wall == TRUE) draw_one_spec_item(32,4,1); if (blade_wall == TRUE) draw_one_spec_item(64,5,1); if (sleep_field == TRUE) draw_one_spec_item(128,6,1); } 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(short mode,location center) // mode currently unused { RECT source_rect; location target = {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(party_template_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); } } /* Input terrain currently trying to draw. Get back Rect in terrain template containing desired pixmap, or Rect to darkness if desired map not present */ RECT get_terrain_template_rect (unsigned char type_wanted) { RECT store_rect; short i,j; short picture_wanted; picture_wanted = terrain_pic[type_wanted]; if (picture_wanted >= 400) return return_item_rect(picture_wanted + 700); return return_item_rect(picture_wanted); } RECT return_item_rect(short wanted) { RECT orig_rect = {0,0,28,36}; short i; if (wanted < 50) { OffsetRect(&orig_rect,28 * (wanted % 10),36 * (wanted / 10)); return orig_rect; } for (i = 50; i < STORED_GRAPHICS; i++) if (which_g_stored[i] == wanted) { OffsetRect(&orig_rect,28 * (i % 10),36 * (i / 10)); return orig_rect; } // oops it's not here. better try to add it. add_one_graphic(wanted); for (i = 50; i < STORED_GRAPHICS; i++) if (which_g_stored[i] == wanted) { OffsetRect(&orig_rect,28 * (i % 10),36 * (i / 10)); return orig_rect; } // oh well. if (gave_no_g_error == FALSE) { give_error("Blades of Exile doesn't have enough memory to show all the graphics needed. Some things may look like cave floor. The game can still be played safely - restarting isn't necessary.","",0); gave_no_g_error = TRUE; } return orig_rect; } // Give the position of the monster graphic in the picture resource // Will store monsters the same in Exile's II and III RECT get_monster_rect (unsigned char type_wanted,short mode) //short mode; // 0 - left 1 - right 2 - both { RECT store_rect; short i; i = (short) type_wanted; i = i % 20; store_rect.top = 0 + BITMAP_HEIGHT * (i % 10) ; store_rect.bottom = store_rect.top + BITMAP_HEIGHT; store_rect.left = 0 + (i / 10) * BITMAP_WIDTH * 2 + ((mode != 1) ? 0 : 28); store_rect.right = store_rect.left + BITMAP_WIDTH * ((mode == 2) ? 2 : 1); return store_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 i,j; 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; return return_item_rect(300 + picture_wanted + (300 * mode) + adj); } // 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(char x,char 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; /* if (ter_type == 240) return FALSE; if ((ter_type >= 117) && (ter_type <= 131)) return FALSE; if ((ter_type >= 193) && (ter_type <= 207)) return FALSE; */ return TRUE; } // These two functions used to determine wall round-cornering Boolean is_wall(unsigned char ter_type)//// { short pic; 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; 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 <= 246)) return TRUE; return FALSE; } void make_town_trim(short mode) //mode; // 0 - town 1 - outdoor combat { location where; short store_mode; store_mode = overall_mode; overall_mode = (mode == 0) ? 1 : 10; for (where.x = 0; where.x < town_size[town_type]; where.x++) for (where.y = 0; where.y < town_size[town_type]; where.y++) town_trim[where.x][where.y] = add_trim_to_array(where, (mode == 0) ? t_d.terrain[where.x][where.y] : combat_terrain[where.x][where.y]); for (where.x = 0; where.x < town_size[town_type]; where.x++) for (where.y = 0; where.y < town_size[town_type]; where.y++) { if (town_trim[where.x][where.y] & 1) town_trim[where.x][where.y] &= 125; if (town_trim[where.x][where.y] & 4) town_trim[where.x][where.y] &= 245; if (town_trim[where.x][where.y] & 10) town_trim[where.x][where.y] &= 215; if (town_trim[where.x][where.y] & 64) town_trim[where.x][where.y] &= 95; } overall_mode = store_mode; } void make_out_trim() { location where; short store_mode; store_mode = overall_mode; overall_mode = 0; for (where.x = 0; where.x < 96; where.x++) for (where.y = 0; where.y < 96; where.y++) out_trim[where.x][where.y] = add_trim_to_array(where,out[where.x][where.y]); for (where.x = 0; where.x < 96; where.x++) for (where.y = 0; where.y < 96; where.y++) { if (out_trim[where.x][where.y] & 1) out_trim[where.x][where.y] &= 125; if (out_trim[where.x][where.y] & 4) out_trim[where.x][where.y] &= 245; if (out_trim[where.x][where.y] & 10) out_trim[where.x][where.y] &= 215; if (out_trim[where.x][where.y] & 64) out_trim[where.x][where.y] &= 95; } overall_mode = store_mode; } char add_trim_to_array(location where,unsigned char ter_type) { Boolean at_top = FALSE,at_bot = FALSE,at_left = FALSE,at_right = FALSE; unsigned char store,store2,store3,store1; char to_return = 0; if (where.x == 0) at_left = TRUE; if (where.y == 0) at_top = TRUE; if ((overall_mode == 0) || (overall_mode == 35)) { if (where.x == 95) at_right = TRUE; if (where.y == 95) at_bot = TRUE; } else { if (where.x == town_size[town_type] - 1) at_right = TRUE; if (where.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(where.x - 1,where.y); if (is_shore(store) == TRUE) to_return |= 64; } if (at_right == FALSE) { store = get_t_t(where.x + 1,where.y); if (is_shore(store) == TRUE) to_return |= 4; } if (at_top == FALSE) { store = get_t_t(where.x,where.y - 1); if (is_shore(store) == TRUE) to_return |= 1; } if (at_bot == FALSE) { store = get_t_t(where.x,where.y + 1); if (is_shore(store) == TRUE) to_return |= 16; } if ((at_left == FALSE) && (at_top == FALSE)) { store = get_t_t(where.x - 1,where.y - 1); if (is_shore(store) == TRUE) to_return |= 128; } if ((at_right == FALSE) && (at_top == FALSE)) { store = get_t_t(where.x + 1,where.y + 1); if (is_shore(store) == TRUE) to_return |= 8; } if ((at_right == FALSE) && (at_bot == FALSE)) { store = get_t_t(where.x + 1,where.y - 1); if (is_shore(store) == TRUE) to_return |= 2; } if ((at_left == FALSE) && (at_bot == FALSE)) { store = get_t_t(where.x - 1,where.y + 1); if (is_shore(store) == TRUE) to_return |= 32; } } return to_return; } Boolean pt_in_rect(location loc,RECT rect) { if ((loc.x >= rect.left) && (loc.x <= rect.right) && (loc.y >= rect.top) && (loc.y <= rect.bottom)) return TRUE; return FALSE; } // Sees if party has seen a monster of this sort, updates menu and gives // special messages as necessary void check_if_monst_seen(unsigned char m_num) { // this rule has been changed return; if (party.m_seen[m_num] == 0) { party.m_seen[m_num] = 1; switch (m_num) { } adjust_monst_menu(); } } // 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,j,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",data_store2->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; // DWORD color[3] = {RGB(255,0,0),RGB(0,255,0),RGB(0,0,255)}; DWORD color[3] = {PALETTEINDEX(43),PALETTEINDEX(2),PALETTEINDEX(22)}; HPEN hpen,old_pen; COLORREF x[3] = {RGB(200,0,0),RGB(102,255,0),RGB(200,0,200)};//RGB(204,204,204); UINT c; 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); SetViewportOrg(hdc,ulx,uly); SelectPalette(hdc,hpal,0); c = GetNearestPaletteIndex(hpal,x[mode]); // hbrush = CreateSolidBrush(PALETTEINDEX(c));//59)); // hpen = CreatePen(PS_SOLID,1,color[mode]); hpen = CreatePen(PS_SOLID,1,PALETTEINDEX(c)); old_pen = SelectObject(hdc,hpen); // RoundRect(hdc,to_frame.left,to_frame.top, // to_frame.right,to_frame.bottom, 5,5); MoveTo(hdc,to_frame.left,to_frame.top); 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); fry_dc(mainPtr,hdc); DeleteObject(hpen); }