589 lines
14 KiB
Plaintext
589 lines
14 KiB
Plaintext
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"
|
|
|