scummvm/engines/bagel/spacebar/computer.cpp

/* 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 "bagel/spacebar/computer.h"
#include "bagel/baglib/master_win.h"
#include "bagel/boflib/sound.h"
#include "bagel/baglib/inv.h"
#include "bagel/boflib/file_functions.h"
#include "bagel/boflib/log.h"
#include "bagel/boflib/std_keys.h"

namespace Bagel {
namespace SpaceBar {

#define DRINKFILE       "$SBARDIR\\BAR\\CLOSEUP\\BDCA\\DRINKS.TXT"
#define INGRDFILE       "$SBARDIR\\BAR\\CLOSEUP\\BDCA\\ING.TXT"
#define BDCADIR         "$SBARDIR\\BAR\\CLOSEUP\\BDCA\\"
#define ORDERAUDIO      "BDNDPSC1.WAV"
#define REFUSEAUDIO     "BDTOORC1.WAV"
#define ONAUDIO         "ON.WAV"

#define szBroke "You have insufficient funds for that purchase."
#define szRefuse "The computer politely informs you that the House has a policy against two-fisted drinking."

struct ST_BUTTONS {
	const char *m_pszName;
	const char *m_pszUp;
	const char *m_pszDown;
	const char *m_pszFocus;
	const char *m_pszDisabled;
	int m_nLeft;
	int m_nTop;
	int m_nWidth;
	int m_nHeight;
	int m_nID;
};

static const ST_BUTTONS g_stButtons[NUM_COMPBUTT] = {
	{ "Off", "bdnb1.bmp", "bdnb1.bmp", "bdnb1.bmp", "bdnb1.bmp", 144, 323, 92, 48, OFFBUT },
	{ "On", "bdnb2.bmp", "bdnb2.bmp", "bdnb2.bmp", "bdnb2.bmp",  144, 323, 92, 48, ONBUT },
	{ "Drinks", "bdnr1.bmp", "bdnr2.bmp", "bdnr1.bmp", "bdnr1.bmp", 238, 318, 112, 60, DRINKS },
	{ "Ingred", "bdnq1.bmp", "bdnq2.bmp", "bdnq1.bmp", "bdnq1.bmp",  238, 318, 112, 60, INGRED },
	{ "ListD", "bdnc1.bmp", "bdnc2.bmp", "bdnc2.bmp", "bdnc1.bmp", 354, 318, 112, 60, LISTD },
	{ "ListI", "bdnc4.bmp", "bdnc5.bmp", "bdnc4.bmp", "bdnc3.bmp", 354, 318, 112, 60, LISTI },
	{ "Order", "bdnd1.bmp", "bdnd2.bmp", "bdnd1.bmp", "bdnd1.bmp", 238, 378, 112, 60, ORDER },
	{ "Page Up", "bdns1.bmp", "bdns2.bmp", "bdns1.bmp", "bdns1.bmp", 188, 392, 44, 35, PGUP },
	{ "Page Down", "bdnt1.bmp", "bdnt2.bmp", "bdnt1.bmp", "bdnt1.bmp", 356, 392, 44, 35, PGDOWN },
	{ "Back", "backup.bmp", "backdn.bmp", "backup.bmp", "backup.bmp", 354, 318, 112, 60, BCBACK },
	{ "Help", "helpup.bmp", "helpdown.bmp", "helpup.bmp", "helpup.bmp", 31, 445, 200, 30, BCHELP },
	{ "Quit", "quitup.bmp", "quitdown.bmp", "quitup.bmp", "quitup.bmp", 407, 445, 200, 30, BCQUIT }
};

// Local functions
static const char *BuildBarcDir(const char *pszFile);

SBarComputer::SBarComputer() : CBagStorageDevWnd(),
		_compDisplay(165, 36, 430, 220), _compTextWindow(0, 0, 639, 21) {
	m_pDrinkBuff = nullptr;
	m_pIngBuff = nullptr;
	m_pDrinkBox = nullptr;
	m_pIngBox = nullptr;
	m_pTBox = nullptr;
	m_pDrinkList = nullptr;
	m_pIngList = nullptr;
	//  m_nSelection = -1;
	m_nDrinkSelect = -1;
	m_nIngSelect = -1;
	m_eMode = OFFMODE;
	m_ePrevMode = DRINKMODE;

	for (int i = 0; i < NUM_COMPBUTT; i++) {
		m_pButtons[i] = nullptr;
	}

	// Call this thing a closeup so that time won't go by when
	// entering the closeup
	SetCloseup(true);
}
SBarComputer::~SBarComputer() {
}

void SBarComputer::OnMainLoop() {
	if (m_bFirstPaint) {
		m_bFirstPaint = false;
		AttachActiveObjects();
	}
}

void SBarComputer::EraseBackdrop() {
	InvalidateRect(&_compDisplay);

	UpdateWindow();
}

void  SBarComputer::OnPaint(CBofRect *pRect) {
	if (GetBackdrop()) {
		Assert(GetWorkBmp() != nullptr);

		// Erase everything from the background
		GetWorkBmp()->Paint(GetBackdrop(), pRect, pRect);
		// Paint all the objects to the background
		PaintStorageDevice(nullptr, GetBackdrop(), pRect);
	}

	if (m_pTBox != nullptr)
		m_pTBox->Display();

	// Paint the backdrop
	if (GetBackdrop())
		PaintBackdrop();
}

ErrorCode SBarComputer::attach() {
	LogInfo("Attaching SBarComputer...");

	ErrorCode rc = CBagStorageDevWnd::attach();
	if (rc == ERR_NONE) {
		g_bWaitOK = false;

		m_pDrinkList = new CBofList<SBarCompItem>;
		m_pIngList = new CBofList<SBarCompItem>;

		rc = ReadDrnkFile();
		if (rc == ERR_NONE)
			rc = ReadIngFile();

		// Create the list box that display the lists
		CreateDrinksListBox();
		CreateIngListBox();

		// Must have a valid backdrop by now
		Assert(m_pBackdrop != nullptr);
		CBofPalette *pPal = m_pBackdrop->GetPalette();

		// Build all our buttons
		for (int i = 0; i < NUM_COMPBUTT; i++) {
			if ((m_pButtons[i] = new CBofBmpButton) != nullptr) {

				CBofBitmap *pUp = LoadBitmap(BuildBarcDir(g_stButtons[i].m_pszUp), pPal);
				CBofBitmap *pDown = LoadBitmap(BuildBarcDir(g_stButtons[i].m_pszDown), pPal);
				CBofBitmap *pFocus = LoadBitmap(BuildBarcDir(g_stButtons[i].m_pszFocus), pPal);
				CBofBitmap *pDis = LoadBitmap(BuildBarcDir(g_stButtons[i].m_pszDisabled), pPal);

				m_pButtons[i]->LoadBitmaps(pUp, pDown, pFocus, pDis);
				m_pButtons[i]->Create(g_stButtons[i].m_pszName, g_stButtons[i].m_nLeft, g_stButtons[i].m_nTop, g_stButtons[i].m_nWidth, g_stButtons[i].m_nHeight, this, g_stButtons[i].m_nID);
				m_pButtons[i]->Hide();
			}
		}

		Show();
		m_pButtons[OFFBUT]->Show();
		m_pButtons[BCHELP]->Show();
		m_pButtons[BCQUIT]->Show();

		// Fix drink already selected bug
		if (m_pDrinkBox != nullptr) {
			m_pDrinkBox->SetSelectedItem(-1, false);
		}
		if (m_pIngBox != nullptr) {
			m_pIngBox->SetSelectedItem(-1, false);
		}

		UpdateWindow();
	}

	CBagCursor::showSystemCursor();

	return rc;
}

ErrorCode SBarComputer::detach() {
	CBagCursor::hideSystemCursor();

	if (m_pDrinkBuff != nullptr) {
		delete m_pDrinkBuff;
		m_pDrinkBuff = nullptr;
	}

	if (m_pIngBuff != nullptr) {
		delete m_pIngBuff;
		m_pIngBuff = nullptr;
	}

	DeleteListBox();
	DeleteTextBox();

	if (m_pDrinkList != nullptr) {
		delete m_pDrinkList;
		m_pDrinkList = nullptr;
	}

	if (m_pIngList != nullptr) {
		delete m_pIngList;
		m_pIngList = nullptr;
	}

	// Destroy all buttons
	for (int i = 0; i < NUM_COMPBUTT; i++) {

		if (m_pButtons[i] != nullptr) {
			delete m_pButtons[i];
			m_pButtons[i] = nullptr;
		}
	}

	m_nDrinkSelect = -1;
	m_nIngSelect = -1;

	m_eMode = OFFMODE;

	CBagStorageDevWnd::detach();

	// Going into mr drinkmaster makes 1 turn go by
	VARMNGR->IncrementTimers();

	LogInfo("Detached SBarComputer");

	return ERR_NONE;
}

ErrorCode SBarComputer::ReadDrnkFile() {
	CBofString DrinkString(DRINKFILE);
	MACROREPLACE(DrinkString);

	// Open the text files
	CBofFile fpDrinkFile(DrinkString);
	if (fpDrinkFile.GetErrorCode() != ERR_NONE)
		return fpDrinkFile.GetErrorCode();

	// Check that buffers are null
	if (m_pDrinkBuff) {
		delete m_pDrinkBuff;
		m_pDrinkBuff = nullptr;
	}

	// Allocate the buffers
	m_pDrinkBuff = (char *)BofAlloc(fpDrinkFile.GetLength() + 1);
	if (m_pDrinkBuff == nullptr)
		return ERR_MEMORY;

	// Read the text file into buffers
	fpDrinkFile.Read(m_pDrinkBuff, fpDrinkFile.GetLength());

	// Get pointers indexing into Drink buffers
	char *pPosInBuff = m_pDrinkBuff;
	while (pPosInBuff < m_pDrinkBuff + fpDrinkFile.GetLength()) {
		SBarCompItem *pCompItem = new SBarCompItem();
		if (!pCompItem)
			error("Couldn't allocate a new SBarCompItem");

		pCompItem->m_pList = nullptr;
		pCompItem->m_pDrink = nullptr;

		// Get the item pointer pointing to item
		pCompItem->m_pItem = pPosInBuff;

		// Search for @ - field delimiter
		while (*pPosInBuff != '@')
			pPosInBuff++;
		*pPosInBuff = '\0'; // Replace with \0
		pPosInBuff++; // Increment past it

		// Get the list item pointing to list
		pCompItem->m_pList = pPosInBuff;

		// Search for @ - field delimiter
		while (*pPosInBuff != '@')
			pPosInBuff++;
		*pPosInBuff = '\0'; // Replace with \0
		pPosInBuff++; // Increment past it

		// Get the drink item pointing to list
		pCompItem->m_pDrink = pPosInBuff;

		// Search for $ - record delimiter
		while (*pPosInBuff != '$')
			pPosInBuff++;
		*pPosInBuff = '\0'; // Replace with \0
		pPosInBuff++;   // Increment past it

		// Search record delimiter from beginning of next
		while ((pPosInBuff < m_pDrinkBuff + fpDrinkFile.GetLength()) && (*pPosInBuff != '$'))
			pPosInBuff++;

		pPosInBuff++;   // Increment past it

		m_pDrinkList->AddToTail(*pCompItem);
		delete pCompItem;
	}

	fpDrinkFile.Close();
	return ERR_NONE;
}

ErrorCode SBarComputer::ReadIngFile() {
	CBofString IngString(INGRDFILE);
	MACROREPLACE(IngString);

	// Open the text files
	CBofFile fpIngFile(IngString);
	if (fpIngFile.GetErrorCode() != ERR_NONE)
		return fpIngFile.GetErrorCode();

	// Check that buffers are null
	if (m_pIngBuff) {
		delete m_pIngBuff;
		m_pIngBuff = nullptr;
	}

	// Allocate the buffers
	m_pIngBuff = (char *)BofAlloc(fpIngFile.GetLength() + 1);
	if (m_pIngBuff == nullptr)
		return ERR_MEMORY;

	// Read the text file into buffers
	fpIngFile.Read(m_pIngBuff, fpIngFile.GetLength());

	// Get pointers indexing into Ingredient buffers
	char *pPosInBuff = m_pIngBuff;
	while (pPosInBuff < m_pIngBuff + fpIngFile.GetLength()) {
		SBarCompItem *pCompItem = new SBarCompItem();
		if (!pCompItem)
			error("Couldn't allocate a new SBarCompItem");

		pCompItem->m_pList = nullptr;
		pCompItem->m_pDrink = nullptr;

		// get the item pointer pointing to item
		pCompItem->m_pItem = pPosInBuff;

		// search for @ - field delimiter
		while (*pPosInBuff != '@')
			pPosInBuff++;
		*pPosInBuff = '\0'; // replace with /0
		pPosInBuff++; // Increment past it

		// Get the list item pointing to list
		pCompItem->m_pList = pPosInBuff;

		// Search for $ - record delimiter
		while (*pPosInBuff != '$')
			pPosInBuff++;
		*pPosInBuff = '\0'; // Replace with /0
		pPosInBuff++;   // Increment past it

		// Search record delimiter from beginning of next
		while ((pPosInBuff < m_pIngBuff + fpIngFile.GetLength()) && (*pPosInBuff != '$'))
			pPosInBuff++;

		pPosInBuff++;   // Increment past it

		m_pIngList->AddToTail(*pCompItem);
		delete pCompItem;
	}

	fpIngFile.Close();
	return ERR_NONE;
}

void SBarComputer::CreateTextBox(CBofString &newText) {
	if (m_pTBox == nullptr) {
		m_pTBox = new CBofTextBox(GetBackdrop(), &_compDisplay, newText);
		Assert(m_pTBox != nullptr);
		m_pTBox->SetTextAttribs(12, TEXT_NORMAL, RGB(0, 0, 0));
	} else {
		EraseBackdrop();
		m_pTBox->Erase();
		m_pTBox->FlushBackground();
		m_pTBox->SetText(newText);
	}

	if (m_pButtons[ONBUT]) {
		m_pButtons[ONBUT]->Show();
		m_pButtons[ONBUT]->InvalidateRect(nullptr);
	}
}

void SBarComputer::DeleteTextBox() {
	if (m_pTBox) {
		delete m_pTBox;
		m_pTBox = nullptr;
	}
}

void SBarComputer::DeleteListBox() {
	if (m_pDrinkBox) {
		delete m_pDrinkBox;
		m_pDrinkBox = nullptr;
	}
	if (m_pIngBox) {
		delete m_pIngBox;
		m_pIngBox = nullptr;
	}
}

ErrorCode SBarComputer::CreateDrinksListBox() {
	ErrorCode error = ERR_NONE;

	if (m_pDrinkBox == nullptr) { // We need to create one

		m_pDrinkBox = new CBofListBox();	
		if (m_pDrinkBox != nullptr) {
			error = m_pDrinkBox->Create("ListBox", &_compDisplay, this);
			if (error != ERR_NONE) {
				return error;
			}

			m_pDrinkBox->Hide();
			m_pDrinkBox->SetPointSize(12);
			m_pDrinkBox->SetItemHeight(20);

			CBofPalette *pPal = m_pBackdrop->GetPalette();
			byte PalIdx = pPal->GetNearestIndex(RGB(255, 0, 0));

			m_pDrinkBox->SetHighlightColor(pPal->GetColor(PalIdx));

			// Populate listbox
			int numItems = m_pDrinkList->GetCount();
			for (int i = 0; i < numItems; ++i) {
				SBarCompItem CompItem = m_pDrinkList->GetNodeItem(i);
				m_pDrinkBox->AddToTail(CBofString(CompItem.m_pItem), false);
			}
		} else {
			return ERR_MEMORY;
		}
	}

	return error;
}

ErrorCode SBarComputer::CreateIngListBox() {
	ErrorCode error = ERR_NONE;

	if (m_pIngBox == nullptr) {
		// We need to create one
		m_pIngBox = new CBofListBox();
		if (m_pIngBox != nullptr) {
			error = m_pIngBox->Create("ListBox", &_compDisplay, this);
			if (error != ERR_NONE) {
				return error;
			}

			m_pIngBox->Hide();
			m_pIngBox->SetPointSize(12);
			m_pIngBox->SetItemHeight(20);

			CBofPalette *pPal = m_pBackdrop->GetPalette();
			byte PalIdx = pPal->GetNearestIndex(RGB(255, 0, 0));

			m_pIngBox->SetHighlightColor(pPal->GetColor(PalIdx));


			// Populate listbox
			int numItems = m_pIngList->GetCount();
			for (int i = 0; i < numItems; ++i) {
				SBarCompItem CompItem = m_pIngList->GetNodeItem(i);
				m_pIngBox->AddToTail(CBofString(CompItem.m_pItem), false);
			}

		} else
			return ERR_MEMORY;
	}

	return error;
}

void SBarComputer::OnBofListBox(CBofObject * /*pListBox*/, int nItemIndex) {
	if (m_eMode == DRINKMODE) {
		m_nDrinkSelect = nItemIndex;

		// Prevents the white flash when the show window is performed
		m_pButtons[ORDER]->Select();
		m_pButtons[LISTD]->Select();

		m_pButtons[ORDER]->Show();
		m_pButtons[LISTD]->Show();

		m_pDrinkBox->RepaintAll();

	} else {
		m_nIngSelect = nItemIndex;
		// Prevents the white flash when the show window is performed
		m_pButtons[LISTI]->Select();
		m_pButtons[LISTI]->Show();

		m_pIngBox->RepaintAll();
	}

	ValidateAnscestors(nullptr);
	if (m_eMode == DRINKMODE) {
		m_pButtons[LISTD]->InvalidateRect(nullptr);
	} else {
		m_pButtons[LISTI]->InvalidateRect(nullptr);
	}
	m_pButtons[ORDER]->InvalidateRect(nullptr);
	m_pButtons[PGUP]->InvalidateRect(nullptr);
	m_pButtons[PGDOWN]->InvalidateRect(nullptr);

	UpdateWindow();
}

