Leisure Suit Larry Final Source Set
This commit is contained in:
commit
de70c1581c
101 changed files with 35933 additions and 0 deletions
56
RM58.CG
Normal file
56
RM58.CG
Normal file
|
|
@ -0,0 +1,56 @@
|
|||
[logics for room 58 -- lgcSlots
|
||||
[ "Leisure Suit Larry in the Land of the Lounge Lizards"
|
||||
[ by Al Lowe
|
||||
|
||||
%include "rm58.msg"
|
||||
%include "gamedefs.h"
|
||||
%include "slots.h"
|
||||
|
||||
|
||||
|
||||
if (function == PAY_WINNER)
|
||||
{
|
||||
winnings = bet;
|
||||
MulV( winnings, multiple);
|
||||
work = 250;
|
||||
work -= winnings;
|
||||
|
||||
if (work > dollars)
|
||||
{
|
||||
dollars += winnings;
|
||||
}
|
||||
else
|
||||
{
|
||||
winnings = 250;
|
||||
winnings -= dollars;
|
||||
dollars = 250;
|
||||
Print( 4);
|
||||
Set( readyToLeave);
|
||||
}
|
||||
|
||||
function = UPDATE_STATUS; [ Auto update.
|
||||
}
|
||||
|
||||
|
||||
if (function == UPDATE_STATUS)
|
||||
{
|
||||
if (monitorType == MONO)
|
||||
{
|
||||
ClearLines( 24, 24, BG_COLOR);
|
||||
Display( 24, 0, 1);
|
||||
}
|
||||
else
|
||||
{
|
||||
ClearLines( 21, 21, BG_COLOR);
|
||||
Display( 21, 0, 1);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
[*****
|
||||
:exit
|
||||
[*****
|
||||
|
||||
function = 0;
|
||||
|
||||
Loading…
Reference in a new issue