97d6fade74
I'll push a formatting guide at some point. There may still be outstanding changes, but please feel free to resolve those as you arrive a them. To the best of my knowledge, there is no changes to the actual code content, but the formatter does have the occasional bug. If you run into an issue, please fix it!
364 lines
11 KiB
C
364 lines
11 KiB
C
/* NetHack 3.6 mhstatus.c $NHDT-Date: 1431192775 2015/05/09 17:32:55 $ $NHDT-Branch: master $:$NHDT-Revision: 1.21 $ */
|
|
/* NetHack 3.6 mhstatus.c $Date: 2012/01/11 01:45:02 $ $Revision: 1.14 $ */
|
|
/* Copyright (C) 2001 by Alex Kompel */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#include "winMS.h"
|
|
#include "mhstatus.h"
|
|
#include "mhmsg.h"
|
|
#include "mhfont.h"
|
|
|
|
#define NHSW_LINES 2
|
|
#define MAXWINDOWTEXT BUFSZ
|
|
|
|
extern COLORREF nhcolor_to_RGB(int c); /* from mhmap */
|
|
|
|
typedef struct mswin_nethack_status_window {
|
|
int index;
|
|
char window_text[NHSW_LINES][MAXWINDOWTEXT + 1];
|
|
int n_fields;
|
|
const char **vals;
|
|
boolean *activefields;
|
|
int *colors;
|
|
} NHStatusWindow, *PNHStatusWindow;
|
|
|
|
#ifdef STATUS_VIA_WINDOWPORT
|
|
static int fieldorder1[] = { BL_TITLE, BL_STR, BL_DX, BL_CO, BL_IN,
|
|
BL_WI, BL_CH, BL_ALIGN, BL_SCORE, -1 };
|
|
static int fieldorder2[] = { BL_LEVELDESC, BL_GOLD, BL_HP, BL_HPMAX,
|
|
BL_ENE, BL_ENEMAX, BL_AC, BL_XP,
|
|
BL_EXP, BL_HD, BL_TIME, BL_HUNGER,
|
|
BL_CAP, BL_CONDITION, -1 };
|
|
static int *fieldorders[] = { fieldorder1, fieldorder2, NULL };
|
|
#endif /* STATUS_VIA_WINDOWPORT */
|
|
|
|
static TCHAR szStatusWindowClass[] = TEXT("MSNHStatusWndClass");
|
|
LRESULT CALLBACK StatusWndProc(HWND, UINT, WPARAM, LPARAM);
|
|
static void register_status_window_class(void);
|
|
static LRESULT onWMPaint(HWND hWnd, WPARAM wParam, LPARAM lParam);
|
|
|
|
#define DEFAULT_COLOR_BG_STATUS COLOR_WINDOW
|
|
#define DEFAULT_COLOR_FG_STATUS COLOR_WINDOWTEXT
|
|
|
|
HWND
|
|
mswin_init_status_window()
|
|
{
|
|
static int run_once = 0;
|
|
HWND ret;
|
|
NHStatusWindow *data;
|
|
RECT rt;
|
|
|
|
if (!run_once) {
|
|
register_status_window_class();
|
|
run_once = 1;
|
|
}
|
|
|
|
/* get window position */
|
|
if (GetNHApp()->bAutoLayout) {
|
|
SetRect(&rt, 0, 0, 0, 0);
|
|
} else {
|
|
mswin_get_window_placement(NHW_STATUS, &rt);
|
|
}
|
|
|
|
/* create status window object */
|
|
ret = CreateWindow(szStatusWindowClass, NULL,
|
|
WS_CHILD | WS_CLIPSIBLINGS | WS_SIZEBOX,
|
|
rt.left, /* horizontal position of window */
|
|
rt.top, /* vertical position of window */
|
|
rt.right - rt.left, /* window width */
|
|
rt.bottom - rt.top, /* window height */
|
|
GetNHApp()->hMainWnd, NULL, GetNHApp()->hApp, NULL);
|
|
if (!ret)
|
|
panic("Cannot create status window");
|
|
|
|
/* Set window caption */
|
|
SetWindowText(ret, "Status");
|
|
|
|
/* create window data */
|
|
data = (PNHStatusWindow) malloc(sizeof(NHStatusWindow));
|
|
if (!data)
|
|
panic("out of memory");
|
|
|
|
ZeroMemory(data, sizeof(NHStatusWindow));
|
|
SetWindowLongPtr(ret, GWLP_USERDATA, (LONG_PTR) data);
|
|
return ret;
|
|
}
|
|
|
|
void
|
|
register_status_window_class()
|
|
{
|
|
WNDCLASS wcex;
|
|
ZeroMemory(&wcex, sizeof(wcex));
|
|
|
|
wcex.style = CS_NOCLOSE;
|
|
wcex.lpfnWndProc = (WNDPROC) StatusWndProc;
|
|
wcex.cbClsExtra = 0;
|
|
wcex.cbWndExtra = 0;
|
|
wcex.hInstance = GetNHApp()->hApp;
|
|
wcex.hIcon = NULL;
|
|
wcex.hCursor = LoadCursor(NULL, IDC_ARROW);
|
|
wcex.hbrBackground = status_bg_brush
|
|
? status_bg_brush
|
|
: SYSCLR_TO_BRUSH(DEFAULT_COLOR_BG_STATUS);
|
|
wcex.lpszMenuName = NULL;
|
|
wcex.lpszClassName = szStatusWindowClass;
|
|
|
|
RegisterClass(&wcex);
|
|
}
|
|
|
|
LRESULT CALLBACK
|
|
StatusWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
PNHStatusWindow data;
|
|
|
|
data = (PNHStatusWindow) GetWindowLongPtr(hWnd, GWLP_USERDATA);
|
|
switch (message) {
|
|
case WM_MSNH_COMMAND: {
|
|
switch (wParam) {
|
|
case MSNH_MSG_PUTSTR: {
|
|
PMSNHMsgPutstr msg_data = (PMSNHMsgPutstr) lParam;
|
|
strncpy(data->window_text[data->index], msg_data->text,
|
|
MAXWINDOWTEXT);
|
|
data->index = (data->index + 1) % NHSW_LINES;
|
|
InvalidateRect(hWnd, NULL, TRUE);
|
|
} break;
|
|
|
|
case MSNH_MSG_CLEAR_WINDOW: {
|
|
data->index = 0;
|
|
ZeroMemory(data->window_text, sizeof(data->window_text));
|
|
InvalidateRect(hWnd, NULL, TRUE);
|
|
} break;
|
|
|
|
case MSNH_MSG_GETTEXT: {
|
|
PMSNHMsgGetText msg_data = (PMSNHMsgGetText) lParam;
|
|
#ifdef STATUS_VIA_WINDOWPORT
|
|
int **fop;
|
|
int *f;
|
|
msg_data->buffer[0] = '\0';
|
|
if (data->n_fields > 0) {
|
|
for (fop = fieldorders; *fop; fop++) {
|
|
for (f = *fop; *f != -1; f++) {
|
|
if (data->activefields[*f])
|
|
strncat(msg_data->buffer, data->vals[*f],
|
|
msg_data->max_size
|
|
- strlen(msg_data->buffer));
|
|
}
|
|
strncat(msg_data->buffer, "\r\n",
|
|
msg_data->max_size - strlen(msg_data->buffer));
|
|
}
|
|
}
|
|
#else /* STATUS_VIA_WINDOWPORT */
|
|
strncpy(msg_data->buffer, data->window_text[0],
|
|
msg_data->max_size);
|
|
strncat(msg_data->buffer, "\r\n",
|
|
msg_data->max_size - strlen(msg_data->buffer));
|
|
strncat(msg_data->buffer, data->window_text[1],
|
|
msg_data->max_size - strlen(msg_data->buffer));
|
|
#endif /* STATUS_VIA_WINDOWPORT */
|
|
} break;
|
|
|
|
case MSNH_MSG_UPDATE_STATUS: {
|
|
PMSNHMsgUpdateStatus msg_data = (PMSNHMsgUpdateStatus) lParam;
|
|
data->n_fields = msg_data->n_fields;
|
|
data->vals = msg_data->vals;
|
|
data->activefields = msg_data->activefields;
|
|
data->colors = msg_data->colors;
|
|
InvalidateRect(hWnd, NULL, TRUE);
|
|
} break;
|
|
} /* end switch( wParam ) { */
|
|
} break;
|
|
|
|
case WM_PAINT:
|
|
return onWMPaint(hWnd, wParam, lParam);
|
|
|
|
case WM_SIZE: {
|
|
RECT rt;
|
|
GetWindowRect(hWnd, &rt);
|
|
ScreenToClient(GetNHApp()->hMainWnd, (LPPOINT) &rt);
|
|
ScreenToClient(GetNHApp()->hMainWnd, ((LPPOINT) &rt) + 1);
|
|
mswin_update_window_placement(NHW_STATUS, &rt);
|
|
}
|
|
return FALSE;
|
|
|
|
case WM_MOVE: {
|
|
RECT rt;
|
|
GetWindowRect(hWnd, &rt);
|
|
ScreenToClient(GetNHApp()->hMainWnd, (LPPOINT) &rt);
|
|
ScreenToClient(GetNHApp()->hMainWnd, ((LPPOINT) &rt) + 1);
|
|
mswin_update_window_placement(NHW_STATUS, &rt);
|
|
}
|
|
return FALSE;
|
|
|
|
case WM_DESTROY:
|
|
free(data);
|
|
SetWindowLongPtr(hWnd, GWLP_USERDATA, (LONG_PTR) 0);
|
|
break;
|
|
|
|
case WM_SETFOCUS:
|
|
SetFocus(GetNHApp()->hMainWnd);
|
|
break;
|
|
|
|
default:
|
|
return DefWindowProc(hWnd, message, wParam, lParam);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifdef STATUS_VIA_WINDOWPORT
|
|
static LRESULT
|
|
onWMPaint(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
int *f;
|
|
int **fop;
|
|
SIZE sz;
|
|
HGDIOBJ oldFont, normalFont, boldFont;
|
|
TCHAR wbuf[BUFSZ];
|
|
COLORREF OldBg, OldFg, Bg, Fg;
|
|
RECT rt;
|
|
PAINTSTRUCT ps;
|
|
HDC hdc;
|
|
PNHStatusWindow data;
|
|
|
|
data = (PNHStatusWindow) GetWindowLongPtr(hWnd, GWLP_USERDATA);
|
|
|
|
hdc = BeginPaint(hWnd, &ps);
|
|
GetClientRect(hWnd, &rt);
|
|
|
|
normalFont = mswin_get_font(NHW_STATUS, ATR_NONE, hdc, FALSE);
|
|
boldFont = mswin_get_font(NHW_STATUS, ATR_BOLD, hdc, FALSE);
|
|
oldFont = SelectObject(hdc, normalFont);
|
|
|
|
Bg = status_bg_brush ? status_bg_color
|
|
: (COLORREF) GetSysColor(DEFAULT_COLOR_BG_STATUS);
|
|
OldBg = SetBkColor(hdc, Bg);
|
|
|
|
Fg = status_fg_brush ? status_fg_color
|
|
: (COLORREF) GetSysColor(DEFAULT_COLOR_FG_STATUS);
|
|
OldFg = SetTextColor(hdc, Fg);
|
|
|
|
for (fop = fieldorders; *fop; fop++) {
|
|
LONG left = rt.left;
|
|
LONG cy = 0;
|
|
int vlen;
|
|
for (f = *fop; *f != -1; f++) {
|
|
if (((*f) >= data->n_fields) || (!data->activefields[*f]))
|
|
continue;
|
|
vlen = strlen(data->vals[*f]);
|
|
NH_A2W(data->vals[*f], wbuf, SIZE(wbuf));
|
|
|
|
if (data->colors[*f] == CLR_MAX
|
|
|| data->colors[*f] == BL_HILITE_NONE) {
|
|
SelectObject(hdc, normalFont);
|
|
SetBkColor(hdc, Bg);
|
|
SetTextColor(hdc, Fg);
|
|
} else if (data->colors[*f] > 0) {
|
|
SelectObject(hdc, normalFont);
|
|
SetBkColor(hdc, Bg);
|
|
SetTextColor(hdc, nhcolor_to_RGB(data->colors[*f]));
|
|
} else if (data->colors[*f] == BL_HILITE_INVERSE) {
|
|
SelectObject(hdc, normalFont);
|
|
SetBkColor(hdc, Fg);
|
|
SetTextColor(hdc, Bg);
|
|
} else if (data->colors[*f] == BL_HILITE_BOLD) {
|
|
SelectObject(hdc, boldFont);
|
|
SetBkColor(hdc, Bg);
|
|
SetTextColor(hdc, Fg);
|
|
} else {
|
|
SelectObject(hdc, normalFont);
|
|
SetBkColor(hdc, Bg);
|
|
SetTextColor(hdc, Fg);
|
|
}
|
|
|
|
GetTextExtentPoint32(hdc, wbuf, vlen, &sz);
|
|
DrawText(hdc, wbuf, vlen, &rt, DT_LEFT);
|
|
|
|
rt.left += sz.cx;
|
|
cy = max(cy, sz.cy);
|
|
}
|
|
rt.left = left;
|
|
rt.top += cy;
|
|
}
|
|
|
|
SelectObject(hdc, oldFont);
|
|
SetTextColor(hdc, OldFg);
|
|
SetBkColor(hdc, OldBg);
|
|
EndPaint(hWnd, &ps);
|
|
|
|
return 0;
|
|
}
|
|
#else
|
|
static LRESULT
|
|
onWMPaint(HWND hWnd, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
int i;
|
|
SIZE sz;
|
|
HGDIOBJ oldFont;
|
|
TCHAR wbuf[BUFSZ];
|
|
COLORREF OldBg, OldFg;
|
|
RECT rt;
|
|
PAINTSTRUCT ps;
|
|
HDC hdc;
|
|
PNHStatusWindow data;
|
|
|
|
data = (PNHStatusWindow) GetWindowLongPtr(hWnd, GWLP_USERDATA);
|
|
|
|
hdc = BeginPaint(hWnd, &ps);
|
|
GetClientRect(hWnd, &rt);
|
|
|
|
oldFont =
|
|
SelectObject(hdc, mswin_get_font(NHW_STATUS, ATR_NONE, hdc, FALSE));
|
|
|
|
OldBg = SetBkColor(hdc, status_bg_brush ? status_bg_color
|
|
: (COLORREF) GetSysColor(
|
|
DEFAULT_COLOR_BG_STATUS));
|
|
OldFg = SetTextColor(hdc, status_fg_brush ? status_fg_color
|
|
: (COLORREF) GetSysColor(
|
|
DEFAULT_COLOR_FG_STATUS));
|
|
|
|
for (i = 0; i < NHSW_LINES; i++) {
|
|
int wlen = strlen(data->window_text[i]);
|
|
NH_A2W(data->window_text[i], wbuf, SIZE(wbuf));
|
|
GetTextExtentPoint32(hdc, wbuf, wlen, &sz);
|
|
DrawText(hdc, wbuf, wlen, &rt, DT_LEFT | DT_END_ELLIPSIS);
|
|
rt.top += sz.cy;
|
|
}
|
|
|
|
SelectObject(hdc, oldFont);
|
|
SetTextColor(hdc, OldFg);
|
|
SetBkColor(hdc, OldBg);
|
|
EndPaint(hWnd, &ps);
|
|
|
|
return 0;
|
|
}
|
|
#endif /*STATUS_VIA_WINDOWPORT*/
|
|
|
|
void
|
|
mswin_status_window_size(HWND hWnd, LPSIZE sz)
|
|
{
|
|
TEXTMETRIC tm;
|
|
HGDIOBJ saveFont;
|
|
HDC hdc;
|
|
PNHStatusWindow data;
|
|
RECT rt;
|
|
SIZE text_sz;
|
|
|
|
GetClientRect(hWnd, &rt);
|
|
|
|
data = (PNHStatusWindow) GetWindowLongPtr(hWnd, GWLP_USERDATA);
|
|
if (data) {
|
|
hdc = GetDC(hWnd);
|
|
saveFont = SelectObject(
|
|
hdc, mswin_get_font(NHW_STATUS, ATR_NONE, hdc, FALSE));
|
|
GetTextExtentPoint32(hdc, _T("W"), 1, &text_sz);
|
|
GetTextMetrics(hdc, &tm);
|
|
|
|
rt.bottom = rt.top + text_sz.cy * NHSW_LINES;
|
|
|
|
SelectObject(hdc, saveFont);
|
|
ReleaseDC(hWnd, hdc);
|
|
}
|
|
AdjustWindowRect(&rt, GetWindowLong(hWnd, GWL_STYLE), FALSE);
|
|
sz->cx = rt.right - rt.left;
|
|
sz->cy = rt.bottom - rt.top;
|
|
}
|