void SBarComputer::SetOn() {
	m_pButtons[OFFBUT]->Hide();
	m_pButtons[ONBUT]->Show();

	// Play switching-on sound
	BofPlaySound(BuildBarcDir(ONAUDIO), SOUND_MIX);

	SetDrink();
	UpdateWindow();
}

void SBarComputer::SetOff() {
	if (m_eMode != OFFMODE) {

		// Fix drink already selected bug
		if (m_pDrinkBox != nullptr) {
			m_pDrinkBox->SetSelectedItem(-1, false);
		}
		
		if (m_pIngBox != nullptr) {
			m_pIngBox->SetSelectedItem(-1, false);
		}

		m_nDrinkSelect = -1;

		m_pDrinkBox->Hide();
		m_pIngBox->Hide();

		DeleteTextBox();

		m_eMode = OFFMODE;

		m_pButtons[ONBUT]->Hide();
		m_pButtons[OFFBUT]->Show();

		BofPlaySound(BuildBarcDir(ONAUDIO), SOUND_MIX);

		for (int i = 1; i < NUM_COMPBUTT; i++) {
			// Hide all the buttons but HELP and QUIT
			if ((i != BCHELP) && (i != BCQUIT)) {
				m_pButtons[i]->Hide();
			}
		}
	}

	InvalidateRect(&_compDisplay);
	UpdateWindow();

}

