void RestoreBreaksFromFile( const char *name )
{
BrkClearAll();
InvokeAFile( name );
DoInput();
ReMapPoints( NULL );
}
VOID APIENTRY ControlFunc( ULONG parm )
{
ULONG ulCount;
parm = parm;
do {
DosWaitEventSem( Requestsem, SEM_INDEFINITE_WAIT ); // wait for Request
DosResetEventSem( Requestsem, &ulCount );
switch( Req ) {
case REQ_GO:
Go( true );
break;
case REQ_TRACE_OVER:
ExecTrace( TRACE_OVER, DbgLevel );
break;
case REQ_TRACE_INTO:
ExecTrace( TRACE_INTO, DbgLevel );
break;
}
DoInput();
_SwitchOff( SW_TASK_RUNNING );
DosPostEventSem( Requestdonesem );
} while( Req != REQ_BYE );
return; // thread over!
}
int main( int argc, char **argv )
{
char buff[256];
DWORD tid;
HANDLE hThread;
MemInit();
SetErrorMode( SEM_FAILCRITICALERRORS );
getcmd( buff );
CmdData = buff;
DebugMain();
_SwitchOff( SW_ERROR_STARTUP );
DoInput();
VarInitInfo( &Locals );
Requestsem = CreateSemaphore( NULL, 0, 1, NULL );
Requestdonesem = CreateSemaphore( NULL, 0, 1, NULL );
ReleaseSemaphore( Requestdonesem, 1, NULL ); // signal req done
hThread = CreateThread( NULL, 0, ControlFunc, NULL, 0, &tid );
if (hThread == NULL) {
MessageBox( NULL, "Error creating thread!", "Stubugger", MB_APPLMODAL+MB_OK );
}
while( !Done ) {
DlgCmd();
}
CloseHandle( Requestsem );
CloseHandle( Requestdonesem );
DebugFini();
RunRequest( REQ_BYE );
MemFini();
return( 0 );
}
int main( int argc, char **argv )
{
char buff[256];
TID tid;
APIRET rc;
MemInit();
getcmd( buff );
CmdData = buff;
DebugMain();
_SwitchOff( SW_ERROR_STARTUP );
DoInput();
VarInitInfo( &Locals );
DosCreateEventSem( NULL, &Requestsem, 0, false );
DosCreateEventSem( NULL, &Requestdonesem, 0, false );
DosPostEventSem( Requestdonesem ); // signal req done
rc = DosCreateThread( &tid, ControlFunc, 0, 0, 32768 );
if( rc != 0 ) {
printf( "Stubugger: Error creating thread!\n" );
}
while( !Done ) {
DlgCmd();
}
DosCloseEventSem( Requestsem );
DosCloseEventSem( Requestdonesem );
DebugFini();
RunRequest( REQ_BYE );
MemFini();
return( 0 );
}
void
PlanetOrbitMenu (void)
{
MENU_STATE MenuState;
InputFrameCallback *oldCallback;
memset (&MenuState, 0, sizeof MenuState);
DrawMenuStateStrings (PM_SCAN, SCAN);
LockMutex (GraphicsLock);
SetFlashRect (SFR_MENU_3DO);
UnlockMutex (GraphicsLock);
MenuState.CurState = SCAN;
SetMenuSounds (MENU_SOUND_ARROWS, MENU_SOUND_SELECT);
oldCallback = SetInputCallback (on_input_frame);
MenuState.InputFunc = DoPlanetOrbit;
DoInput (&MenuState, TRUE);
SetInputCallback (oldCallback);
LockMutex (GraphicsLock);
SetFlashRect (NULL);
UnlockMutex (GraphicsLock);
DrawMenuStateStrings (PM_STARMAP, -NAVIGATION);
}
static BOOLEAN
TalkSegue (COUNT wait_track)
{
TALKING_STATE talkingState;
// Transition animation to talking state, if necessary
if (wantTalkingAnim () && haveTalkingAnim ())
{
if (haveTransitionAnim ())
setRunIntroAnim ();
setRunTalkingAnim ();
// wait until the transition finishes
while (runningIntroAnim ())
runCommAnimFrame ();
}
memset (&talkingState, 0, sizeof talkingState);
if (wait_track == 0)
{ // Restarting with a rewind
wait_track = WAIT_TRACK_ALL;
talkingState.rewind = true;
}
else if (!PlayingTrack ())
{ // initial start of player
PlayTrack ();
assert (PlayingTrack ());
}
// Run the talking controls
SetMenuSounds (MENU_SOUND_NONE, MENU_SOUND_NONE);
talkingState.InputFunc = DoTalkSegue;
talkingState.waitTrack = wait_track;
DoInput (&talkingState, FALSE);
ClearSubtitles ();
if (talkingState.ended)
{ // reached the end; set STOP icon
SetSliderImage (SetAbsFrameIndex (ActivityFrame, 8));
}
// transition back to silent, if necessary
if (runningTalkingAnim ())
setStopTalkingAnim ();
// Wait until the animation task stops "talking"
while (runningTalkingAnim ())
runCommAnimFrame ();
return talkingState.ended;
}
void Player::Tick() {
DoInput();
UpdateVelocity();
DoCollision();
UpdatePosition();
DoJump();
DoOrient();
DoBlockPicking();
}
void DlgCmd( void )
{
char buff[256];
printf( "DBG>" );
fflush( stdout ); // not really necessary
gets( buff );
if( buff[0] != NULLCHAR && buff[1] == NULLCHAR ) {
switch( tolower( buff[0] ) ) {
case 'u':
WndAsmInspect( GetCodeDot() );
break;
case 's':
DumpSource();
break;
case 'l':
DumpLocals();
break;
case 'i':
RunRequest( REQ_TRACE_INTO );
break;
case 'o':
RunRequest( REQ_TRACE_OVER );
break;
case 'g':
RunRequest( REQ_GO );
break;
case 'x':
if( _IsOn( SW_REMOTE_LINK ) ) {
printf( "Can't break remote task!\n" );
} else {
HMODULE hmod;
PFN proc = NULL;
DosQueryModuleHandle( TrapParms, &hmod );
DosQueryProcAddr( hmod, 5, 0, &proc );
// if( proc != NULL )
// proc();
}
// break the task
break;
default:
printf( "Error - unrecognized command\n" );
}
} else {
DoCmd( DupStr( buff ) );
DoInput();
}
}
void DlgNewProg( void )
{
dlg_new_prog dlg;
for( ;; ) {
DoDlgNewProg( &dlg );
if( dlg.cancel )
break;
LoadNewProg( dlg.prog, dlg.args );
if( _IsOn( SW_HAVE_TASK ) ) {
break;
}
}
DoInput();
}
void DlgCmd( void )
{
char buff[256];
printf( "DBG>" );
fflush( stdout );
gets( buff );
if( buff[0] != NULLCHAR && buff[1] == NULLCHAR ) {
switch( tolower( buff[0] ) ) {
case 'u':
WndAsmInspect( GetCodeDot() );
break;
case 's':
DumpSource();
break;
case 'l':
DumpLocals();
break;
case 'i':
RunRequest( REQ_TRACE_INTO );
break;
case 'o':
RunRequest( REQ_TRACE_OVER );
break;
case 'g':
RunRequest( REQ_GO );
break;
case 'x':
if( _IsOn( SW_REMOTE_LINK ) ) {
printf( "Can't break remote task!\n" );
} else {
HANDLE hmod;
FARPROC proc;
hmod = GetModuleHandle( TrapParms );
proc = GetProcAddress( hmod, (LPSTR)5 );
if( proc != NULL ) proc();
CloseHandle( hmod );
}
// break the task
break;
default:
printf( "Error - unrecognized command\n" );
}
} else {
DoCmd( DupStr( buff ) );
DoInput();
}
}
void
CargoMenu (void)
{
MENU_STATE MenuState;
memset (&MenuState, 0, sizeof MenuState);
// draw the initial cargo display
DrawCargoStrings ((BYTE)~0, MenuState.CurState);
DrawElementDescription (MenuState.CurState);
SetMenuSounds (MENU_SOUND_ARROWS, MENU_SOUND_SELECT);
MenuState.InputFunc = DoDiscardCargo;
DoInput (&MenuState, TRUE);
// erase the cargo display
ClearSISRect (DRAW_SIS_DISPLAY);
}
BOOLEAN
RosterMenu (void)
{
MENU_STATE MenuState;
ROSTER_STATE RosterState;
memset (&MenuState, 0, sizeof MenuState);
MenuState.privData = &RosterState;
memset (&RosterState, 0, sizeof RosterState);
RosterState.count = CountLinks (&GLOBAL (built_ship_q));
if (!RosterState.count)
return FALSE;
// Get the escort positions we will use and sort on X then Y
assert (sizeof (RosterState.shipPos) == sizeof (ship_pos));
memcpy (RosterState.shipPos, ship_pos, sizeof (ship_pos));
qsort (RosterState.shipPos, RosterState.count,
sizeof (RosterState.shipPos[0]), compShipPos);
LockMutex (GraphicsLock);
SetContext (StatusContext);
selectSupportShip (&RosterState, MenuState.CurState);
UnlockMutex (GraphicsLock);
SetMenuSounds (MENU_SOUND_ARROWS, MENU_SOUND_SELECT);
MenuState.InputFunc = DoModifyRoster;
DoInput (&MenuState, TRUE);
LockMutex (GraphicsLock);
SetContext (StatusContext);
// unselect the last ship
drawSupportShip (&RosterState, FALSE);
DrawStatusMessage (NULL);
UnlockMutex (GraphicsLock);
return TRUE;
}
BOOLEAN
DevicesMenu (void)
{
MENU_STATE MenuState;
DEVICES_STATE DevicesState;
memset (&MenuState, 0, sizeof MenuState);
MenuState.privData = &DevicesState;
memset (&DevicesState, 0, sizeof DevicesState);
DevicesState.count = InventoryDevices (DevicesState.list, NUM_DEVICES);
if (!DevicesState.count)
return FALSE;
DrawDevices (&DevicesState, (COUNT)~0, MenuState.CurState);
SetMenuSounds (MENU_SOUND_ARROWS | MENU_SOUND_PAGEUP | MENU_SOUND_PAGEDOWN,
MENU_SOUND_SELECT);
MenuState.InputFunc = DoManipulateDevices;
DoInput (&MenuState, TRUE);
SetMenuSounds (MENU_SOUND_ARROWS, MENU_SOUND_SELECT);
if (GLOBAL_SIS (CrewEnlisted) != (COUNT)~0
&& !(GLOBAL (CurrentActivity) & CHECK_ABORT))
{
LockMutex (GraphicsLock);
ClearSISRect (DRAW_SIS_DISPLAY);
UnlockMutex (GraphicsLock);
if (!GET_GAME_STATE (PORTAL_COUNTER)
&& !(GLOBAL (CurrentActivity) & START_ENCOUNTER)
&& GLOBAL_SIS (CrewEnlisted) != (COUNT)~0)
return TRUE;
}
return FALSE;
}
static DWORD WINAPI ControlFunc( LPVOID parm )
{
parm = parm;
do {
WaitForSingleObject( Requestsem, INFINITE ); // wait for Request
switch( Req ) {
case REQ_GO:
Go( true );
break;
case REQ_TRACE_OVER:
ExecTrace( TRACE_OVER, DbgLevel );
break;
case REQ_TRACE_INTO:
ExecTrace( TRACE_INTO, DbgLevel );
break;
}
DoInput();
_SwitchOff( SW_TASK_RUNNING );
ReleaseSemaphore( Requestdonesem, 1, NULL ); // signal req done
} while( Req != REQ_BYE );
return( 0 ); // thread over!
}
bool TSimpleTextMiner::Run()
{
if (Input == NULL || Output == NULL)
return false;
Wtroka text;
SDocumentAttribtes docAttr;
ETypeOfDocument type;
while (DoInput(text, docAttr, type)) {
bool res = DoProcess(text, docAttr, type);
if (res)
res = DoOutput(docAttr);
if (!res && Errors != NULL && dynamic_cast<TStringStream*>(ErrorStream) != NULL) {
TStringStream* str = static_cast<TStringStream*>(ErrorStream);
Errors->OutputError(str->Str());
str->clear();
}
}
return true;
}
static void key_callback( GLFWwindow* window, int key, int scancode, int action, int mods )
{
DoInput( key, scancode, action, mods );
}
BOOLEAN
Roster (void)
{
COUNT num_support_ships;
num_support_ships = CountLinks (&GLOBAL (built_ship_q));
if (num_support_ships)
{
SIZE i, j, k, l;
POINT modified_ship_pos[MAX_COMBAT_SHIPS];
POINT ship_pos[MAX_COMBAT_SHIPS] =
{
SUPPORT_SHIP_PTS
};
MENU_STATE MenuState;
MENU_STATE *pOldMenuState;
pOldMenuState = pMenuState;
pMenuState = &MenuState;
j = 0;
k = (num_support_ships + 1) >> 1;
for (i = 0; (int)i < (int)num_support_ships; i += 2)
{
modified_ship_pos[j++] = ship_pos[i];
modified_ship_pos[k++] = ship_pos[i + 1];
}
k = (num_support_ships + 1) >> 1;
for (i = 0; i < k; ++i)
{
for (j = k - 1; j > i; --j)
{
if (modified_ship_pos[i].y > modified_ship_pos[j].y)
{
POINT temp;
temp = modified_ship_pos[i];
modified_ship_pos[i] = modified_ship_pos[j];
modified_ship_pos[j] = temp;
}
}
}
l = k;
k = num_support_ships >> 1;
for (i = 0; i < k; ++i)
{
for (j = k - 1; j > i; --j)
{
if (modified_ship_pos[i + l].y > modified_ship_pos[j + l].y)
{
POINT temp;
temp = modified_ship_pos[i + l];
modified_ship_pos[i + l] = modified_ship_pos[j + l];
modified_ship_pos[j + l] = temp;
}
}
}
MenuState.InputFunc = DoModifyRoster;
MenuState.Initialized = FALSE;
MenuState.CurState = 0;
MenuState.flash_task = 0;
MenuState.delta_item = (SIZE)num_support_ships;
MenuState.flash_frame0 = (FRAME)ship_pos;
MenuState.flash_frame1 = (FRAME)modified_ship_pos;
SetMenuSounds (MENU_SOUND_ARROWS, MENU_SOUND_SELECT);
DoInput (&MenuState, TRUE);
pMenuState = pOldMenuState;
return TRUE;
}
return FALSE;
}
static BOOLEAN
DoConvSummary (SUMMARY_STATE *pSS)
{
#define DELTA_Y_SUMMARY RES_SCALE(8) // JMS_GFX
//#define MAX_SUMM_ROWS ((SIS_SCREEN_HEIGHT - SLIDER_Y - SLIDER_HEIGHT) / DELTA_Y_SUMMARY
#define MAX_SUMM_ROWS (SLIDER_Y / DELTA_Y_SUMMARY) - 1 // JMS_GFX
if (!pSS->Initialized)
{
pSS->PrintNext = TRUE;
pSS->NextSub = GetFirstTrackSubtitle ();
pSS->LeftOver = NULL;
pSS->InputFunc = DoConvSummary;
pSS->Initialized = TRUE;
DoInput (pSS, FALSE);
}
else if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
return FALSE; // bail out
}
else if (PulsedInputState.menu[KEY_MENU_SELECT]
|| PulsedInputState.menu[KEY_MENU_CANCEL]
|| PulsedInputState.menu[KEY_MENU_RIGHT])
{
if (pSS->NextSub)
{ // we want the next page
pSS->PrintNext = TRUE;
}
else
{ // no more, we are done
return FALSE;
}
}
else if (pSS->PrintNext)
{ // print the next page
RECT r;
TEXT t;
int row;
r.corner.x = 0;
r.corner.y = 0;
r.extent.width = SIS_SCREEN_WIDTH;
r.extent.height = SLIDER_Y; //SIS_SCREEN_HEIGHT - SLIDER_Y - SLIDER_HEIGHT + RES_SCALE(2) + 16 * RESOLUTION_FACTOR; // JMS_GFX
SetContext (AnimContext);
SetContextForeGroundColor (COMM_HISTORY_BACKGROUND_COLOR);
DrawFilledRectangle (&r);
SetContextForeGroundColor (COMM_HISTORY_TEXT_COLOR);
r.extent.width -= 2 + 2;
t.baseline.x = RES_SCALE(2); // JMS_GFX
t.align = ALIGN_LEFT;
t.baseline.y = DELTA_Y_SUMMARY;
SetContextFont (TinyFont);
for (row = 0; row < MAX_SUMM_ROWS && pSS->NextSub;
++row, pSS->NextSub = GetNextTrackSubtitle (pSS->NextSub))
{
const char *next = NULL;
if (pSS->LeftOver)
{ // some text left from last subtitle
t.pStr = pSS->LeftOver;
pSS->LeftOver = NULL;
}
else
{
t.pStr = GetTrackSubtitleText (pSS->NextSub);
if (!t.pStr)
continue;
}
t.CharCount = (COUNT)~0;
for ( ; row < MAX_SUMM_ROWS && !getLineWithinWidth (&t, &next, r.extent.width, (COUNT)~0); ++row) {
if (CommData.AlienConv == ORZ_CONVERSATION) { // MB: nasty hack: remove '$'s from conversation for Orz
UNICODE my_copy[128];
strcpy(my_copy, t.pStr);
remove_char_from_string(my_copy, '$');
t.pStr = my_copy;
font_DrawText(&t);
} else { // Normal mode
font_DrawText(&t);
}
t.baseline.y += DELTA_Y_SUMMARY;
t.pStr = next;
t.CharCount = (COUNT)~0;
}
if (row >= MAX_SUMM_ROWS)
{ // no more space on screen, but some text left over
// from the current subtitle
pSS->LeftOver = next;
break;
}
// this subtitle fit completely
if (CommData.AlienConv == ORZ_CONVERSATION) { // MB: nasty hack: remove '$'s from conversation for Orz
UNICODE my_copy[128];
strcpy(my_copy, t.pStr);
remove_char_from_string(my_copy, '$');
t.pStr = my_copy;
font_DrawText(&t);
} else { // Normal mode
font_DrawText(&t);
}
t.baseline.y += DELTA_Y_SUMMARY;
}
if (row >= MAX_SUMM_ROWS && (pSS->NextSub || pSS->LeftOver))
{ // draw *MORE*
TEXT mt;
UNICODE buffer[128];
mt.baseline.x = SIS_SCREEN_WIDTH >> 1;
mt.baseline.y = t.baseline.y;
mt.align = ALIGN_CENTER;
snprintf (buffer, sizeof (buffer), "%s%s%s", // "MORE"
STR_MIDDLE_DOT, GAME_STRING (FEEDBACK_STRING_BASE + 1),
STR_MIDDLE_DOT);
if (CommData.AlienConv == ORZ_CONVERSATION) { // MB: nasty hack: remove '$'s from conversation for Orz
remove_char_from_string(buffer, '$');
}
mt.pStr = buffer;
SetContextForeGroundColor (COMM_MORE_TEXT_COLOR);
font_DrawText (&mt);
}
BOOLEAN
DoTextEntry (PTEXTENTRY_STATE pTES)
{
wchar_t ch;
UNICODE *pStr;
UNICODE *CacheInsPt;
int CacheCursorPos;
int len;
BOOLEAN changed = FALSE;
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
return (FALSE);
if (!pTES->Initialized)
{ // init basic vars
int lwlen;
pTES->InputFunc = DoTextEntry;
pTES->Success = FALSE;
pTES->Initialized = TRUE;
pTES->JoystickMode = FALSE;
pTES->UpperRegister = TRUE;
// init insertion point
if ((size_t)pTES->CursorPos > utf8StringCount (pTES->BaseStr))
pTES->CursorPos = utf8StringCount (pTES->BaseStr);
pTES->InsPt = skipUTF8Chars (pTES->BaseStr, pTES->CursorPos);
// load joystick alphabet
pTES->JoyAlphaString = CaptureStringTable (
LoadStringTable (JOYSTICK_ALPHA_STRTAB));
pTES->JoyAlpha = LoadJoystickAlpha (
SetAbsStringTableIndex (pTES->JoyAlphaString, 0),
&pTES->JoyAlphaLength);
pTES->JoyUpper = LoadJoystickAlpha (
SetAbsStringTableIndex (pTES->JoyAlphaString, 1),
&pTES->JoyRegLength);
pTES->JoyLower = LoadJoystickAlpha (
SetAbsStringTableIndex (pTES->JoyAlphaString, 2),
&lwlen);
if (lwlen != pTES->JoyRegLength)
{
if (lwlen < pTES->JoyRegLength)
pTES->JoyRegLength = lwlen;
log_add (log_Warning, "Warning: Joystick upper-lower registers"
" size mismatch; using the smallest subset (%d)",
pTES->JoyRegLength);
}
pTES->CacheStr = HMalloc (pTES->MaxSize * sizeof (*pTES->CacheStr));
DoInput (pTES, TRUE);
if (pTES->CacheStr)
HFree (pTES->CacheStr);
if (pTES->JoyLower)
HFree (pTES->JoyLower);
if (pTES->JoyUpper)
HFree (pTES->JoyUpper);
if (pTES->JoyAlpha)
HFree (pTES->JoyAlpha);
DestroyStringTable ( ReleaseStringTable (pTES->JoyAlphaString));
return pTES->Success;
}
pStr = pTES->InsPt;
len = strlen (pStr);
// save a copy of string
CacheInsPt = pTES->InsPt;
CacheCursorPos = pTES->CursorPos;
memcpy (pTES->CacheStr, pTES->BaseStr, pTES->MaxSize);
// process the pending character buffer
ch = GetNextCharacter ();
if (!ch && PulsedInputState.menu[KEY_MENU_ANY])
{ // keyboard repeat, but only when buffer empty
ch = GetLastCharacter ();
}
while (ch)
{
UNICODE chbuf[8];
int chsize;
pTES->JoystickMode = FALSE;
chsize = getStringFromChar (chbuf, sizeof (chbuf), ch);
if (isWidePrintChar (ch) && chsize > 0)
{
if (pStr + len - pTES->BaseStr + chsize < pTES->MaxSize)
{ // insert character, when fits
memmove (pStr + chsize, pStr, len + 1);
memcpy (pStr, chbuf, chsize);
pStr += chsize;
++pTES->CursorPos;
changed = TRUE;
}
else
{ // does not fit
PlayMenuSound (MENU_SOUND_FAILURE);
}
}
ch = GetNextCharacter ();
}
if (PulsedInputState.menu[KEY_MENU_DELETE])
{
if (len)
{
joy_char_t ch;
ReadOneChar (&ch, pStr);
memmove (pStr, pStr + ch.len, len - ch.len + 1);
len -= ch.len;
changed = TRUE;
}
}
else if (PulsedInputState.menu[KEY_MENU_BACKSPACE])
{
if (pStr > pTES->BaseStr)
{
UNICODE *prev = skipUTF8Chars (pTES->BaseStr,
pTES->CursorPos - 1);
memmove (prev, pStr, len + 1);
pStr = prev;
--pTES->CursorPos;
changed = TRUE;
}
}
else if (PulsedInputState.menu[KEY_MENU_LEFT])
{
if (pStr > pTES->BaseStr)
{
UNICODE *prev = skipUTF8Chars (pTES->BaseStr,
pTES->CursorPos - 1);
pStr = prev;
len += (prev - pStr);
--pTES->CursorPos;
changed = TRUE;
}
}
else if (PulsedInputState.menu[KEY_MENU_RIGHT])
{
if (len > 0)
{
joy_char_t ch;
ReadOneChar (&ch, pStr);
pStr += ch.len;
len -= ch.len;
++pTES->CursorPos;
changed = TRUE;
}
}
else if (PulsedInputState.menu[KEY_MENU_HOME])
{
if (pStr > pTES->BaseStr)
{
pStr = pTES->BaseStr;
len = strlen (pStr);
pTES->CursorPos = 0;
changed = TRUE;
}
}
else if (PulsedInputState.menu[KEY_MENU_END])
{
if (len > 0)
{
pTES->CursorPos += utf8StringCount (pStr);
pStr += len;
len = 0;
changed = TRUE;
}
}
if (pTES->JoyAlpha && (
PulsedInputState.menu[KEY_MENU_UP] ||
PulsedInputState.menu[KEY_MENU_DOWN] ||
PulsedInputState.menu[KEY_MENU_PAGE_UP] ||
PulsedInputState.menu[KEY_MENU_PAGE_DOWN]) )
{ // do joystick text
joy_char_t ch;
joy_char_t newch;
joy_char_t cmpch;
int i;
pTES->JoystickMode = TRUE;
if (len)
ReadOneChar (&ch, pStr);
else
ch = pTES->JoyAlpha[0];
newch = ch;
JoyCharToUpper (&cmpch, &ch, pTES);
// find current char in the alphabet
i = JoyCharFindIn (&cmpch, pTES->JoyAlpha, pTES->JoyAlphaLength);
if (PulsedInputState.menu[KEY_MENU_UP])
{
--i;
if (i < 0)
i = pTES->JoyAlphaLength - 1;
newch = pTES->JoyAlpha[i];
}
else if (PulsedInputState.menu[KEY_MENU_DOWN])
{
++i;
if (i >= pTES->JoyAlphaLength)
i = 0;
newch = pTES->JoyAlpha[i];
}
if (PulsedInputState.menu[KEY_MENU_PAGE_UP] ||
PulsedInputState.menu[KEY_MENU_PAGE_DOWN])
{
if (len)
{ // single char change
if (JoyCharIsLower (&newch, pTES))
JoyCharToUpper (&newch, &newch, pTES);
else
JoyCharToLower (&newch, &newch, pTES);
}
else
{ // register change
pTES->UpperRegister = !pTES->UpperRegister;
}
}
else
{ // check register
if (pTES->UpperRegister)
JoyCharToUpper (&newch, &newch, pTES);
else
JoyCharToLower (&newch, &newch, pTES);
}
if (strcmp (newch.enc, ch.enc) != 0)
{ // new char is different, put it in
if (len)
{ // change current -- this is messy with utf8
int l = len - ch.len;
if (pStr + l - pTES->BaseStr + newch.len < pTES->MaxSize)
{
// adjust other chars if necessary
if (newch.len != ch.len)
memmove (pStr + newch.len, pStr + ch.len, l + 1);
memcpy (pStr, newch.enc, newch.len);
len = l + newch.len;
changed = TRUE;
}
}
else
{ // append
if (pStr + len - pTES->BaseStr + newch.len < pTES->MaxSize)
{
memcpy (pStr, newch.enc, newch.len);
pStr[newch.len] = '\0';
len += newch.len;
changed = TRUE;
}
else
{ // does not fit
PlayMenuSound (MENU_SOUND_FAILURE);
}
}
}
}
if (PulsedInputState.menu[KEY_MENU_SELECT])
{ // done entering
pTES->Success = TRUE;
return FALSE;
}
else if (PulsedInputState.menu[KEY_MENU_EDIT_CANCEL])
{ // canceled entering
pTES->Success = FALSE;
return FALSE;
}
pTES->InsPt = pStr;
if (changed && pTES->ChangeCallback)
{
if (!pTES->ChangeCallback (pTES))
{ // changes not accepted - revert
memcpy (pTES->BaseStr, pTES->CacheStr, pTES->MaxSize);
pTES->InsPt = CacheInsPt;
pTES->CursorPos = CacheCursorPos;
PlayMenuSound (MENU_SOUND_FAILURE);
}
}
if (pTES->FrameCallback)
return pTES->FrameCallback (pTES);
return TRUE;
}
BOOLEAN
Battle (BattleFrameCallback *callback)
{
SIZE num_ships;
LockMutex (GraphicsLock);
#if !(DEMO_MODE || CREATE_JOURNAL)
if (LOBYTE (GLOBAL (CurrentActivity)) != SUPER_MELEE) {
// In Supermelee, the RNG is already initialised.
TFB_SeedRandom (GetTimeCounter ());
}
#else /* DEMO_MODE */
if (BattleSeed == 0)
BattleSeed = TFB_Random ();
TFB_SeedRandom (BattleSeed);
BattleSeed = TFB_Random (); /* get next battle seed */
#endif /* DEMO_MODE */
BattleSong (FALSE);
num_ships = InitShips ();
if (instantVictory)
{
num_ships = 0;
battle_counter[0] = 1;
battle_counter[1] = 0;
instantVictory = FALSE;
}
if (num_ships)
{
BATTLE_STATE bs;
GLOBAL (CurrentActivity) |= IN_BATTLE;
battle_counter[0] = CountLinks (&race_q[0]);
battle_counter[1] = CountLinks (&race_q[1]);
if (optMeleeScale != TFB_SCALE_STEP)
SetGraphicScaleMode (optMeleeScale);
setupBattleInputOrder ();
#ifdef NETPLAY
initBattleInputBuffers ();
#ifdef NETPLAY_CHECKSUM
initChecksumBuffers ();
#endif /* NETPLAY_CHECKSUM */
battleFrameCount = 0;
ResetWinnerStarShip ();
setBattleStateConnections (&bs);
#endif /* NETPLAY */
if (!selectAllShips (num_ships)) {
GLOBAL (CurrentActivity) |= CHECK_ABORT;
goto AbortBattle;
}
BattleSong (TRUE);
bs.NextTime = 0;
#ifdef NETPLAY
initBattleStateDataConnections ();
{
bool allOk = negotiateReadyConnections (true, NetState_inBattle);
if (!allOk) {
GLOBAL (CurrentActivity) |= CHECK_ABORT;
goto AbortBattle;
}
}
#endif /* NETPLAY */
bs.InputFunc = DoBattle;
bs.frame_cb = callback;
bs.first_time = (BOOLEAN)(LOBYTE (GLOBAL (CurrentActivity)) ==
IN_HYPERSPACE);
UnlockMutex (GraphicsLock);
DoInput (&bs, FALSE);
LockMutex (GraphicsLock);
AbortBattle:
if (LOBYTE (GLOBAL (CurrentActivity)) == SUPER_MELEE)
{
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
// Do not return to the main menu when a game is aborted,
// (just to the supermelee menu).
#ifdef NETPLAY
UnlockMutex (GraphicsLock);
waitResetConnections(NetState_inSetup);
// A connection may already be in inSetup (set from
// GetMeleeStarship). This is not a problem, although
// it will generate a warning in debug mode.
LockMutex (GraphicsLock);
#endif
GLOBAL (CurrentActivity) &= ~CHECK_ABORT;
}
else
{
// Show the result of the battle.
MeleeGameOver ();
}
}
#ifdef NETPLAY
uninitBattleInputBuffers();
#ifdef NETPLAY_CHECKSUM
uninitChecksumBuffers ();
#endif /* NETPLAY_CHECKSUM */
setBattleStateConnections (NULL);
#endif /* NETPLAY */
StopDitty ();
StopMusic ();
StopSound ();
}
UninitShips ();
FreeBattleSong ();
UnlockMutex (GraphicsLock);
return (BOOLEAN) (num_ships < 0);
}
// Show the contexts on the screen.
// Must be called from the main thread.
void
debugContexts (void)
{
static volatile bool inDebugContexts = false;
// Prevent this function from being called from within itself.
CONTEXT orgContext;
CONTEXT debugDrawContext;
// We're going to use this context to draw in.
FRAME debugDrawFrame;
double hueIncrement;
size_t visibleContextI;
CONTEXT context;
size_t contextCount;
FRAME savedScreen;
// Prevent this function from being called from within itself.
if (inDebugContexts)
return;
inDebugContexts = true;
contextCount = countVisibleContexts ();
if (contextCount == 0)
{
goto out;
}
savedScreen = getScreen ();
FlushGraphics ();
// Make sure that the screen has actually been captured,
// before we use the frame.
// Create a new frame to draw on.
debugDrawContext = CreateContext ("debugDrawContext");
// New work frame is a copy of the original.
debugDrawFrame = CaptureDrawable (CloneFrame (savedScreen));
orgContext = SetContext (debugDrawContext);
SetContextFGFrame (debugDrawFrame);
hueIncrement = 360.0 / contextCount;
visibleContextI = 0;
for (context = GetFirstContext (); context != NULL;
context = GetNextContext (context))
{
if (context == debugDrawContext) {
// Skip our own context.
continue;
}
if (isContextVisible (context))
{
// Only draw the visible contexts.
drawContext (context, visibleContextI * hueIncrement);
visibleContextI++;
}
describeContext (stderr, context);
}
// Blit the final debugging frame to the screen.
putScreen (debugDrawFrame);
// Wait for a key:
{
WAIT_STATE state;
state.InputFunc = waitForKey;
DoInput(&state, TRUE);
}
SetContext (orgContext);
// Destroy the debugging frame and context.
DestroyContext (debugDrawContext);
// This does nothing with the drawable set with
// SetContextFGFrame().
DestroyDrawable (ReleaseDrawable (debugDrawFrame));
putScreen (savedScreen);
DestroyDrawable (ReleaseDrawable (savedScreen));
out:
inDebugContexts = false;
}
void
DoPopupWindow (const char *msg)
{
stringbank *bank = StringBank_Create ();
const char *lines[30];
WIDGET_LABEL label;
STAMP s;
CONTEXT oldContext;
RECT oldRect;
RECT windowRect;
POPUP_STATE state;
MENU_SOUND_FLAGS s0, s1;
InputFrameCallback *oldCallback;
if (!bank)
{
log_add (log_Fatal, "FATAL: Memory exhaustion when preparing popup window");
exit (EXIT_FAILURE);
}
label.tag = WIDGET_TYPE_LABEL;
label.parent = NULL;
label.handleEvent = Widget_HandleEventIgnoreAll;
label.receiveFocus = Widget_ReceiveFocusRefuseFocus;
label.draw = Widget_DrawLabel;
label.height = Widget_HeightLabel;
label.width = Widget_WidthFullScreen;
label.line_count = SplitString (msg, '\n', 30, lines, bank);
label.lines = lines;
LockMutex (GraphicsLock);
oldContext = SetContext (ScreenContext);
GetContextClipRect (&oldRect);
SetContextClipRect (NULL);
// TODO: Maybe DrawLabelAsWindow() should return a saved STAMP?
// We do not know the dimensions here, and so save the whole context
s = SaveContextFrame (NULL);
Widget_SetFont (StarConFont);
Widget_SetWindowColors (SHADOWBOX_BACKGROUND_COLOR, SHADOWBOX_DARK_COLOR,
SHADOWBOX_MEDIUM_COLOR);
DrawLabelAsWindow (&label, &windowRect);
SetSystemRect (&windowRect);
GetMenuSounds (&s0, &s1);
SetMenuSounds (MENU_SOUND_NONE, MENU_SOUND_NONE);
oldCallback = SetInputCallback (NULL);
state.InputFunc = DoPopup;
DoInput (&state, TRUE);
SetInputCallback (oldCallback);
ClearSystemRect ();
DrawStamp (&s);
DestroyDrawable (ReleaseDrawable (s.frame));
SetContextClipRect (&oldRect);
SetContext (oldContext);
UnlockMutex (GraphicsLock);
SetMenuSounds (s0, s1);
StringBank_Free (bank);
}
static BOOLEAN
RestartMenu (MENU_STATE *pMS)
{
TimeCount TimeOut;
ReinitQueue (&race_q[0]);
ReinitQueue (&race_q[1]);
SetContext (ScreenContext);
GLOBAL (CurrentActivity) |= CHECK_ABORT;
if (GLOBAL_SIS (CrewEnlisted) == (COUNT)~0
&& GET_GAME_STATE (UTWIG_BOMB_ON_SHIP)
&& !GET_GAME_STATE (UTWIG_BOMB))
{ // player blew himself up with Utwig bomb
SET_GAME_STATE (UTWIG_BOMB_ON_SHIP, 0);
SleepThreadUntil (FadeScreen (FadeAllToWhite, ONE_SECOND / 8)
+ ONE_SECOND / 60);
SetContextBackGroundColor (
BUILD_COLOR (MAKE_RGB15 (0x1F, 0x1F, 0x1F), 0x0F));
ClearDrawable ();
FlushColorXForms ();
TimeOut = ONE_SECOND / 8;
}
else
{
TimeOut = ONE_SECOND / 2;
if (LOBYTE (LastActivity) == WON_LAST_BATTLE)
{
GLOBAL (CurrentActivity) = WON_LAST_BATTLE;
Victory ();
Credits (TRUE);
FreeGameData ();
GLOBAL (CurrentActivity) = CHECK_ABORT;
}
}
LastActivity = 0;
NextActivity = 0;
// TODO: This fade is not always necessary, especially after a splash
// screen. It only makes a user wait.
SleepThreadUntil (FadeScreen (FadeAllToBlack, TimeOut));
if (TimeOut == ONE_SECOND / 8)
SleepThread (ONE_SECOND * 3);
pMS->CurFrame = CaptureDrawable (LoadGraphic (RESTART_PMAP_ANIM));
DrawRestartMenuGraphic (pMS);
GLOBAL (CurrentActivity) &= ~CHECK_ABORT;
SetMenuSounds (MENU_SOUND_UP | MENU_SOUND_DOWN, MENU_SOUND_SELECT);
SetDefaultMenuRepeatDelay ();
DoInput (pMS, TRUE);
StopMusic ();
if (pMS->hMusic)
{
DestroyMusic (pMS->hMusic);
pMS->hMusic = 0;
}
Flash_terminate (pMS->flashContext);
pMS->flashContext = 0;
DestroyDrawable (ReleaseDrawable (pMS->CurFrame));
pMS->CurFrame = 0;
if (GLOBAL (CurrentActivity) == (ACTIVITY)~0)
return (FALSE); // timed out
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
return (FALSE); // quit
TimeOut = FadeScreen (FadeAllToBlack, ONE_SECOND / 2);
SleepThreadUntil (TimeOut);
FlushColorXForms ();
SeedRandomNumbers ();
return (LOBYTE (GLOBAL (CurrentActivity)) != SUPER_MELEE);
}
void
DoPopupWindow(const char *msg)
{
stringbank *bank = StringBank_Create ();
const char *lines[30];
WIDGET_LABEL label;
RECT r;
STAMP s;
FRAME F;
CONTEXT oldContext;
RECT oldRect;
POPUP_STATE state;
MENU_SOUND_FLAGS s0, s1;
if (!bank)
{
log_add (log_Fatal, "FATAL: Memory exhaustion when preparing popup window");
exit (EXIT_FAILURE);
}
label.tag = WIDGET_TYPE_LABEL;
label.parent = NULL;
label.handleEvent = Widget_HandleEventIgnoreAll;
label.receiveFocus = Widget_ReceiveFocusRefuseFocus;
label.draw = Widget_DrawLabel;
label.height = Widget_HeightLabel;
label.width = Widget_WidthFullScreen;
label.line_count = SplitString (msg, '\n', 30, lines, bank);
label.lines = lines;
LockMutex (GraphicsLock);
oldContext = SetContext (ScreenContext);
GetContextClipRect (&oldRect);
SetContextClipRect (NULL_PTR);
/* TODO: Better measure of dimensions than this */
r.extent.width = SCREEN_WIDTH;
r.extent.height = SCREEN_HEIGHT;
r.corner.x = (SCREEN_WIDTH - r.extent.width) >> 1;
r.corner.y = (SCREEN_HEIGHT - r.extent.height) >> 1;
F = CaptureDrawable (LoadDisplayPixmap (&r, (FRAME)0));
s.origin = r.corner;
s.frame = F;
DrawLabelAsWindow (&label);
GetMenuSounds (&s0, &s1);
SetMenuSounds (MENU_SOUND_NONE, MENU_SOUND_NONE);
state.InputFunc = DoPopup;
DoInput (&state, TRUE);
DrawStamp (&s);
DestroyDrawable (ReleaseDrawable (s.frame));
FlushInput ();
SetContextClipRect (&oldRect);
SetContext (oldContext);
UnlockMutex (GraphicsLock);
SetMenuSounds (s0, s1);
StringBank_Free (bank);
}
// Post: the NetState for all players is NetState_interBattle
static BOOLEAN
GetMeleeStarShips (COUNT playerMask, HSTARSHIP *ships)
{
COUNT playerI;
BOOLEAN ok;
GETMELEE_STATE gmstate;
TimeCount now;
COUNT i;
#ifdef NETPLAY
for (playerI = 0; playerI < NUM_PLAYERS; playerI++)
{
NetConnection *conn;
if ((playerMask & (1 << playerI)) == 0)
continue;
// XXX: This does not have to be done per connection.
conn = netConnections[playerI];
if (conn != NULL) {
BattleStateData *battleStateData;
battleStateData =
(BattleStateData *) NetConnection_getStateData (conn);
battleStateData->getMeleeState = &gmstate;
}
}
#endif
ok = true;
now = GetTimeCounter ();
gmstate.InputFunc = DoGetMelee;
gmstate.Initialized = FALSE;
for (i = 0; i < NUM_PLAYERS; ++i)
{
// We have to use TFB_Random() results in specific order
playerI = GetPlayerOrder (i);
gmstate.player[playerI].selecting =
(playerMask & (1 << playerI)) != 0;
gmstate.player[playerI].ships_left = battle_counter[playerI];
// We determine in advance which ship would be chosen if the player
// wants a random ship, to keep it simple to keep network parties
// synchronised.
gmstate.player[playerI].randomIndex =
(COUNT)TFB_Random () % gmstate.player[playerI].ships_left;
gmstate.player[playerI].done = FALSE;
if (!gmstate.player[playerI].selecting)
continue;
gmstate.player[playerI].timeIn = now;
gmstate.player[playerI].row = 0;
gmstate.player[playerI].col = NUM_PICKMELEE_COLUMNS;
#ifdef NETPLAY
gmstate.player[playerI].remoteSelected = FALSE;
#endif
gmstate.player[playerI].flashContext =
Flash_createHighlight (ScreenContext, NULL);
Flash_setMergeFactors (gmstate.player[playerI].flashContext,
2, 3, 2);
Flash_setFrameTime (gmstate.player[playerI].flashContext,
ONE_SECOND / 16);
#ifdef NETPLAY
if (PlayerControl[playerI] & NETWORK_CONTROL)
Flash_setSpeed (gmstate.player[playerI].flashContext,
ONE_SECOND / 2, 0, ONE_SECOND / 2, 0);
else
#endif
{
Flash_setSpeed (gmstate.player[playerI].flashContext,
0, ONE_SECOND / 16, 0, ONE_SECOND / 16);
}
PickMelee_ChangedSelection (&gmstate, playerI);
Flash_start (gmstate.player[playerI].flashContext);
}
#ifdef NETPLAY
{
// NB. gmstate.player[].randomIndex and gmstate.player[].done must
// be initialised before negotiateReadyConnections is completed, to
// ensure that they are initialised when the SelectShip packet
// arrives.
bool allOk = negotiateReadyConnections (true, NetState_selectShip);
if (!allOk)
{
// Some network connection has been reset.
ok = false;
}
}
#endif
SetDefaultMenuRepeatDelay ();
SetContext (OffScreenContext);
DoInput (&gmstate, FALSE);
WaitForSoundEnd (0);
for (playerI = 0; playerI < NUM_PLAYERS; playerI++)
{
if (!gmstate.player[playerI].selecting)
continue;
if (gmstate.player[playerI].done)
{
// Flash rectangle is already terminated.
ships[playerI] = gmstate.player[playerI].hBattleShip;
}
else
{
Flash_terminate (gmstate.player[playerI].flashContext);
gmstate.player[playerI].flashContext = NULL;
ok = false;
}
}
#ifdef NETPLAY
if (ok)
{
if (!negotiateReadyConnections (true, NetState_interBattle))
ok = false;
}
else
setStateConnections (NetState_interBattle);
#endif
if (!ok)
{
// Aborting.
GLOBAL (CurrentActivity) &= ~IN_BATTLE;
}
#ifdef NETPLAY
for (playerI = 0; playerI < NUM_PLAYERS; playerI++)
{
NetConnection *conn;
if ((playerMask & (1 << playerI)) == 0)
continue;
// XXX: This does not have to be done per connection.
conn = netConnections[playerI];
if (conn != NULL && NetConnection_isConnected (conn))
{
BattleStateData *battleStateData;
battleStateData =
(BattleStateData *) NetConnection_getStateData (conn);
battleStateData->getMeleeState = NULL;
}
}
#endif
return ok;
}
void WndDoInput( void )
{
InitSuppServices();
DoInput();
}
static BOOLEAN
RestartMenu (PMENU_STATE pMS)
{
DWORD TimeOut;
BYTE black_buf[1];
ReinitQueue (&race_q[0]);
ReinitQueue (&race_q[1]);
black_buf[0] = FadeAllToBlack;
SetContext (ScreenContext);
GLOBAL (CurrentActivity) |= CHECK_ABORT;
if (GLOBAL_SIS (CrewEnlisted) == (COUNT)~0
&& GET_GAME_STATE (UTWIG_BOMB_ON_SHIP)
&& !GET_GAME_STATE (UTWIG_BOMB))
{ // player blew himself up with Utwig bomb
BYTE white_buf[] = {FadeAllToWhite};
SET_GAME_STATE (UTWIG_BOMB_ON_SHIP, 0);
SleepThreadUntil (XFormColorMap ((COLORMAPPTR)white_buf,
ONE_SECOND / 8) + ONE_SECOND / 60);
SetContextBackGroundColor (BUILD_COLOR (MAKE_RGB15 (0x1F, 0x1F, 0x1F), 0x0F));
ClearDrawable ();
FlushColorXForms ();
TimeOut = ONE_SECOND / 8;
}
else
{
TimeOut = ONE_SECOND / 2;
if (LOBYTE (LastActivity) == WON_LAST_BATTLE)
{
GLOBAL (CurrentActivity) = WON_LAST_BATTLE;
Victory ();
Credits (TRUE);
FreeGameData ();
TimeOut = ONE_SECOND / 2;
GLOBAL (CurrentActivity) = CHECK_ABORT;
}
}
LastActivity = NextActivity = 0;
SleepThreadUntil (XFormColorMap ((COLORMAPPTR)black_buf, TimeOut));
if (TimeOut == ONE_SECOND / 8)
SleepThread (ONE_SECOND * 3);
DrawRestartMenuGraphic (pMS);
FlushInput ();
GLOBAL (CurrentActivity) &= ~CHECK_ABORT;
SetMenuSounds (MENU_SOUND_UP | MENU_SOUND_DOWN, MENU_SOUND_SELECT);
DoInput (pMS, TRUE);
StopMusic ();
if (pMS->hMusic)
{
DestroyMusic (pMS->hMusic);
pMS->hMusic = 0;
}
LockMutex (GraphicsLock);
SetFlashRect (NULL_PTR, (FRAME)0);
UnlockMutex (GraphicsLock);
DestroyDrawable (ReleaseDrawable (pMS->CurFrame));
if (GLOBAL (CurrentActivity) == (ACTIVITY)~0)
return (FALSE); // timed out
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
return (FALSE); // quit
TimeOut = XFormColorMap ((COLORMAPPTR)black_buf, ONE_SECOND / 2);
SleepThreadUntil (TimeOut);
FlushColorXForms ();
SeedRandomNumbers ();
return (LOBYTE (GLOBAL (CurrentActivity)) != SUPER_MELEE);
}
