Upload files to "Heap"

This commit is contained in:
threememories 2026-04-27 01:20:22 +00:00
parent 317fb461ac
commit f6f21c9126
5 changed files with 1179 additions and 0 deletions

98
Heap/Heap40108.txt Normal file
View File

@ -0,0 +1,98 @@
instance InitializeGlobalLists of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance GlobalEffectList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
instance GlobalMovieCmdList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
instance GlobalBaseList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
instance GlobalATPList of ATPList
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
}
instance GlobalPicInfoList of PicInfoList
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
}
instance GlobalSpellList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
instance GlobalSEList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
string_00f0 = "InitializeGlobalLists"
string_0106 = "GlobalEffectList"
string_0117 = "GlobalMovieCmdList"
string_012a = "GlobalBaseList"
string_0139 = "GlobalATPList"
string_0147 = "GlobalPicInfoList"
string_0159 = "GlobalSpellList"
string_0169 = "GlobalSEList"

48
Heap/Heap40109.txt Normal file
View File

@ -0,0 +1,48 @@
subclass RlmInfoBar of Plane
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $0
canDrag = $0
state = $0
back = $0
resX = $280 ; 640, disposeWhenDone
resY = $1e0 ; 480, isControl
vanishingX = $0
vanishingY = $0
coordType = $0
picture = $ffff ; -1
style = $0
priority = $1f4 ; 500, setView
bitmap = $0
casts = $0
mirrored = $0
fore = $0
pOldPri = $0
pBar = $0
pEgoBoxSet = $0
pLeftBoxSet = $0
pRightBoxSet = $0
pLeftBoxSize = $0
pRightBoxSize = $0
pCast = $0
pText = $0
init()
dispose()
setBarText()
updateBar()
deleteStatusBox()
}
string_0058 = "%s"
string_005b = "%s: Dead"
string_0064 = "%s %d"
string_006a = "Error"
string_0070 = "RlmInfoBar"

32
Heap/Heap40110.txt Normal file
View File

@ -0,0 +1,32 @@
subclass PicInfo of Obj
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
number = $0
roomType = $0
picture = $0
horizon = $82 ; 130, magPower
polyList = $0
pScaled = $1
pBackY = $8c ; 140, scratch
pBackSize = $28 ; 40, '(', style
pFrontY = $136 ; 310, getLong
pFrontSize = $80 ; 128, lastKey
}
subclass PicInfoList of Set
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
init()
}
string_0050 = "PicInfo"
string_0058 = "PicInfoList"

968
Heap/Heap40111.txt Normal file
View File