void SBarComputer::SetDrink() {
	if (m_eMode != DRINKMODE) {
		DeleteTextBox();

		// Prevents the white flash when the show window is performed
		m_pButtons[INGRED]->Select();

		m_pButtons[DRINKS]->Hide();
		m_pButtons[INGRED]->Show();

		//m_nIngSelect = -1;
		m_pButtons[LISTI]->Hide();

		// Prevents the white flash when the show window is performed
		m_pButtons[PGUP]->Select();
		m_pButtons[PGDOWN]->Select();

		m_pButtons[PGUP]->Show();
		m_pButtons[PGDOWN]->Show();
		m_pButtons[BCBACK]->Hide();

		if (m_nDrinkSelect != -1) {
			// Prevents the white flash when the show window is performed
			m_pButtons[LISTD]->Select();
			m_pButtons[LISTD]->Show();
		}

		m_pIngBox->Hide();

		m_pDrinkBox->Select();
		m_pDrinkBox->Show();

		EraseBackdrop();

		m_eMode = DRINKMODE;
	}
}

void SBarComputer::SetIng() {
	if (m_eMode != INGMODE) {
		DeleteTextBox();

		// Prevents the white flash when the show window is performed
		m_pButtons[DRINKS]->Select();

		// Set up buttons
		m_pButtons[INGRED]->Hide();
		m_pButtons[DRINKS]->Show();

		// Hide list drink ingredient button
		m_pButtons[LISTD]->Hide();

		// Prevents the white flash when the show window is performed
		m_pButtons[PGUP]->Select();
		m_pButtons[PGDOWN]->Select();

		m_pButtons[PGUP]->Show();
		m_pButtons[PGDOWN]->Show();
		m_pButtons[BCBACK]->Hide();

		if (m_nIngSelect != -1) {
			m_pButtons[LISTI]->Select();
			m_pButtons[LISTI]->Show();
		}

		m_pDrinkBox->Hide();
		m_pIngBox->Select();
		m_pIngBox->Show();

		EraseBackdrop();

		m_eMode = INGMODE;
	}

	UpdateWindow();
}


