Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Historical Source
leisuresuitlarry
Commits
de70c158
Commit
de70c158
authored
Apr 18, 2019
by
historicalsource
Browse files
Leisure Suit Larry Final Source Set
parents
Changes
101
Expand all
Hide whitespace changes
Inline
Side-by-side
BJ.H
0 → 100644
View file @
de70c158
[
[
bj
.
h
[
[
LEISURE
SUIT
LARRY
IN
THE
LAND
OF
THE
LOUNGE
LIZARDS
BLACKJACK
HEADER
[
[
Wednesday
,
March
4
,
1987
at
11
:
21
p
.
m
.
[
Sunday
,
May
31
,
1987
at
8
:
56
p
.
m
.
[
%
object
aWinner
13
[
Animated
objects
.
%
object
aQuestion
14
%
object
aCards
15
#define CLUBS 152 [ Defines of view numbers.
#define SPADES 153
#define HEARTS 154
#define DIAMONDS 155
#define BLANK_CARD 156
#define CARD_BACK 157
%
flag
pSoftAce
242
[
Flags
.
%
flag
dSoftAce
243
%
flag
sSoftAce
244
%
flag
showHelpMessage
245
%
flag
pBlackjack
246
%
flag
dBlackjack
247
%
flag
pDoubledDown
248
%
flag
sDoubledDown
249
%
flag
pSixCardWinner
250
%
flag
sSixCardWinner
251
%
flag
softAce
252
%
flag
waitingForInput
253
%
flag
insured
254
%
flag
readyToLeave
255
%
var
oldDTotal
216
%
var
oldPTotal
217
%
var
oldSTotal
218
%
var
clueTimer
219
%
var
work2
220
[
Vars
.
%
var
work3
221
%
var
dTotal
222
%
var
pTotal
223
%
var
sTotal
224
%
var
sBet
225
%
var
pBet
226
%
var
insurance
227
%
var
winnings
228
%
var
function
229
[
which
function
to
execute
in
rm56
.
#define DRAW_CARD 1
#define ERASE_CARD 2
#define DRAW_FACE_DOWN 3
#define GET_SUIT_VALUE 4
#define PAY_WINNER 5
#define UPDATE_STATUS 6
#define SHOW_TOTALS 7
%
var
suit
230
%
var
value
231
%
var
card
232
%
var
cardCount
233
[
How
many
cards
are
visible
.
%
var
cardToTest
234
%
var
currentCard
235
[
Used
as
a
pointer
to
vars
below
.
%
var
handInPlay
236
#define NONE 0
#define PLAYER 1
#define SPLIT 2
#define DEALER 3
#define HAND_DONE 255
[
Vars
numbered
237
through
254
contain
the
card
values
for
the
3
hands
.
[
They
are
only
referenced
indirectly
,
so
no
defines
are
needed
.
%
define
firstCard
237
[
First
var
containing
a
card
.
%
define
dFirstCard
237
[
Var
numbers
of
the
%
define
pFirstCard
243
[
first
card
of
%
define
sFirstCard
249
[
each
hand
.
%
define
lastCard
254
[
Last
var
containing
a
card
.
%
var
oldBet
255
COLORS.H
0 → 100644
View file @
de70c158
[
[
colors
.
h
[
[
IBM
COLOR
DEFINES
[
[
Sunday
,
February
22
,
1987
at
02
:
31
p
.
m
.
[
%
define
BLACK
0
%
define
BLUE
1
%
define
GREEN
2
%
define
CYAN
3
%
define
RED
4
%
define
MAGENTA
5
%
define
BROWN
6
%
define
WHITE
7
%
define
GREY
8
%
define
GRAY
8
%
define
LIGHT_BLUE
9
%
define
LIGHT_GREEN
10
%
define
LIGHT_CYAN
11
%
define
LIGHT_RED
12
%
define
LIGHT_MAGENTA
13
%
define
YELLOW
14
%
define
LIGHT_WHITE
15
CONTRLRS.H
0 → 100644
View file @
de70c158
[
[
contrlrs
.
h
[
[
STANDARD
AGI
KEY
CONTROLLERS
[
[
Friday
,
May
15
,
1987
at
0
:
47
a
.
m
.
[
%
define
cHelp
1
[
Function
keys
%
define
cSoundToggle
2
%
define
cEchoLine
3
%
define
cF4
4
%
define
cSave
5
%
define
cF6
6
%
define
cRestore
7
%
define
cF8
8
%
define
cRestart
9
%
define
cSpeed
10
%
define
cStatus
11
[
Control
keys
%
define
cInitJoy
12
%
define
cToggleMonitor
13
%
define
cCancelLine
14
%
define
cDebug
15
[
Alt
keys
%
define
cShowEgo
16
%
define
cShowObj
17
%
define
cShowMem
18
%
define
cObjInfo
19
%
define
cShowPriority
20
%
define
cSkipTest
21
%
define
cQuit
22
%
define
cMenu
23
[
Menu
stuff
%
define
cDummy
24
%
define
cAbout
25
%
define
cCalculator
26
%
define
cPuzzle
27
%
define
cBodilyFunction
28
%
define
cClock
29
%
define
cPause
30
%
define
cSpeedSlow
31
%
define
cSpeedNormal
32
%
define
cSpeedFast
33
%
define
cSpeedFastest
34
%
define
cInvNumbers
35
[
Debug
stuff
%
define
cXY
36
%
define
cGimme
37
%
define
cCrescendo
38
[
Tandy
odds
&
ends
.
%
define
cDecrescendo
39
%
define
cVersion
40
%
define
cBoss
41
FLAG_VAR.H
0 → 100644
View file @
de70c158
[
[
lcl_temp
.
h
[
[
LEISURE
SUIT
LARRY
IN
THE
LAND
OF
THE
LOUNGE
LIZARDS
GAME
DEFINITIONS
[
[
Wednesday
,
March
11
,
1987
at
9
:
48
a
.
m
.
[
[
The
30
locals
are
numbered
200
-
229
.
The
26
dynamics
are
numbered
[
230
-
255
.
Every
flag
and
var
in
this
list
is
reset
by
every
new
room
.
[
LOCAL
FLAGS
,
for
use
in
room
logics
.
%
flag
lf0
200
%
flag
lf1
201
%
flag
lf2
202
%
flag
lf3
203
%
flag
lf4
204
%
flag
lf5
205
%
flag
lf6
206
%
flag
lf7
207
%
flag
lf8
208
%
flag
lf9
209
%
flag
lf10
210
%
flag
lf11
211
%
flag
lf12
212
%
flag
lf13
213
%
flag
lf14
214
%
flag
lf15
215
%
flag
lf16
216
%
flag
lf17
217
%
flag
lf18
218
%
flag
lf19
219
%
flag
lf20
220
%
flag
lf21
221
%
flag
lf22
222
%
flag
lf23
223
%
flag
lf24
224
%
flag
lf25
225
%
flag
lf26
226
%
flag
lf27
227
%
flag
lf28
228
%
flag
lf29
229
[
TEMP
FLAGS
for
use
in
dynamic
logics
.
%
flag
df0
230
%
flag
df1
231
%
flag
df2
232
%
flag
df3
233
%
flag
df4
234
%
flag
df5
235
%
flag
df6
236
%
flag
df7
237
%
flag
df8
238
%
flag
df9
239
%
flag
df10
240
%
flag
df11
241
%
flag
df12
242
%
flag
df13
243
%
flag
df14
244
%
flag
df15
245
%
flag
df16
246
%
flag
df17
247
%
flag
df18
248
%
flag
df19
249
%
flag
df20
250
%
flag
df21
251
%
flag
df22
252
%
flag
df23
253
%
flag
df24
254
%
flag
df25
255
[
LOCAL
VARS
for
use
in
room
logics
.
%
var
lv0
200
%
var
lv1
201
%
var
lv2
202
%
var
lv3
203
%
var
lv4
204
%
var
lv5
205
%
var
lv6
206
%
var
lv7
207
%
var
lv8
208
%
var
lv9
209
%
var
lv10
210
%
var
lv11
211
%
var
lv12
212
%
var
lv13
213
%
var
lv14
214
%
var
lv15
215
%
var
lv16
216
%
var
lv17
217
%
var
lv18
218
%
var
lv19
219
%
var
lv20
220
%
var
lv21
221
%
var
lv22
222
%
var
lv23
223
%
var
lv24
224
%
var
lv25
225
%
var
lv26
226
%
var
lv27
227
%
var
lv28
228
%
var
lv29
229
[
TEMP
VARS
for
use
in
dynamic
logics
.
%
var
dv0
230
%
var
dv1
231
%
var
dv2
232
%
var
dv3
233
%
var
dv4
234
%
var
dv5
235
%
var
dv6
236
%
var
dv7
237
%
var
dv8
238
%
var
dv9
239
%
var
dv10
240
%
var
dv11
241
%
var
dv12
242
%
var
dv13
243
%
var
dv14
244
%
var
dv15
245
%
var
dv16
246
%
var
dv17
247
%
var
dv18
248
%
var
dv19
249
%
var
dv20
250
%
var
dv21
251
%
var
dv22
252
%
var
dv23
253
%
var
dv24
254
%
var
dv25
255
GAMEDEFS.H
0 → 100644
View file @
de70c158
[
[
gamedefs
.
h
[
[
LEISURE
SUIT
LARRY
IN
THE
LAND
OF
THE
LOUNGE
LIZARDS
GAME
DEFINITIONS
[
[
Wednesday
,
June
10
,
1987
at
9
:
00
p
.
m
.
[
%
include
"views.h"
%
tokens
"..
\\
words.tok"
%
include
"sysdefs.h"
%
include
"flag_var.h"
[
************
CONSTANTS
************
]
#define CYCLES_BEFORE_DEATH 44
#define TEXT_COLOR 15
#define BG_COLOR 0
#define NORMAL_STEP_SIZE 1
#define FALLING_STEP_SIZE 3
#define EGO_STUNNED_TIME 5
#define NOWHERE 0
#define DOOR_CYCLE_TIME 3
#define SMILE_SECONDS 5
#define FROWN_SECONDS 7
#define INVENTORY 255
[
************
FLAGS
************
]
[
Only
the
interpreter
can
use
0
-
29
(
globals
)
[
Any
room
can
use
220
-
239
(
lf
'
s
)
[
Only
dynamic
logics
can
use
240
-
255
(
df
'
s
)
%
flag
forceAtest
30
%
flag
testing
31
%
flag
debugging
32
%
flag
xyOn
33
%
flag
keepCycling
34
%
flag
noCycling
35
%
flag
ignoreSpecial
36
%
flag
ignoreWater
37
%
flag
demo
38
%
flag
doit
39
%
flag
done
40
%
flag
egoArrived
41
%
flag
clockOn
42
%
flag
updateClock
43
%
flag
aSecondPassed
44
%
flag
myHaveMatch
45
%
flag
outOfMemory
46
%
flag
survivableFall
47
%
flag
handsOff
48
%
flag
preventNewRoom
49
%
flag
certainDeath
50
%
flag
egoDeathDone
51
%
flag
musicDone
52
%
flag
soundDone
53
%
flag
notCloseEnough
54
%
flag
alreadyGotIt
55
%
flag
TVOn
56
%
flag
knowsPassword
57
%
flag
smellsLikeDogPiss
58
%
flag
toiletPaperOnShoe
59
%
flag
lookedAtCabbie
60
%
flag
nearTaxi
61
%
flag
wearingRubber
62
%
flag
scoredHooker
63
%
flag
hookerWindowOpen
64
%
flag
alleyWindowBroken
65
%
flag
mouthOK
66
%
flag
OK
67
%
flag
dontHaveIt
68
%
flag
nearPerson
69
%
flag
noFawnInDisco
70
%
flag
gaveFawnRose
71
%
flag
gaveFawnCandy
72
%
flag
gaveFawnRing
73
%
flag
dancedWithFawn
74
%
flag
scriptDone
75
%
flag
faithGone
76
%
flag
beenIn43
77
%
flag
answeredSurvey
78
%
flag
gaveFawnEverything
79
%
flag
orderedWine
80
%
flag
ropeOnBed
81
%
flag
fawnInRoom
82
%
flag
unsuccessfulCeremony
83
%
flag
eveGone
84
%
flag
programControl
85
%
flag
egoLoweringDone
86
%
flag
preventSaveGame
87
%
flag
gaveEveApple
88
%
flag
diedOfTheClap
89
%
flag
pimpWatchingTV
90
%
flag
wornRubber
91
%
flag
satWithFawn
92
%
flag
betInProgress
93
%
flag
boughtWhiskey
94
%
flag
lookedAtFawn
95
%
flag
talkedToFawn
96
%
flag
askedForMoney
97
%
flag
gotPimpToWatchTV
98
%
flag
paidPimpForWhore
99
%
flag
rodeInCab
100
%
flag
mouseMachine
101
%
flag
twoButtonJoystick
102
%
flag
talkedToFlasher
103
%
flag
heardLiquorStoreNumber
104
%
flag
beenIn11
105
%
flag
requestedASaveGame
106
%
flag
mouthSmellsBad
107
%
flag
typing
108
%
flag
passedTest
109
%
flag
marriedFawn
110
%
flag
seenDeliveryBoyGag
111
%
flag
readSideOfPhone
112
%
flag
answeredSurveyFirstTime
113
%
flag
heardSurveyFirstTime
114
%
flag
orderedWineFirstTime
115
%
flag
poopedInCan
116
%
flag
satOnWhoopieCushion
117
%
flag
slowProcessor
118
%
flag
shownPassToBouncer
119
%
flag
readMagazine
120
%
flag
dialedSierra
121
%
flag
makeFawnDance
122
%
flag
memoryCheck
123
%
flag
makeEgoRise
124
[
in
disco
scene
%
flag
makeFawnSplit
125
%
flag
inflatedDoll
126
%
flag
sprayDone
127
%
flag
beenInPenthouse
128
[
nextflag
[
************
VARS
************
]
[
Only
the
interpreter
can
use
0
-
29
(
globals
)
[
Any
room
can
use
220
-
239
(
lv
'
s
)
[
Only
dynamic
logics
can
use
240
-
255
(
dv
'
s
)
%
var
currentStatus
30
#define NORMAL 0
#define DEAD 1
#define SLEEPING 2
#define COLLAPSING 3
#define STUNNED 4
#define FALLING 5
#define WALKING 6
#define ON_BAR_STOOL 7
#define DRUNK 8
#define ON_TOILET 9
#define DROWNING 10
#define HUMPING_HOOKER 11
#define LEAVING_WINDOW 12
#define HANGING_BY_ROPE 13
#define IN_DUMPSTER 14
#define RUN_OVER 15
#define DANCING 16
#define SITTING 17
#define IN_ELEVATOR 18
#define TIED_TO_BED 19
#define STIFFED_CABBIE 20
#define PISSING 21
#define CHASING_DOLL 22
#define FOLLOWING_EVE 23
#define DYING_OF_CLAP 25
#define NAKED 26
#define RECYCLING 27
[
#
define
28
[
#
define
29
%
var
egoLocation
31
%
var
x
32
%
var
y
33
%
var
sourceX
34
%
var
sourceY
35
%
var
targetX
36
%
var
targetY
37
%
var
egoX
38
%
var
egoY
39
%
var
oldEgoX
40
%
var
oldEgoY
41
%
var
oldEgoDir
42
%
var
oldSeconds
43
%
var
oldAnimationInterval
44
#define FASTEST_SPEED 0
#define FAST_SPEED 1
#define NORMAL_SPEED 2
#define SLOW_SPEED 3
%
var
debug0
45
%
var
debug1
46
%
var
startClimbing
47
%
var
roomBottom
48
%
var
zero
49
%
var
deathMessage
50
%
var
testRoom
51
%
var
work
52
%
var
view
53
%
var
loop
54
%
var
cell
55
%
var
step
56
%
var
priority
57
%
var
message
58
%
var
egoCycleTime
59
%
var
egoStepTime
60
%
var
egoStepSize
61
%
var
passInRoom
62
%
var
secondsInRoom
63
%
var
taxiScript
64
#define TAXI_WAITING 4
%
var
script
65
%
var
scriptCycles
66
%
var
scriptTimer
67
%
var
clearStatusSeconds
68
%
var
mouthMessage
69
%
var
sprayCount
70
%
var
spraySeconds
71
%
var
sprayMinutes
72
#define SPRAY_INIT_MINUTES 10
[
%
var
73
[
%
var
74
%
var
deathTimer
75
%
var
newRoom
76
%
var
currentEgoView
77
%
var
oldEdgeEgoHit
78
%
var
destinationFloor
79
%
var
breathSpraySeconds
80
%
var
picture
81
%
var
TVChannel
82
%
var
moneyTimer
83
%
var
one
84
%
var
two
85
%
var
three
86
%
var
four
87
%
var
five
88
%
var
oldLastChar
89
%
var
dollars
90
%
var
secondsSinceKeystroke
91
%
var
answer
92
%
var
correctAnswer
93
%
var
question
94
%
var
questionStatus
95
%
define
waiting
1
%
define
askAnother
2
%
define
allDone
3
%
define
waitAwhile
4
%
define
waitAwhileAlthoughCorrect
5
%
var
currentQuestion
96
%
var
cabFareMin
97
%
var
notMovedCycles
98
%
var
cabRideLength
99
%
var
fawnTalkCount
100
%
var
oldCurrentScore
101
[
nextvar
[
%
var
102
[
%
var
103
[
%
var
104
[
%
var
105
[
%
var
106
[
%
var
107
[
%
var
108
[
%
var
109
[
%
var
110
[
%
var
111
[
%
var
112
[
%
var
113
[
%
var
114
%
var
gameSeconds
115
%
var
gameMinutes
116
%
var
gameHours
117
%
var
gameDays
118
%
var
watchHours
119
#define WATCH_INIT_HOURS 10
[
***********
ANIMATED
OBJECTS
***********
]
[
Define
here
all
objects
shared
by
multiple
rooms
.
%
object
ego
0
[
%
object
a
10
[
%
object
a
11
%
object
aCop
12
%
object
aTaxi
13
%
object
aDog
14
%
object
aCar
15
[
*********
INVENTORY
OBJECTS
**********
]
%
object
iWallet
1
%
object
iBreathSpray
2
%
object
iPocketLint
3
%
object
iWatch
4
%
object
iApple
5
%
object
iRing
6
%
object
iWhiskey
7
%
object
iRemoteControl
8
%
object
iRose
9
%
object
iRubber
10
%
object
iUsedRubber
11
%
object
iCandy
12
%
object
iDoll
13
%
object
iDiscoPass
14
%
object
iPocketKnife
15
%
object
iWine
16
%
object
iMagazine
17
%
object
iHammer
18
%
object
iPills
19
%
object
iRope
20
#define SIZE_OF_INVENTORY 20
[
*********
SOUND
EFFECTS
**********
]
#define sEgoFalling 1
#define sError 2
#define sSlots 3
#define sSlotsWinner 4
#define sCardsShuffling 5