@ -0,0 +1,968 @@
local[$41] =
{
$0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0, $0,
$0, $1, string_083e, $1, $2, string_0845, $1, $3, string_084c, $1, $4, string_0852, $0, $5, string_0858, $1,
$6, string_0863, $1, $7, string_0868, $1, $8, string_0872, $1, $9, string_087b, $1, $a, string_0886, $0, $b,
string_0890, $0, $0, string_089a, $1, $ffff, $afa, $afb, $afc, $b3b, $b3c, $b3d, $adc, $add, $ade, $adf,
$0
}
instance SpellBtnList of Set
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
}
instance LocatorList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
}
instance combatCursor of Cursor
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $c8 ; 200, handleEvent
right = $140 ; 320, pHandle
canTrack = $0
canDrag = $0
state = $0
client = $0
view = $0
loop = $0
cel = $0
x = $0
y = $0
hotX = $ffff ; -1
hotY = $ffff ; -1
}
instance CombatEvent of Event
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
type = $0
message = $0
modifiers = $0
x = $0
y = $0
z = $0
yaw = $0
pitch = $0
roll = $0
claimed = $0
plane = $0
}
instance ShowCombatAction of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
subclass BasicCursorController of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
pOnScreen = $ffff ; -1
pActiveCursor = $ffff ; -1
pLastCursor = $ffff ; -1
doit()
}
instance GridBox of View
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $0
canDrag = $0
state = $0
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $23f0 ; 9200
loop = $0
cel = $0
bitmap = $0
scaleSignal = $8 ; fixPriority
magnifier = $0
signal = $5021 ; 20513
client = $0
clut = $0
heading = $0
noun = $0
case = $0
modNum = $ffff ; -1
sightAngle = $28 ; 40, '(', style
actions = $0
onMeCheck = $0
approachX = $0
approachY = $0
approachDist = $0
_approachVerbs = $0
_actionVerbs = $0
xScaleAdj = $64 ; 100, 'd', moveDone
yScaleAdj = $64 ; 100, 'd', moveDone
doBaseLine = $0
yStep = $2
brLeft = $0
brTop = $0
brRight = $0
brBottom = $0
baseSetter = $0
}
instance CombatButton of Button
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $403 ; 1027, pLevel
priority = $3e8 ; 1000, pUpdateClient
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $232a ; 9002
loop = $8 ; fixPriority
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $0
font = $0
dimmed = $0
fore = $2b ; 43, '+', type
back = $ffff ; -1
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $1
drawCode = $0
handler = $0
helpStr = $0
key = $0
text = $0
mode = $1
wide = $0
btnType = $0
textRect = $0
iconView = $0
normalColor = $ffff ; -1
selectColor = $ffff ; -1
chosenColor = $ffff ; -1
dimColor = $ffff ; -1
buttonSet = $0
buttonPtr = $0
checkMark = $0
lastState = $0
textOffsetX = $0
textOffsetY = $0
}
subclass CombatDragItem of Button
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $401 ; 1025, pPoisonResistance
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $232a ; 9002
loop = $9 ; inLeft
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $0
font = $0
dimmed = $0
fore = $2b ; 43, '+', type
back = $ffff ; -1
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $1
drawCode = $0
handler = $0
helpStr = $0
key = $0
text = string_090d ; "Choose Your Action"
mode = $1
wide = $0
btnType = $0
textRect = $0
iconView = $0
normalColor = $ffff ; -1
selectColor = $2b ; 43, '+', type
chosenColor = $ffff ; -1
dimColor = $ffff ; -1
buttonSet = $0
buttonPtr = $0
checkMark = $0
lastState = $0
textOffsetX = $0
textOffsetY = $0
pOfsX = $0
pOfsY = $0
track()
trackDoit()
}
instance cancelButton of Button
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $3 ; z
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $232a ; 9002
loop = $0
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $0
font = $14 ; 20, nsRight
dimmed = $0
fore = $ffff ; -1
back = $ffff ; -1
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $1
drawCode = $0
handler = $0
helpStr = $0
key = $0
text = string_092f ; "Cancel"
mode = $1
wide = $0
btnType = $0
textRect = $0
iconView = $0
normalColor = $ffff ; -1
selectColor = $ffff ; -1
chosenColor = $ffff ; -1
dimColor = $ffff ; -1
buttonSet = $0
buttonPtr = $0
checkMark = $0
lastState = $0
textOffsetX = $0
textOffsetY = $0
doit()
}
instance HelpText of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance CastSpell of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance ChooseItemToEat of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance ChooseItemToEquip of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance ChooseItemToUse of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance HandleCombatAction of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance HandleTimerEnd of Script
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
client = $0
state = $ffff ; -1
start = $0
timer = $0
cycles = $0
seconds = $0
lastSeconds = $0
ticks = $0
lastTicks = $0
register = $0
script = $0
caller = $0
next = $0
number = $0
pRoom = $0
cue()
}
subclass GetCombatAction of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
subclass CombatRoom of NetRoom
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
script = $0
plane = $0
obstacles = $0
scaler = $0
pCast = $0
pFeatures = $0
pSounds = $0
pTimers = $0
pDemons = $0
pTalkers = $0
pScreen = $0
pCuees = $0
picture = $0
style = $ffff ; -1
exitStyle = $ffff ; -1
horizon = $0
picAngle = $0
vanishingX = $a0 ; 160, firstTrue
vanishingY = $0
pVisible = $1
pInitted = $0
pType = $0
frontSize = $80 ; 128, lastKey
pUpdateStates = $0
pWObjectList = $0
pShowGameBar = $1
pRectList = $0
pRoomType = $0
pNumber = $0
pExits = $0
pExitDir = $0
pExitScript = $0
pFlags = $0
pMakePile = $0
pPendingActionQ = $0
pDefunct = $0
pSafeX = $140 ; 320, pHandle
pSafeY = $c8 ; 200, handleEvent
pMovieParams = $0
prevX = $0
prevY = $0
pLeftGroup = $0
pRightGroup = $0
pDeadGroup = $0
pServID = $0
pRandomSeed = $1
init()
doit()
dispose()
handleEvent()
delete()
addCombatant()
delCombatant()
restoreCombatant()
endCombatMode()
isLegalMove()
posnOnGrid()
getXFromGrid()
getYFromGrid()
getGridX()
getGridY()
getGridNum()
}
instance ReadyingForCombatScript of Script
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
client = $0
state = $ffff ; -1
start = $0
timer = $0
cycles = $0
seconds = $0
lastSeconds = $0
ticks = $0
lastTicks = $0
register = $0
script = $0
caller = $0
next = $0
number = $0
pRoom = $0
dispose()
handleError()
changeState()
}
instance WANetCombatMoveScript of WANetScript
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
client = $0
state = $ffff ; -1
start = $0
timer = $0
cycles = $0
seconds = $0
lastSeconds = $0
ticks = $0
lastTicks = $0
register = $0
script = $0
caller = $0
next = $0
number = $0
pRoom = $0
pDirectObject = $0
pIndirectObject = $0
pMovieCmd = $0
pClient = $0
pDoAnimation = $0
pDone = $0
pHandsOff = $0
pMutex = $0
x = $0
y = $0
handleError()
changeState()
}
instance MakeItemList of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance objectDisplay of BitMap
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $0
canDrag = $0
state = $0
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $ffff ; -1
loop = $0
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
init()
draw()
}
instance objectSelector of Selector
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $1
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $ffff ; -1
loop = $0
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $0
font = $0
dimmed = $0
fore = $ffff ; -1
back = $fe ; 254, strIndex
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $0
drawCode = $0
handler = $0
helpStr = $0
key = $0
type = $6 ; maxScale
elements = $0
curItem = $0
start = $0
itemsPerPage = $4 ; scaleX
itemHeight = $2a ; 42, '*', font
itemWidth = $aa ; 170, addToFront
itemColor = $ffff ; -1
selectColor = $0
upArrow = $0
downArrow = $0
scrollBox = $0
scrollBar = $0
displayList = $0
allowDoubleClick= $1
doubleClickTime = $0
doubleClickObj = $0
selectItem()
}
instance ItemList of List
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
}
instance chooseBtn of SpellButton
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $403 ; 1027, pLevel
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $232a ; 9002
loop = $8 ; fixPriority
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $1
font = $1
dimmed = $0
fore = $2b ; 43, '+', type
back = $ffff ; -1
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $1
drawCode = $0
handler = $0
helpStr = $0
key = $0
text = string_0adc ; "Choose"
mode = $1
wide = $0
btnType = $0
textRect = $0
iconView = $0
normalColor = $ffff ; -1
selectColor = $ffff ; -1
chosenColor = $ffff ; -1
dimColor = $ffff ; -1
buttonSet = $0
buttonPtr = $0
checkMark = $0
lastState = $0
textOffsetX = $0
textOffsetY = $0
}
instance chooseCancelBtn of SpellButton
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
top = $0
left = $0
bottom = $0
right = $0
canTrack = $1
canDrag = $0
state = $403 ; 1027, pLevel
priority = $0
plane = $0
x = $0
y = $0
z = $0
scaleX = $80 ; 128, lastKey
scaleY = $80 ; 128, lastKey
maxScale = $80 ; 128, lastKey
fixPriority = $0
seenRect = $0
view = $232a ; 9002
loop = $8 ; fixPriority
cel = $0
bitmap = $0
scaleSignal = $0
magnifier = $0
signal = $0
client = $0
clut = $0
value = $0
font = $1
dimmed = $0
fore = $2b ; 43, '+', type
back = $ffff ; -1
skip = $fe ; 254, strIndex
borderColor = $ffff ; -1
hiColor = $0
borderSize = $1
drawCode = $0
handler = $0
helpStr = $0
key = $0
text = string_092f ; "Cancel"
mode = $1
wide = $0
btnType = $0
textRect = $0
iconView = $0
normalColor = $ffff ; -1
selectColor = $ffff ; -1
chosenColor = $ffff ; -1
dimColor = $ffff ; -1
buttonSet = $0
buttonPtr = $0
checkMark = $0
lastState = $0
textOffsetX = $0
textOffsetY = $0
}
instance ChooseObjectDialog of FancyDialog
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
elements = $0
size = $0
nextNode = $0
title = $0
font = $0
plane = $0
curItem = $0
caller = $0
seconds = $0
lastSeconds = $0
ticks = $0
state = $0
eatTheMice = $0
modal = $1
hidden = $0
keepDialog = $0
priority = $0
savedCursor = $0
prevItem = $0
selectHandler = $0
curShowMouseObj = $0
retObject = $0
retSelector = $0
disposeList = $0
init()
dispose()
}
instance MakeContainerDialog of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance EdibleCode of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance EquipCode of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance UseableCode of Code
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
doit()
}
instance WACombatMoveScript of WAScript
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
client = $0
state = $ffff ; -1
start = $0
timer = $0
cycles = $0
seconds = $0
lastSeconds = $0
ticks = $0
lastTicks = $0
register = $0
script = $0
caller = $0
next = $0
number = $0
pRoom = $0
pDirectObject = $0
pIndirectObject = $0
pMovieCmd = $0
pClient = $0
pDoAnimation = $0
pDone = $0
pHandsOff = $0
changeState()
}
string_083e = "Attack"
string_0845 = "Charge"
string_084c = "Guard"
string_0852 = "Parry"
string_0858 = "Cast Spell"
string_0863 = "Move"
string_0868 = "Eat/Drink"
string_0872 = "Use Item"
string_087b = "Equip Item"
string_0886 = "Take Item"
string_0890 = "Drop Item"
string_089a = "Flee"
string_089f = "SpellBtnList"
string_08ac = "LocatorList"
string_08b8 = "combatCursor"
string_08c5 = "CombatEvent"
string_08d1 = "ShowCombatAction"
string_08e2 = "BasicCursorController"
string_08f8 = "GridBox"
string_0900 = "CombatButton"
string_090d = "Choose Your Action"
string_0920 = "CombatDragItem"
string_092f = "Cancel"
string_0936 = "cancelButton"
string_0943 = "Help"
string_0948 = "HelpText"
string_0951 = "tbwppbb"
string_0959 = "CastSpell"
string_0963 = "tbp"
string_0967 = "ChooseItemToEat"
string_0977 = "ChooseItemToEquip"
string_0989 = "ChooseItemToUse"
string_0999 = "tb"
string_099c = "HandleCombatAction"
string_09af = "HandleTimerEnd"
string_09be = "lTurnTimer"
string_09c9 = "GetCombatAction"
string_09d9 = "engage1.mid"
string_09e5 = "engage2.mid"
string_09f1 = "victory.mid"
string_09fd = "tbbb"
string_0a02 = "CombatRoom"
string_0a0d = "Error in starting combat."
string_0a27 = "Error in starting combat. No opponents."
string_0a4f = "Waiting to start combat...\n"
string_0a6b = "Combat begins!\n"
string_0a7b = "ReadyingForCombatScript"
string_0a93 = "WANetCombatMoveScript"
string_0aa9 = "MakeItemList"
string_0ab6 = "objectDisplay"
string_0ac4 = "objectSelector"
string_0ad3 = "ItemList"
string_0adc = "Choose"
string_0ae3 = "chooseBtn"
string_0aed = "chooseCancelBtn"
string_0afd = "Choose An Object"
string_0b0e = "ChooseObjectDialog"
string_0b21 = "MakeContainerDialog"
string_0b35 = "EdibleCode"
string_0b40 = "EquipCode"
string_0b4a = "UseableCode"
string_0b56 = "battle3.mid"
string_0b62 = "battle2.mid"
string_0b6e = "battle1.mid"
string_0b7a = "step1.wav"
string_0b84 = "step2.wav"
string_0b8e = "WACombatMoveScript"

33
Heap/Heap40112.txt Normal file
View File

@ -0,0 +1,33 @@
subclass Mutex of Obj
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
pClient = $0
pOwner = $0
pObjects = $0
pActive = $0
init()
dispose()
hasConflict()
hasNoConflict()
}
subclass LockMgr of Obj
{
scratch = $0
pModule = $ffff ; -1
pLine = $ffff ; -1
pLockedList = $0
pPendingList = $0
init()
doit()
dispose()
lock()
}
string_0042 = "Mutex"
string_0048 = "LockMgr"