Commit de70c158 authored by historicalsource's avatar historicalsource
Browse files

Leisure Suit Larry Final Source Set

parents
[
[ 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
[
[ 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
[
[ 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
[
[ 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
[
[ 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