void SBarComputer::SetList() {
	if (m_eMode != LISTMODE) {
		m_pDrinkBox->Hide();
		m_pIngBox->Hide();

		SBarCompItem CompItem;
		if (m_eMode == DRINKMODE) {
			Assert(m_nDrinkSelect != -1);
			CompItem = m_pDrinkList->GetNodeItem(m_nDrinkSelect);

		} else {

			Assert(m_nIngSelect != -1);
			CompItem = m_pIngList->GetNodeItem(m_nIngSelect);
		}

		CBofString cText(CompItem.m_pList);

		m_pDrinkBox->Hide();
		m_pIngBox->Hide();

		CreateTextBox(cText);

		// Save off the previous mode for BACK
		m_ePrevMode = m_eMode;

		// Prevents the white flash when the show window is performed
		m_pButtons[BCBACK]->Select();
		// Set up buttons
		m_pButtons[PGDOWN]->Hide();
		m_pButtons[BCBACK]->Show();

		m_pButtons[LISTD]->Hide();
		m_pButtons[LISTI]->Hide();

		m_pButtons[PGUP]->Hide();
		m_pButtons[PGDOWN]->Hide();

		m_pTBox->SetPageLength(10);

		m_eMode = LISTMODE;
		UpdateWindow();
	}
}

