void
WaitForNoInput (SIZE Duration)
{
INPUT_STATE PressState;
PressState = AnyButtonPress (FALSE);
if (Duration < 0)
{
if (PressState)
return;
Duration = -Duration;
}
else if (!PressState)
return;
{
DWORD TimeOut;
INPUT_STATE ButtonState;
TimeOut = GetTimeCounter () + Duration;
do
{
ButtonState = AnyButtonPress (FALSE);
if (PressState)
{
PressState = ButtonState;
ButtonState = 0;
}
} while (!ButtonState &&
(TaskSwitch (), GetTimeCounter ()) <= TimeOut);
}
}
void
SplashScreen (void (* DoProcessing)(DWORD TimeOut))
{
BYTE xform_buf[1];
STAMP s;
DWORD TimeOut;
BOOLEAN InputState;
xform_buf[0] = FadeAllToBlack;
SleepThreadUntil (XFormColorMap (
(COLORMAPPTR) xform_buf, ONE_SECOND / 120));
LockMutex (GraphicsLock);
SetContext (ScreenContext);
s.origin.x = s.origin.y = 0;
s.frame = CaptureDrawable (LoadGraphic (TITLE_ANIM));
DrawStamp (&s);
DestroyDrawable (ReleaseDrawable (s.frame));
UnlockMutex (GraphicsLock);
xform_buf[0] = FadeAllToColor;
TimeOut = XFormColorMap ((COLORMAPPTR)xform_buf, ONE_SECOND / 2);
if (DoProcessing)
DoProcessing (TimeOut);
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
return;
}
/* There was a forcible setting of CHECK_ABORT here. I cannot
* find any purpose for this that DoRestart doesn't handle
* better (forcing all other threads but this one to quit out,
* I believe), and have thus removed it. It was interfering
* with the proper operation of the quit operation.
* --Michael */
TimeOut += ONE_SECOND * 3;
while (!(InputState = AnyButtonPress (FALSE)) &&
(GetTimeCounter () <= TimeOut) &&
!(GLOBAL (CurrentActivity) & CHECK_ABORT))
{
TaskSwitch ();
}
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
return;
}
GLOBAL (CurrentActivity) &= ~CHECK_ABORT;
/* You can't try to quit during a fade to black, because if
* you try, the confirmation window will fade to black too.
* Fixing this will require a rewrite of our whole rendering
* engine. -- Michael */
xform_buf[0] = FadeAllToBlack;
SleepThreadUntil (XFormColorMap ((COLORMAPPTR)xform_buf, ONE_SECOND / 2));
}
INPUT_STATE
demo_input (INPUT_REF InputRef, INPUT_STATE InputState)
{
if (InputState || AnyButtonPress () || cread (
(PBYTE)&InputState, sizeof (InputState), 1, journal_fh
) == 0)
{
cclose (journal_fh);
journal_fh = 0;
StopMusic ();
StopSound ();
FreeKernel ();
exit (1);
}
return (InputState);
}
static void
DoSell (RESPONSE_REF R)
{
BYTE num_new_rainbows;
UWORD rainbow_mask;
SIZE added_credit;
int what_to_sell_queued = 0;
rainbow_mask = MAKE_WORD (
GET_GAME_STATE (RAINBOW_WORLD0),
GET_GAME_STATE (RAINBOW_WORLD1)
);
num_new_rainbows = (BYTE)(-GET_GAME_STATE (MELNORME_RAINBOW_COUNT));
while (rainbow_mask)
{
if (rainbow_mask & 1)
++num_new_rainbows;
rainbow_mask >>= 1;
}
if (!PLAYER_SAID (R, sell))
{
if (PLAYER_SAID (R, sell_life_data))
{
DWORD TimeIn;
added_credit = GLOBAL_SIS (TotalBioMass) * BIO_CREDIT_VALUE;
NPCPhrase (SOLD_LIFE_DATA1);
NPCPhrase (-(int)GLOBAL_SIS (TotalBioMass));
NPCPhrase (SOLD_LIFE_DATA2);
NPCPhrase (-(int)added_credit);
NPCPhrase (SOLD_LIFE_DATA3);
// queue WHAT_TO_SELL before talk-segue
if (num_new_rainbows)
{
NPCPhrase (WHAT_TO_SELL);
what_to_sell_queued = 1;
}
AlienTalkSegue (1);
DrawCargoStrings ((BYTE)~0, (BYTE)~0);
SleepThread (ONE_SECOND / 2);
TimeIn = GetTimeCounter ();
DrawCargoStrings (
(BYTE)NUM_ELEMENT_CATEGORIES,
(BYTE)NUM_ELEMENT_CATEGORIES
);
do
{
TimeIn = GetTimeCounter ();
if (AnyButtonPress (TRUE))
{
DeltaCredit (GLOBAL_SIS (TotalBioMass) * BIO_CREDIT_VALUE);
GLOBAL_SIS (TotalBioMass) = 0;
}
else
{
--GLOBAL_SIS (TotalBioMass);
DeltaCredit (BIO_CREDIT_VALUE);
}
DrawCargoStrings (
(BYTE)NUM_ELEMENT_CATEGORIES,
(BYTE)NUM_ELEMENT_CATEGORIES
);
} while (GLOBAL_SIS (TotalBioMass));
SleepThread (ONE_SECOND / 2);
LockMutex (GraphicsLock);
ClearSISRect (DRAW_SIS_DISPLAY);
UnlockMutex (GraphicsLock);
}
else /* if (R == sell_rainbow_locations) */
{
added_credit = num_new_rainbows * (250 * BIO_CREDIT_VALUE);
NPCPhrase (SOLD_RAINBOW_LOCATIONS1);
NPCPhrase (-(int)num_new_rainbows);
NPCPhrase (SOLD_RAINBOW_LOCATIONS2);
NPCPhrase (-(int)added_credit);
NPCPhrase (SOLD_RAINBOW_LOCATIONS3);
num_new_rainbows += GET_GAME_STATE (MELNORME_RAINBOW_COUNT);
SET_GAME_STATE (MELNORME_RAINBOW_COUNT, num_new_rainbows);
num_new_rainbows = 0;
DeltaCredit (added_credit);
}
AskedToBuy = FALSE;
}
if (GLOBAL_SIS (TotalBioMass) || num_new_rainbows)
{
if (!what_to_sell_queued)
NPCPhrase (WHAT_TO_SELL);
if (GLOBAL_SIS (TotalBioMass))
Response (sell_life_data, DoSell);
if (num_new_rainbows)
Response (sell_rainbow_locations, DoSell);
Response (done_selling, NatureOfConversation);
}
else
{
if (PLAYER_SAID (R, sell))
NPCPhrase (NOTHING_TO_SELL);
DISABLE_PHRASE (sell);
NatureOfConversation (R);
}
}
