60 lines
1.2 KiB
Plaintext
60 lines
1.2 KiB
Plaintext
instance blankText of Str
|
|
{
|
|
scratch = $0
|
|
pModule = $ffff ; -1
|
|
pLine = $ffff ; -1
|
|
data = string_007a ; ""
|
|
type = $3 ; z
|
|
}
|
|
|
|
subclass BDescribed of WorldObjectBase
|
|
{
|
|
scratch = $0
|
|
pModule = $ffff ; -1
|
|
pLine = $ffff ; -1
|
|
pName = $0
|
|
pSelf = $0
|
|
pType = $16 ; 22, lsLeft
|
|
pText = $0
|
|
pIsBook = $0
|
|
|
|
init()
|
|
dispose()
|
|
handlesAction()
|
|
fromPacket()
|
|
see()
|
|
setText()
|
|
}
|
|
|
|
instance GetDescriptionScript 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
|
|
|
|
changeState()
|
|
}
|
|
|
|
string_007a = ""
|
|
string_007b = "blankText"
|
|
string_0085 = "Trying to see a BDescribed with script attached to pSelf."
|
|
string_00bf = "BDescribed"
|
|
string_00ca = "Okay"
|
|
string_00cf = "GetDescriptionScript"
|
|
|