void SBarComputer::Back() {
	if (m_ePrevMode == DRINKMODE)
		SetDrink();
	else
		SetIng();

	m_pButtons[BCBACK]->Hide();
}

void SBarComputer::Order() {
	if (m_nDrinkSelect != -1) {
		// Get the associated drink name
		SBarCompItem CompItem = m_pDrinkList->GetNodeItem(m_nDrinkSelect);

		// Deduct 1 Nugget from the player
		// Read in their total nuggets from game
		CBagVar *pVar = VARMNGR->GetVariable("NUGGETS");
		CBagVar *pVar2 = VARMNGR->GetVariable("HAVEDRINK");

		if (pVar) {
			int nCredits = pVar->GetNumValue();
			int nHaveDrink = pVar2->GetNumValue();

			// If the player is out of nuggets, then put up a text message.
			if (nCredits < 1) {
				CBofBitmap saveBackground(640, 480, (CBofPalette *)nullptr, false);
				saveBackground.CaptureScreen(this, &_compTextWindow);
				PaintBeveledText(this, &_compTextWindow, szBroke, FONT_15POINT, TEXT_NORMAL, RGB(255, 255, 255), JUSTIFY_WRAP, FORMAT_TOP_LEFT);

				WaitForInput();

				saveBackground.Paint(this, &_compTextWindow);

			} else {
				CBagStorageDev *pSoldierSDev = nullptr;
				pSoldierSDev = SDEVMNGR->GetStorageDevice("SOLDIER_WLD");

				CBofBitmap saveBackgroundTwo(640, 480, (CBofPalette *)nullptr, false);
				saveBackgroundTwo.CaptureScreen(this, &_compTextWindow);

				// Don't allow him to order if he has other drinks in the Soldier CIC or stash
				if (pSoldierSDev) {
					bool bRefuse = false;
					if (pSoldierSDev->GetObject("DRINK1", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK2", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK3", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK4", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK5", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK6", true))
						bRefuse = true;
					else if (pSoldierSDev->GetObject("DRINK7", true))
						bRefuse = true;
					else if (nHaveDrink > 0)
						bRefuse = true;
					else {
						pSoldierSDev->ActivateLocalObject(CompItem.m_pDrink);
						BofPlaySound(BuildBarcDir(ORDERAUDIO), SOUND_MIX);
						pVar->SetValue(nCredits - 1);
						pVar2->SetValue(1);
					}
					
					if (bRefuse) {
						PaintBeveledText(this, &_compTextWindow, szRefuse, FONT_15POINT, TEXT_NORMAL, RGB(255, 255, 255), JUSTIFY_WRAP, FORMAT_TOP_LEFT);
						WaitForInput();

						saveBackgroundTwo.Paint(this, &_compTextWindow);
					}
				}

			}
		}
	}
}

void SBarComputer::PageUp() {
	if (m_eMode == DRINKMODE) {
		if (m_pDrinkBox) {
			m_pDrinkBox->PageUp();
		}
	} else if (m_pIngBox) {
		m_pIngBox->PageUp();
	}
}

void SBarComputer::PageDown() {
	if (m_eMode == DRINKMODE) {
		if (m_pDrinkBox) {
			m_pDrinkBox->PageDown();
		}
	} else if (m_pIngBox) {
		m_pIngBox->PageDown();
	}
}

void SBarComputer::OnBofButton(CBofObject *pObject, int nState) {
	Assert(IsValidObject(this));
	Assert(pObject != nullptr);

	if (nState != BUTTON_CLICKED)
		return;

	CBofButton *pButton = (CBofButton *)pObject;

	switch (pButton->GetControlID()) {
	case OFFBUT:
		SetOn();
		break;
	case ONBUT:
		SetOff();
		break;
	case DRINKS:
		SetDrink();
		break;
	case INGRED:
		SetIng();
		break;
	case LISTD:
		SetList();
		break;
	case LISTI:
		SetList();
		break;
	case ORDER:
		Order();
		break;
	case PGUP:
		PageUp();
		break;
	case PGDOWN:
		PageDown();
		break;
	case BCBACK:
		Back();
		break;
	case BCQUIT:
		LogInfo("\tClicked Quit");
		Close();
		break;

	case BCHELP: {
		LogInfo("\tClicked Help");

		CBagel *pApp = CBagel::getBagApp();

		if (pApp != nullptr) {
			CBagMasterWin *pWin = pApp->getMasterWnd();
			if (pWin != nullptr) {
				pWin->OnHelp(BuildBarcDir("BARCOMP.TXT"));
			}
		}
		}
		break;

	default:
		LogWarning(BuildString("Clicked Unknown Button with ID %d", pButton->GetControlID()));
		break;
	}
}

void SBarComputer::onKeyHit(uint32 lKey, uint32 nRepCount) {
	Assert(IsValidObject(this));

	switch (lKey) {
	case BKEY_UP:
		if (m_eMode == DRINKMODE) {
			if (m_pDrinkBox) {
				m_pDrinkBox->LineUp();
			}
		} else if (m_pIngBox) {
			m_pIngBox->LineUp();
		}
		break;

	case BKEY_DOWN:
		if (m_eMode == DRINKMODE) {
			if (m_pDrinkBox) {
				m_pDrinkBox->LineDown();
			}
		} else if (m_pIngBox) {
			m_pIngBox->LineDown();
		}
		break;

	case BKEY_PAGEUP:
		if (m_eMode == DRINKMODE) {
			if (m_pDrinkBox) {
				m_pDrinkBox->PageUp();
			}
		} else if (m_pIngBox) {
			m_pIngBox->PageUp();
		}
		break;

	case BKEY_PAGEDOWN:
		if (m_eMode == DRINKMODE) {
			if (m_pDrinkBox) {
				m_pDrinkBox->PageDown();
			}
		} else if (m_pIngBox) {
			m_pIngBox->PageDown();
		}
		break;

	default:
		CBagStorageDevWnd::onKeyHit(lKey, nRepCount);
		break;
	}
}

void SBarComputer::onMouseMove(uint32 nFlags, CBofPoint *xPoint, void *) {
	// Let CBagStorageDevWnd check for EXIT area
	CBagStorageDevWnd::onMouseMove(nFlags, xPoint);
}

const char *BuildBarcDir(const char *pszFile) {
	return formPath(BDCADIR, pszFile);
}

} // namespace SpaceBar
} // namespace Bagel