Upload files to "Heap"
This commit is contained in:
parent
592c0efcdc
commit
f90a885271
|
|
@ -0,0 +1,588 @@
|
||||||
|
local[$1] =
|
||||||
|
{
|
||||||
|
$0
|
||||||
|
}
|
||||||
|
|
||||||
|
instance HandsOnCode 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 <NIL> of Object
|
||||||
|
{
|
||||||
|
pDirectObject = $0
|
||||||
|
pIndirectObject = $0
|
||||||
|
|
||||||
|
getNextVerb()
|
||||||
|
clearQueue()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass NullMover of Motion
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
client = $0
|
||||||
|
caller = $0
|
||||||
|
x = $0
|
||||||
|
y = $0
|
||||||
|
dx = $0
|
||||||
|
dy = $0
|
||||||
|
b_moveCnt = $0
|
||||||
|
b_i1 = $0
|
||||||
|
b_i2 = $0
|
||||||
|
b_di = $0
|
||||||
|
b_xAxis = $0
|
||||||
|
b_incr = $0
|
||||||
|
completed = $0
|
||||||
|
xLast = $0
|
||||||
|
yLast = $0
|
||||||
|
pImmediateCue = $0
|
||||||
|
|
||||||
|
doit()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass Money of WorldObject
|
||||||
|
{
|
||||||
|
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 = $c544 ; -15036
|
||||||
|
loop = $0
|
||||||
|
cel = $0
|
||||||
|
bitmap = $0
|
||||||
|
scaleSignal = $8 ; fixPriority
|
||||||
|
magnifier = $0
|
||||||
|
signal = $21 ; 33, '!', key
|
||||||
|
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 = $32 ; 50, '2', edit
|
||||||
|
_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
|
||||||
|
cycleSpeed = $6 ; maxScale
|
||||||
|
script = $0
|
||||||
|
cycler = $0
|
||||||
|
timer = $0
|
||||||
|
scaler = $0
|
||||||
|
detailLevel = $0
|
||||||
|
xLast = $0
|
||||||
|
yLast = $0
|
||||||
|
xStep = $3 ; z
|
||||||
|
origStep = $302 ; 770, pBrowNum
|
||||||
|
moveSpeed = $6 ; maxScale
|
||||||
|
blocks = $0
|
||||||
|
mover = $0
|
||||||
|
looper = $0
|
||||||
|
viewer = $0
|
||||||
|
avoider = $0
|
||||||
|
code = $0
|
||||||
|
pName = string_048c ; ""
|
||||||
|
pBaseList = $0
|
||||||
|
pMsgStr = $0
|
||||||
|
pIDName = $0
|
||||||
|
pDirectObject = $0
|
||||||
|
pIndirectObject = $0
|
||||||
|
pDispose = $0
|
||||||
|
pMover = $0
|
||||||
|
pLastMover = $0
|
||||||
|
pUser = $0
|
||||||
|
pUpdatorList = $0
|
||||||
|
pUpdateClient = $0
|
||||||
|
pUpdateObj = $0
|
||||||
|
pColor = $0
|
||||||
|
pClutStart = $0
|
||||||
|
pPaused = $0
|
||||||
|
pMode = $1
|
||||||
|
pLastMode = $1
|
||||||
|
pAction = $1d ; 29, brTop
|
||||||
|
pBaseView = $ffff ; -1
|
||||||
|
pServIDLo = $ffff ; -1
|
||||||
|
pServIDHi = $ffff ; -1
|
||||||
|
pPlayMovie = $1
|
||||||
|
pSendMovie = $1
|
||||||
|
pMovieDelay = $0
|
||||||
|
pLastTicks = $0
|
||||||
|
pAffectedLo = $0
|
||||||
|
pAffectedHi = $0
|
||||||
|
pPolygon = $0
|
||||||
|
pAddedPolygon = $0
|
||||||
|
pOutgoingMovie = $0
|
||||||
|
pRoom = $0
|
||||||
|
pRoomNum = $ffff ; -1
|
||||||
|
pMovieCmd = $0
|
||||||
|
pBitmapBased = $0
|
||||||
|
pDoScaler = $1
|
||||||
|
pHidden = $0
|
||||||
|
pStrength = $0
|
||||||
|
pDexterity = $0
|
||||||
|
pIntelligence = $0
|
||||||
|
pEndurance = $0
|
||||||
|
pValue = $0
|
||||||
|
pManaValue = $0
|
||||||
|
pLevel = $0
|
||||||
|
pMana = $0
|
||||||
|
pManaMax = $0
|
||||||
|
pHealth = $0
|
||||||
|
pHealthHi = $0
|
||||||
|
pHealthMax = $0
|
||||||
|
pHealthMaxHi = $0
|
||||||
|
pStamina = $0
|
||||||
|
pStaminaMax = $0
|
||||||
|
pAlignment = $80 ; 128, lastKey
|
||||||
|
pArmorClass = $0
|
||||||
|
pApproachScript = $0
|
||||||
|
pMoney = $1
|
||||||
|
pRecordMotion = $0
|
||||||
|
pWeapon = $0
|
||||||
|
pCombatGroup = $0
|
||||||
|
pInvisibleClut = $0
|
||||||
|
pFrozenClut = $0
|
||||||
|
pMsgFile = $0
|
||||||
|
pDestLoop = $ffff ; -1
|
||||||
|
pHeadingCue = $0
|
||||||
|
pBaseBitsLo = $0
|
||||||
|
pBaseBitsHi = $0
|
||||||
|
pSoundGroup = $0
|
||||||
|
pDenomination = $0
|
||||||
|
pContainerButton= $0
|
||||||
|
pOwner = $0
|
||||||
|
|
||||||
|
buildBaseList()
|
||||||
|
buildVerbList()
|
||||||
|
see()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass Mana of WorldObject
|
||||||
|
{
|
||||||
|
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 = $c5a8 ; -14936
|
||||||
|
loop = $0
|
||||||
|
cel = $0
|
||||||
|
bitmap = $0
|
||||||
|
scaleSignal = $8 ; fixPriority
|
||||||
|
magnifier = $0
|
||||||
|
signal = $21 ; 33, '!', key
|
||||||
|
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 = $32 ; 50, '2', edit
|
||||||
|
_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
|
||||||
|
cycleSpeed = $6 ; maxScale
|
||||||
|
script = $0
|
||||||
|
cycler = $0
|
||||||
|
timer = $0
|
||||||
|
scaler = $0
|
||||||
|
detailLevel = $0
|
||||||
|
xLast = $0
|
||||||
|
yLast = $0
|
||||||
|
xStep = $3 ; z
|
||||||
|
origStep = $302 ; 770, pBrowNum
|
||||||
|
moveSpeed = $6 ; maxScale
|
||||||
|
blocks = $0
|
||||||
|
mover = $0
|
||||||
|
looper = $0
|
||||||
|
viewer = $0
|
||||||
|
avoider = $0
|
||||||
|
code = $0
|
||||||
|
pName = string_048c ; ""
|
||||||
|
pBaseList = $0
|
||||||
|
pMsgStr = $0
|
||||||
|
pIDName = $0
|
||||||
|
pDirectObject = $0
|
||||||
|
pIndirectObject = $0
|
||||||
|
pDispose = $0
|
||||||
|
pMover = $0
|
||||||
|
pLastMover = $0
|
||||||
|
pUser = $0
|
||||||
|
pUpdatorList = $0
|
||||||
|
pUpdateClient = $0
|
||||||
|
pUpdateObj = $0
|
||||||
|
pColor = $0
|
||||||
|
pClutStart = $0
|
||||||
|
pPaused = $0
|
||||||
|
pMode = $1
|
||||||
|
pLastMode = $1
|
||||||
|
pAction = $1d ; 29, brTop
|
||||||
|
pBaseView = $c5a8 ; -14936
|
||||||
|
pServIDLo = $ffff ; -1
|
||||||
|
pServIDHi = $ffff ; -1
|
||||||
|
pPlayMovie = $1
|
||||||
|
pSendMovie = $1
|
||||||
|
pMovieDelay = $0
|
||||||
|
pLastTicks = $0
|
||||||
|
pAffectedLo = $0
|
||||||
|
pAffectedHi = $0
|
||||||
|
pPolygon = $0
|
||||||
|
pAddedPolygon = $0
|
||||||
|
pOutgoingMovie = $0
|
||||||
|
pRoom = $0
|
||||||
|
pRoomNum = $ffff ; -1
|
||||||
|
pMovieCmd = $0
|
||||||
|
pBitmapBased = $0
|
||||||
|
pDoScaler = $1
|
||||||
|
pHidden = $0
|
||||||
|
pStrength = $0
|
||||||
|
pDexterity = $0
|
||||||
|
pIntelligence = $0
|
||||||
|
pEndurance = $0
|
||||||
|
pValue = $0
|
||||||
|
pManaValue = $0
|
||||||
|
pLevel = $0
|
||||||
|
pMana = $0
|
||||||
|
pManaMax = $0
|
||||||
|
pHealth = $0
|
||||||
|
pHealthHi = $0
|
||||||
|
pHealthMax = $0
|
||||||
|
pHealthMaxHi = $0
|
||||||
|
pStamina = $0
|
||||||
|
pStaminaMax = $0
|
||||||
|
pAlignment = $80 ; 128, lastKey
|
||||||
|
pArmorClass = $0
|
||||||
|
pApproachScript = $0
|
||||||
|
pMoney = $1
|
||||||
|
pRecordMotion = $0
|
||||||
|
pWeapon = $0
|
||||||
|
pCombatGroup = $0
|
||||||
|
pInvisibleClut = $0
|
||||||
|
pFrozenClut = $0
|
||||||
|
pMsgFile = $0
|
||||||
|
pDestLoop = $ffff ; -1
|
||||||
|
pHeadingCue = $0
|
||||||
|
pBaseBitsLo = $0
|
||||||
|
pBaseBitsHi = $0
|
||||||
|
pSoundGroup = $0
|
||||||
|
pDenomination = $0
|
||||||
|
pContainerButton= $0
|
||||||
|
pOwner = $0
|
||||||
|
|
||||||
|
buildBaseList()
|
||||||
|
buildVerbList()
|
||||||
|
see()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass WorldEgo of WorldActor
|
||||||
|
{
|
||||||
|
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 = $8 ; fixPriority
|
||||||
|
magnifier = $0
|
||||||
|
signal = $21 ; 33, '!', key
|
||||||
|
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 = $32 ; 50, '2', edit
|
||||||
|
_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
|
||||||
|
cycleSpeed = $6 ; maxScale
|
||||||
|
script = $0
|
||||||
|
cycler = $0
|
||||||
|
timer = $0
|
||||||
|
scaler = $0
|
||||||
|
detailLevel = $0
|
||||||
|
xLast = $0
|
||||||
|
yLast = $0
|
||||||
|
xStep = $3 ; z
|
||||||
|
origStep = $302 ; 770, pBrowNum
|
||||||
|
moveSpeed = $6 ; maxScale
|
||||||
|
blocks = $0
|
||||||
|
mover = $0
|
||||||
|
looper = $0
|
||||||
|
viewer = $0
|
||||||
|
avoider = $0
|
||||||
|
code = $0
|
||||||
|
pName = $0
|
||||||
|
pBaseList = $0
|
||||||
|
pMsgStr = $0
|
||||||
|
pIDName = $0
|
||||||
|
pDirectObject = $0
|
||||||
|
pIndirectObject = $0
|
||||||
|
pDispose = $0
|
||||||
|
pMover = $0
|
||||||
|
pLastMover = $0
|
||||||
|
pUser = $0
|
||||||
|
pUpdatorList = $0
|
||||||
|
pUpdateClient = $0
|
||||||
|
pUpdateObj = $0
|
||||||
|
pColor = $0
|
||||||
|
pClutStart = $0
|
||||||
|
pPaused = $0
|
||||||
|
pMode = $1
|
||||||
|
pLastMode = $1
|
||||||
|
pAction = $1
|
||||||
|
pBaseView = $ffff ; -1
|
||||||
|
pServIDLo = $ffff ; -1
|
||||||
|
pServIDHi = $ffff ; -1
|
||||||
|
pPlayMovie = $0
|
||||||
|
pSendMovie = $1
|
||||||
|
pMovieDelay = $0
|
||||||
|
pLastTicks = $0
|
||||||
|
pAffectedLo = $0
|
||||||
|
pAffectedHi = $0
|
||||||
|
pPolygon = $ffff ; -1
|
||||||
|
pAddedPolygon = $0
|
||||||
|
pOutgoingMovie = $0
|
||||||
|
pRoom = $0
|
||||||
|
pRoomNum = $ffff ; -1
|
||||||
|
pMovieCmd = $0
|
||||||
|
pBitmapBased = $0
|
||||||
|
pDoScaler = $1
|
||||||
|
pHidden = $0
|
||||||
|
pStrength = $0
|
||||||
|
pDexterity = $0
|
||||||
|
pIntelligence = $0
|
||||||
|
pEndurance = $0
|
||||||
|
pValue = $0
|
||||||
|
pManaValue = $0
|
||||||
|
pLevel = $0
|
||||||
|
pMana = $0
|
||||||
|
pManaMax = $0
|
||||||
|
pHealth = $0
|
||||||
|
pHealthHi = $0
|
||||||
|
pHealthMax = $0
|
||||||
|
pHealthMaxHi = $0
|
||||||
|
pStamina = $0
|
||||||
|
pStaminaMax = $0
|
||||||
|
pAlignment = $80 ; 128, lastKey
|
||||||
|
pArmorClass = $0
|
||||||
|
pApproachScript = $0
|
||||||
|
pMoney = $0
|
||||||
|
pRecordMotion = $1
|
||||||
|
pWeapon = $0
|
||||||
|
pCombatGroup = $0
|
||||||
|
pInvisibleClut = $0
|
||||||
|
pFrozenClut = $0
|
||||||
|
pMsgFile = $0
|
||||||
|
pDestLoop = $ffff ; -1
|
||||||
|
pHeadingCue = $0
|
||||||
|
pBaseBitsLo = $0
|
||||||
|
pBaseBitsHi = $0
|
||||||
|
pSoundGroup = $0
|
||||||
|
pHead = $0
|
||||||
|
pSittingOn = $0
|
||||||
|
pCombatX = $0
|
||||||
|
pCombatY = $0
|
||||||
|
pStep = $0
|
||||||
|
pEntryX = $ffff ; -1
|
||||||
|
pEntryY = $ffff ; -1
|
||||||
|
pWhoToFollow = $0
|
||||||
|
pReady = $1
|
||||||
|
pHeadOrigin = $0
|
||||||
|
pHeadBitmaps = $0
|
||||||
|
pShirtView = $ffff ; -1
|
||||||
|
pPantsView = $ffff ; -1
|
||||||
|
pShoesView = $ffff ; -1
|
||||||
|
pBeltView = $ffff ; -1
|
||||||
|
pWristView = $ffff ; -1
|
||||||
|
pBaldricView = $ffff ; -1
|
||||||
|
pRobeView = $ffff ; -1
|
||||||
|
pCowlView = $ffff ; -1
|
||||||
|
pSkirtView = $ffff ; -1
|
||||||
|
pWeaponView = $ffff ; -1
|
||||||
|
pShieldView = $ffff ; -1
|
||||||
|
pHelmetView = $ffff ; -1
|
||||||
|
pFriend = $0
|
||||||
|
pPeaceful = $1
|
||||||
|
pBarIndex = $ffff ; -1
|
||||||
|
edgeHit = $0
|
||||||
|
pChatTarget = $0
|
||||||
|
pInit = $1
|
||||||
|
pMsgCount = $0
|
||||||
|
pLastNoun = $ffff ; -1
|
||||||
|
pLastVerb = $ffff ; -1
|
||||||
|
pMoneyObj = $0
|
||||||
|
pManaObj = $0
|
||||||
|
pTargetting = $0
|
||||||
|
pClient = $0
|
||||||
|
|
||||||
|
init()
|
||||||
|
doit()
|
||||||
|
handleEvent()
|
||||||
|
hide()
|
||||||
|
buildVerbList()
|
||||||
|
handleVerb()
|
||||||
|
see()
|
||||||
|
showContents()
|
||||||
|
stopAction()
|
||||||
|
setMode()
|
||||||
|
clearMode()
|
||||||
|
restoreMode()
|
||||||
|
fromPacket()
|
||||||
|
setValue()
|
||||||
|
setManaValue()
|
||||||
|
isWizard()
|
||||||
|
startTargetting()
|
||||||
|
stopTargetting()
|
||||||
|
setPassword()
|
||||||
|
}
|
||||||
|
|
||||||
|
instance LookAtCharacter of DemonsScript
|
||||||
|
{
|
||||||
|
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
|
||||||
|
|
||||||
|
changeState()
|
||||||
|
}
|
||||||
|
|
||||||
|
string_0470 = "HandsOnCode"
|
||||||
|
string_047c = "NullMover"
|
||||||
|
string_0486 = "Money"
|
||||||
|
string_048c = ""
|
||||||
|
string_048d = "You see %s in your money bag."
|
||||||
|
string_04ab = "You see your empty money bag!"
|
||||||
|
string_04c9 = "Mana"
|
||||||
|
string_04ce = "You see %s in your crystal sack."
|
||||||
|
string_04ef = "You see your empty crystal sack!"
|
||||||
|
string_0510 = "Choose target..."
|
||||||
|
string_0521 = "Choose grid location..."
|
||||||
|
string_0539 = "Choose location..."
|
||||||
|
string_054c = "You are too far away to attack.\n"
|
||||||
|
string_056d = "That is not a valid target.\n"
|
||||||
|
string_058a = "WorldEgo"
|
||||||
|
string_0593 = "LookAtCharacter"
|
||||||
|
|
||||||
|
|
@ -0,0 +1,435 @@
|
||||||
|
local[$1] =
|
||||||
|
{
|
||||||
|
$0
|
||||||
|
}
|
||||||
|
|
||||||
|
instance tempLong of LongInt
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
lowWord = $0
|
||||||
|
hiWord = $0
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass GPolyBitmap 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 = $ffff ; -1
|
||||||
|
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
|
||||||
|
|
||||||
|
init()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass VerbArray of ByteArray
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
data = $0
|
||||||
|
type = $2
|
||||||
|
|
||||||
|
fill()
|
||||||
|
setBit()
|
||||||
|
clearBit()
|
||||||
|
getBit()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass VerbList of Set
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
elements = $0
|
||||||
|
size = $0
|
||||||
|
nextNode = $0
|
||||||
|
|
||||||
|
add()
|
||||||
|
release()
|
||||||
|
}
|
||||||
|
|
||||||
|
instance catchUpOnMessages of Code
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
|
||||||
|
doit()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass WorldObject of Act
|
||||||
|
{
|
||||||
|
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 = $8 ; fixPriority
|
||||||
|
magnifier = $0
|
||||||
|
signal = $21 ; 33, '!', key
|
||||||
|
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 = $32 ; 50, '2', edit
|
||||||
|
_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
|
||||||
|
cycleSpeed = $6 ; maxScale
|
||||||
|
script = $0
|
||||||
|
cycler = $0
|
||||||
|
timer = $0
|
||||||
|
scaler = $0
|
||||||
|
detailLevel = $0
|
||||||
|
xLast = $0
|
||||||
|
yLast = $0
|
||||||
|
xStep = $3 ; z
|
||||||
|
origStep = $302 ; 770, pBrowNum
|
||||||
|
moveSpeed = $6 ; maxScale
|
||||||
|
blocks = $0
|
||||||
|
mover = $0
|
||||||
|
looper = $0
|
||||||
|
viewer = $0
|
||||||
|
avoider = $0
|
||||||
|
code = $0
|
||||||
|
pName = $0
|
||||||
|
pBaseList = $0
|
||||||
|
pMsgStr = $0
|
||||||
|
pIDName = $0
|
||||||
|
pDirectObject = $0
|
||||||
|
pIndirectObject = $0
|
||||||
|
pDispose = $0
|
||||||
|
pMover = $0
|
||||||
|
pLastMover = $0
|
||||||
|
pUser = $0
|
||||||
|
pUpdatorList = $0
|
||||||
|
pUpdateClient = $0
|
||||||
|
pUpdateObj = $0
|
||||||
|
pColor = $0
|
||||||
|
pClutStart = $0
|
||||||
|
pPaused = $0
|
||||||
|
pMode = $1
|
||||||
|
pLastMode = $1
|
||||||
|
pAction = $1d ; 29, brTop
|
||||||
|
pBaseView = $ffff ; -1
|
||||||
|
pServIDLo = $ffff ; -1
|
||||||
|
pServIDHi = $ffff ; -1
|
||||||
|
pPlayMovie = $1
|
||||||
|
pSendMovie = $1
|
||||||
|
pMovieDelay = $0
|
||||||
|
pLastTicks = $0
|
||||||
|
pAffectedLo = $0
|
||||||
|
pAffectedHi = $0
|
||||||
|
pPolygon = $0
|
||||||
|
pAddedPolygon = $0
|
||||||
|
pOutgoingMovie = $0
|
||||||
|
pRoom = $0
|
||||||
|
pRoomNum = $ffff ; -1
|
||||||
|
pMovieCmd = $0
|
||||||
|
pBitmapBased = $0
|
||||||
|
pDoScaler = $1
|
||||||
|
pHidden = $0
|
||||||
|
pStrength = $0
|
||||||
|
pDexterity = $0
|
||||||
|
pIntelligence = $0
|
||||||
|
pEndurance = $0
|
||||||
|
pValue = $0
|
||||||
|
pManaValue = $0
|
||||||
|
pLevel = $0
|
||||||
|
pMana = $0
|
||||||
|
pManaMax = $0
|
||||||
|
pHealth = $0
|
||||||
|
pHealthHi = $0
|
||||||
|
pHealthMax = $0
|
||||||
|
pHealthMaxHi = $0
|
||||||
|
pStamina = $0
|
||||||
|
pStaminaMax = $0
|
||||||
|
pAlignment = $80 ; 128, lastKey
|
||||||
|
pArmorClass = $0
|
||||||
|
pApproachScript = $0
|
||||||
|
pMoney = $0
|
||||||
|
pRecordMotion = $0
|
||||||
|
pWeapon = $0
|
||||||
|
pCombatGroup = $0
|
||||||
|
pInvisibleClut = $0
|
||||||
|
pFrozenClut = $0
|
||||||
|
pMsgFile = $0
|
||||||
|
pDestLoop = $ffff ; -1
|
||||||
|
pHeadingCue = $0
|
||||||
|
pBaseBitsLo = $0
|
||||||
|
pBaseBitsHi = $0
|
||||||
|
pSoundGroup = $0
|
||||||
|
|
||||||
|
init()
|
||||||
|
doit()
|
||||||
|
dispose()
|
||||||
|
show()
|
||||||
|
perform()
|
||||||
|
handleEvent()
|
||||||
|
onMe()
|
||||||
|
addToCast()
|
||||||
|
hide()
|
||||||
|
getName()
|
||||||
|
lastCel()
|
||||||
|
cue()
|
||||||
|
setHeading()
|
||||||
|
update()
|
||||||
|
getBase()
|
||||||
|
getBaseCharacter()
|
||||||
|
hasBase()
|
||||||
|
addBase()
|
||||||
|
deleteBase()
|
||||||
|
buildBaseList()
|
||||||
|
buildVerbList()
|
||||||
|
handleVerb()
|
||||||
|
getVerb()
|
||||||
|
setMessage()
|
||||||
|
open()
|
||||||
|
close()
|
||||||
|
lock()
|
||||||
|
unlock()
|
||||||
|
take()
|
||||||
|
give()
|
||||||
|
drop()
|
||||||
|
look()
|
||||||
|
see()
|
||||||
|
putOn()
|
||||||
|
bePutOn()
|
||||||
|
takeOff()
|
||||||
|
beTakenOff()
|
||||||
|
eat()
|
||||||
|
beEaten()
|
||||||
|
drink()
|
||||||
|
beDrunk()
|
||||||
|
trigger()
|
||||||
|
goto()
|
||||||
|
approach()
|
||||||
|
face()
|
||||||
|
examine()
|
||||||
|
beExamined()
|
||||||
|
buy()
|
||||||
|
sell()
|
||||||
|
nextFeature()
|
||||||
|
prevFeature()
|
||||||
|
showContents()
|
||||||
|
hideContents()
|
||||||
|
modifyProp()
|
||||||
|
getProp()
|
||||||
|
stopAction()
|
||||||
|
getOwner()
|
||||||
|
getBaseOwner()
|
||||||
|
owns()
|
||||||
|
isOwnedBy()
|
||||||
|
updateDisplay()
|
||||||
|
createDisplay()
|
||||||
|
createClut()
|
||||||
|
inheritClut()
|
||||||
|
removeClut()
|
||||||
|
setColor()
|
||||||
|
createBitmap()
|
||||||
|
disposeBitmap()
|
||||||
|
remapBitmap()
|
||||||
|
addBitmap()
|
||||||
|
addCel()
|
||||||
|
addLinkedCel()
|
||||||
|
addLinkedBitmap()
|
||||||
|
insertLinkedBitmap()
|
||||||
|
insertLinkedCel()
|
||||||
|
addUpdator()
|
||||||
|
deleteUpdator()
|
||||||
|
setMode()
|
||||||
|
clearMode()
|
||||||
|
saveMode()
|
||||||
|
restoreMode()
|
||||||
|
saveMover()
|
||||||
|
restoreMover()
|
||||||
|
pause()
|
||||||
|
unpause()
|
||||||
|
setAction()
|
||||||
|
generatePolygon()
|
||||||
|
submitPolygon()
|
||||||
|
removePolygon()
|
||||||
|
addToRoom()
|
||||||
|
deleteFromRoom()
|
||||||
|
deleteFromCast()
|
||||||
|
matchScaler()
|
||||||
|
fromPacket()
|
||||||
|
fromExtendedPacket()
|
||||||
|
buildExtendedPacket()
|
||||||
|
getServIDs()
|
||||||
|
setView()
|
||||||
|
changed()
|
||||||
|
sendMovie()
|
||||||
|
moveDone()
|
||||||
|
recordPosn()
|
||||||
|
recordMotion()
|
||||||
|
recordHide()
|
||||||
|
recordShow()
|
||||||
|
recordHeading()
|
||||||
|
setAffectedState()
|
||||||
|
getAffectedState()
|
||||||
|
clearAffectedState()
|
||||||
|
setValue()
|
||||||
|
addValue()
|
||||||
|
subValue()
|
||||||
|
setManaValue()
|
||||||
|
addManaValue()
|
||||||
|
subManaValue()
|
||||||
|
setName()
|
||||||
|
deleteFromServer()
|
||||||
|
addToServer()
|
||||||
|
matchServID()
|
||||||
|
setCombatGroup()
|
||||||
|
servIDEquals()
|
||||||
|
setServID()
|
||||||
|
setVisible()
|
||||||
|
validatePosn()
|
||||||
|
getBitmap()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass ApproachScript of DemonsScript
|
||||||
|
{
|
||||||
|
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
|
||||||
|
pApproachX = $ffff ; -1
|
||||||
|
pApproachY = $ffff ; -1
|
||||||
|
pDistance = $0
|
||||||
|
pObject = $0
|
||||||
|
pClient = $0
|
||||||
|
|
||||||
|
init()
|
||||||
|
dispose()
|
||||||
|
changeState()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass DisposeNotifyList of Set
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
elements = $0
|
||||||
|
size = $0
|
||||||
|
nextNode = $0
|
||||||
|
}
|
||||||
|
|
||||||
|
string_0268 = "tempLong"
|
||||||
|
string_0271 = "GPolyBitmap"
|
||||||
|
string_027d = "VerbArray"
|
||||||
|
string_0287 = "VerbList"
|
||||||
|
string_0290 = "catchUpOnMessages"
|
||||||
|
string_02a2 = "%s(0x%x) is being disposed while a movie command is active on it.\n" \
|
||||||
|
"pMovieCmd = %s(0x%x)"
|
||||||
|
string_02f9 = "Object(%s, %s[$%x], %s[%d], %s) stopped at bad place. The programmers have been made aware of this and it will be fixed very soon."
|
||||||
|
string_037c = "<bad movie>"
|
||||||
|
string_0388 = "<no script>"
|
||||||
|
string_0394 = "<no mover>"
|
||||||
|
string_039f = "createDisplay generated a NULL bitmap (view == %d)"
|
||||||
|
string_03d2 = "getServIDs called"
|
||||||
|
string_03e4 = "tpla"
|
||||||
|
string_03e9 = "%s gold coin%s"
|
||||||
|
string_03f8 = ""
|
||||||
|
string_03f9 = "s"
|
||||||
|
string_03fb = "%s mana crystal%s"
|
||||||
|
string_040d = "WorldObject"
|
||||||
|
string_0419 = "n %s"
|
||||||
|
string_041e = " %s"
|
||||||
|
string_0422 = "ApproachScript"
|
||||||
|
string_0431 = "DisposeNotifyList"
|
||||||
|
|
||||||
|
|
@ -0,0 +1,27 @@
|
||||||
|
subclass WorldObjectBase of Obj
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
pName = $0
|
||||||
|
pSelf = $0
|
||||||
|
pType = $0
|
||||||
|
|
||||||
|
dispose()
|
||||||
|
buildVerbList()
|
||||||
|
handlesAction()
|
||||||
|
modifyProp()
|
||||||
|
getProp()
|
||||||
|
updateDisplay()
|
||||||
|
updateAction()
|
||||||
|
fromPacket()
|
||||||
|
getServIDs()
|
||||||
|
preDispose()
|
||||||
|
editProps()
|
||||||
|
readProps()
|
||||||
|
writeProps()
|
||||||
|
getPropList()
|
||||||
|
}
|
||||||
|
|
||||||
|
string_0024 = "WorldObjectBase"
|
||||||
|
|
||||||
|
|
@ -0,0 +1,61 @@
|
||||||
|
subclass BOpenable of WorldObjectBase
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
pName = $0
|
||||||
|
pSelf = $0
|
||||||
|
pType = $4 ; scaleX
|
||||||
|
pOpen = $0
|
||||||
|
pDestX = $ffff ; -1
|
||||||
|
pDestY = $ffff ; -1
|
||||||
|
|
||||||
|
buildVerbList()
|
||||||
|
handlesAction()
|
||||||
|
fromPacket()
|
||||||
|
open()
|
||||||
|
close()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass BKey of WorldObjectBase
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
pName = $0
|
||||||
|
pSelf = $0
|
||||||
|
pType = $8 ; fixPriority
|
||||||
|
pLockValue = $0
|
||||||
|
pUnlockValue = $0
|
||||||
|
pSkeletonLock = $0
|
||||||
|
pSkeletonUnlock = $0
|
||||||
|
|
||||||
|
fromPacket()
|
||||||
|
}
|
||||||
|
|
||||||
|
subclass BLockable of WorldObjectBase
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
pName = $0
|
||||||
|
pSelf = $0
|
||||||
|
pType = $7 ; priority
|
||||||
|
pLocked = $0
|
||||||
|
pAutoLock = $0
|
||||||
|
pLockValue = $0
|
||||||
|
pUnlockValue = $0
|
||||||
|
pSkeletonLock = $0
|
||||||
|
pSkeletonUnlock = $0
|
||||||
|
|
||||||
|
buildVerbList()
|
||||||
|
handlesAction()
|
||||||
|
fromPacket()
|
||||||
|
lock()
|
||||||
|
unlock()
|
||||||
|
}
|
||||||
|
|
||||||
|
string_007a = "BOpenable"
|
||||||
|
string_0084 = "BKey"
|
||||||
|
string_0089 = "BLockable"
|
||||||
|
|
||||||
|
|
@ -0,0 +1,27 @@
|
||||||
|
subclass BWeapon of BWearable
|
||||||
|
{
|
||||||
|
scratch = $0
|
||||||
|
pModule = $ffff ; -1
|
||||||
|
pLine = $ffff ; -1
|
||||||
|
pName = $0
|
||||||
|
pSelf = $0
|
||||||
|
pType = $9 ; inLeft
|
||||||
|
pAreaWorn = $64 ; 100, 'd', moveDone
|
||||||
|
pDamageMod = $0
|
||||||
|
pIsWorn = $0
|
||||||
|
pWearer = $0
|
||||||
|
pLayer = $0
|
||||||
|
pActionOffset = $0
|
||||||
|
pMask = $0
|
||||||
|
pContainerButton= $0
|
||||||
|
pSize = $1
|
||||||
|
pDamageType = $2
|
||||||
|
pSpeed = $5 ; scaleY
|
||||||
|
pPointBonus = $0
|
||||||
|
|
||||||
|
fromPacket()
|
||||||
|
bePutOn()
|
||||||
|
}
|
||||||
|
|
||||||
|
string_003c = "BWeapon"
|
||||||
|
|
||||||
Loading…
Reference in New Issue