Initial commit

engines/ags/engine/gui/my_listbox.cpp

@@ -0,0 +1,192 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ *
+ */
+
+#include "ags/engine/gui/my_listbox.h"
+#include "ags/shared/ac/common.h"
+#include "ags/engine/ac/game_setup.h"
+#include "ags/shared/ac/keycode.h"
+#include "ags/shared/font/fonts.h"
+#include "ags/shared/gfx/bitmap.h"
+#include "ags/engine/gui/gui_dialog.h"
+#include "ags/engine/gui/gui_dialog_defines.h"
+
+namespace AGS3 {
+
+using namespace AGS::Shared;
+
+MyListBox::MyListBox(int xx, int yy, int wii, int hii) {
+	x = xx;
+	y = yy;
+	wid = wii;
+	hit = hii;
+	hit -= (hit - 4) % TEXT_HT; // resize to multiple of text height
+	numonscreen = (hit - 4) / TEXT_HT;
+	items = 0;
+	topitem = 0;
+	selected = -1;
+	memset(itemnames, 0, sizeof(itemnames));
+}
+
+void MyListBox::clearlist() {
+	for (int kk = 0; kk < items; kk++)
+		free(itemnames[kk]);
+
+	items = 0;
+}
+
+MyListBox::~MyListBox() {
+	clearlist();
+}
+
+void MyListBox::draw(Bitmap *ds) {
+	color_t draw_color = ds->GetCompatibleColor(_G(windowbackgroundcolor));
+	ds->FillRect(Rect(x, y, x + wid, y + hit), draw_color);
+	draw_color = ds->GetCompatibleColor(0);
+	ds->DrawRect(Rect(x, y, x + wid, y + hit), draw_color);
+
+	int widwas = wid;
+	wid -= ARROWWIDTH;
+	ds->DrawLine(Line(x + wid, y, x + wid, y + hit), draw_color);        // draw the up/down arrows
+	ds->DrawLine(Line(x + wid, y + hit / 2, x + widwas, y + hit / 2), draw_color);
+
+	int xmidd = x + wid + (widwas - wid) / 2;
+	if (topitem < 1)
+		draw_color = ds->GetCompatibleColor(7);
+
+	ds->DrawLine(Line(xmidd, y + 2, xmidd, y + 10), draw_color); // up arrow
+	ds->DrawLine(Line(xmidd - 1, y + 3, xmidd + 1, y + 3), draw_color);
+	ds->DrawLine(Line(xmidd - 2, y + 4, xmidd + 2, y + 4), draw_color);
+	draw_color = ds->GetCompatibleColor(0);
+	if (topitem + numonscreen >= items)
+		draw_color = ds->GetCompatibleColor(7);
+
+	ds->DrawLine(Line(xmidd, y + hit - 10, xmidd, y + hit - 3), draw_color);     // down arrow
+	ds->DrawLine(Line(xmidd - 1, y + hit - 4, xmidd + 1, y + hit - 4), draw_color);
+	ds->DrawLine(Line(xmidd - 2, y + hit - 5, xmidd + 2, y + hit - 5), draw_color);
+	draw_color = ds->GetCompatibleColor(0);
+
+	for (int tt = 0; tt < numonscreen; tt++) {
+		int inum = tt + topitem;
+		if (inum >= items)
+			break;
+
+		int thisypos = y + 2 + tt * TEXT_HT;
+		color_t text_color;
+		if (inum == selected) {
+			draw_color = ds->GetCompatibleColor(0);
+			ds->FillRect(Rect(x, thisypos, x + wid, thisypos + TEXT_HT - 1), draw_color);
+			text_color = ds->GetCompatibleColor(7);
+		} else text_color = ds->GetCompatibleColor(0);
+
+		wouttextxy(ds, x + 2, thisypos, _G(cbuttfont), text_color, itemnames[inum]);
+	}
+	wid = widwas;
+}
+
+int MyListBox::pressedon(int mousex, int mousey) {
+	if (mousex > x + wid - ARROWWIDTH) {
+		if ((mousey - y < hit / 2) && (topitem > 0))
+			topitem--;
+		else if ((mousey - y > hit / 2) && (topitem + numonscreen < items))
+			topitem++;
+
+	} else {
+		selected = ((mousey - y) - 2) / TEXT_HT + topitem;
+		if (selected >= items)
+			selected = items - 1;
+
+	}
+
+	draw(get_gui_screen());
+	_G(smcode) = CM_SELCHANGE;
+	return 0;
+}
+
+void MyListBox::additem(char *texx) {
+	if (items >= MAXLISTITEM)
+		quit("!CSCIUSER16: Too many items added to listbox");
+	size_t ln = strlen(texx) + 1;
+	itemnames[items] = (char *)malloc(ln);
+	Common::strcpy_s(itemnames[items], ln, texx);
+	items++;
+	needredraw = 1;
+}
+
+int MyListBox::processmessage(int mcode, int wParam, NumberPtr lParam) {
+	if (mcode == CLB_ADDITEM) {
+		additem((char *)lParam.ptr());
+	} else if (mcode == CLB_CLEAR)
+		clearlist();
+	else if (mcode == CLB_GETCURSEL)
+		return selected;
+	else if (mcode == CLB_SETCURSEL) {
+		selected = wParam;
+
+		if ((selected < topitem) && (selected >= 0))
+			topitem = selected;
+
+		if (topitem + numonscreen <= selected)
+			topitem = (selected + 1) - numonscreen;
+	} else if (mcode == CLB_GETTEXT)
+		Common::strcpy_s((char *)lParam.ptr(), 260, itemnames[wParam]);
+	else if (mcode == CLB_SETTEXT) {
+		if (wParam < items)
+			free(itemnames[wParam]);
+
+		char *newstri = (char *)lParam.ptr();
+		size_t ln = strlen(newstri) + 2;
+		itemnames[wParam] = (char *)malloc(ln);
+		Common::strcpy_s(itemnames[wParam], ln, newstri);
+
+	} else if (mcode == CTB_KEYPRESS) {
+		if ((wParam == eAGSKeyCodeDownArrow) && (selected < items - 1))
+			selected++;
+
+		if ((wParam == eAGSKeyCodeUpArrow) && (selected > 0))
+			selected--;
+
+		if (wParam == eAGSKeyCodePageUp)
+			selected -= (numonscreen - 1);
+
+		if (wParam == eAGSKeyCodePageDown)
+			selected += (numonscreen - 1);
+
+		if ((selected < 0) && (items > 0))
+			selected = 0;
+
+		if (selected >= items)
+			selected = items - 1;
+
+		if ((selected < topitem) && (selected >= 0))
+			topitem = selected;
+
+		if (topitem + numonscreen <= selected)
+			topitem = (selected + 1) - numonscreen;
+
+		drawandmouse();
+		_G(smcode) = CM_SELCHANGE;
+	} else
+		return -1;
+
+	return 0;
+}
+
+} // namespace AGS3