Upload files to "Script"
This commit is contained in:
parent
f4b2b973b3
commit
00f9ffcb3e
File diff suppressed because it is too large
Load Diff
|
|
@ -0,0 +1,193 @@
|
||||||
|
StoreHandler::enter:
|
||||||
|
ret
|
||||||
|
|
||||||
|
StoreHandler::exit:
|
||||||
|
ret
|
||||||
|
|
||||||
|
StoreHandler::newObjects:
|
||||||
|
ret
|
||||||
|
|
||||||
|
FakeServer::enterStore:
|
||||||
|
lap param[$2]
|
||||||
|
aTop pStoreHandler
|
||||||
|
pushi $5c1 ; 1473, pStoreID
|
||||||
|
push1
|
||||||
|
lsp param[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $c9 ; 201, setScript
|
||||||
|
push1
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
lofsa FSEnterStoreScript
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
FakeServer::leaveStore:
|
||||||
|
pushi $c9 ; 201, setScript
|
||||||
|
push1
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
lofsa FSLeaveStoreScript
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
FSStoreBag::buildBaseList:
|
||||||
|
pushi $389 ; 905, buildBaseList
|
||||||
|
push0
|
||||||
|
super WorldObject, $4
|
||||||
|
bnot
|
||||||
|
pushi $387 ; 903, addBase
|
||||||
|
push1
|
||||||
|
class BCarryable
|
||||||
|
push
|
||||||
|
pushi $387 ; 903, addBase
|
||||||
|
push1
|
||||||
|
class BOpenable
|
||||||
|
push
|
||||||
|
pushi $387 ; 903, addBase
|
||||||
|
push1
|
||||||
|
class BContainer
|
||||||
|
push
|
||||||
|
self $12
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
FSStoreShirt::buildBaseList:
|
||||||
|
link $1
|
||||||
|
pushi $389 ; 905, buildBaseList
|
||||||
|
push0
|
||||||
|
super WorldObject, $4
|
||||||
|
bnot
|
||||||
|
pushi $387 ; 903, addBase
|
||||||
|
push1
|
||||||
|
class BCarryable
|
||||||
|
push
|
||||||
|
pushi $387 ; 903, addBase
|
||||||
|
push1
|
||||||
|
class BWearable
|
||||||
|
push
|
||||||
|
self $c
|
||||||
|
bnot
|
||||||
|
pushi $4d1 ; 1233, setAreaWorn
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
pushi $35c ; 860, getBase
|
||||||
|
push1
|
||||||
|
class BWearable
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
sat temp[$0]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $3ae ; 942, setColor
|
||||||
|
push1
|
||||||
|
pushi $53 ; 83, 'S', restore
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
FSStoreObjectList::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
super List, $4
|
||||||
|
bnot
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
lofsa FSStoreBag
|
||||||
|
push
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
FSEnterStoreScript::changeState:
|
||||||
|
lap param[$1]
|
||||||
|
aTop state
|
||||||
|
push
|
||||||
|
dup
|
||||||
|
ldi $0
|
||||||
|
eq?
|
||||||
|
bnt code_0131
|
||||||
|
push2
|
||||||
|
push2
|
||||||
|
pushi $6 ; maxScale
|
||||||
|
callk kernel_60, $4
|
||||||
|
bnot
|
||||||
|
aTop seconds
|
||||||
|
jmp code_0160
|
||||||
|
|
||||||
|
code_0131: dup
|
||||||
|
ldi $1
|
||||||
|
eq?
|
||||||
|
bnt code_0160
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
lofsa FSStoreObjectList
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $5be ; 1470, enter
|
||||||
|
push0
|
||||||
|
pushi $5c0 ; 1472, newObjects
|
||||||
|
push1
|
||||||
|
lofsa FSStoreObjectList
|
||||||
|
push
|
||||||
|
pushi $5c4 ; 1476, pStoreHandler
|
||||||
|
push0
|
||||||
|
pToa client
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $a
|
||||||
|
bnot
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
code_0160: toss
|
||||||
|
ret
|
||||||
|
|
||||||
|
FSLeaveStoreScript::changeState:
|
||||||
|
lap param[$1]
|
||||||
|
aTop state
|
||||||
|
push
|
||||||
|
dup
|
||||||
|
ldi $0
|
||||||
|
eq?
|
||||||
|
bnt code_0179
|
||||||
|
push2
|
||||||
|
push2
|
||||||
|
pushi $6 ; maxScale
|
||||||
|
callk kernel_60, $4
|
||||||
|
bnot
|
||||||
|
aTop seconds
|
||||||
|
jmp code_0199
|
||||||
|
|
||||||
|
code_0179: dup
|
||||||
|
ldi $1
|
||||||
|
eq?
|
||||||
|
bnt code_0199
|
||||||
|
pushi $5bf ; 1471, exit
|
||||||
|
push0
|
||||||
|
pushi $5c4 ; 1476, pStoreHandler
|
||||||
|
push0
|
||||||
|
pToa client
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
lofsa FSStoreObjectList
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0199: toss
|
||||||
|
ret
|
||||||
|
|
||||||
|
|
@ -0,0 +1,3 @@
|
||||||
|
GSound::dispose:
|
||||||
|
ret
|
||||||
|
|
||||||
|
|
@ -0,0 +1,415 @@
|
||||||
|
CursorRegionController::init:
|
||||||
|
lsg global[$cd]
|
||||||
|
selfID
|
||||||
|
ne?
|
||||||
|
bnt code_00ae
|
||||||
|
lag global[$cd]
|
||||||
|
bnt code_0099
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0099: selfID
|
||||||
|
sag global[$cd]
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
class GlobalDemons
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
super Set, $4
|
||||||
|
bnot
|
||||||
|
code_00ae: ret
|
||||||
|
|
||||||
|
CursorRegionController::dispose:
|
||||||
|
pushi $58 ; 88, 'X', delete
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
class GlobalDemons
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
aTop curRect
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
super Set, $4
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
sag global[$cd]
|
||||||
|
ret
|
||||||
|
|
||||||
|
CursorRegionController::doit:
|
||||||
|
link $6
|
||||||
|
pushi $f4 ; 244, curEvent
|
||||||
|
push0
|
||||||
|
lag global[$e]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$2]
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$3]
|
||||||
|
push2
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
sat temp[$4]
|
||||||
|
lsp param[$0]
|
||||||
|
ldi $1
|
||||||
|
eq?
|
||||||
|
bnt code_00ef
|
||||||
|
lap param[$1]
|
||||||
|
code_00ef: not
|
||||||
|
bnt code_0115
|
||||||
|
pushi $261 ; 609, controls
|
||||||
|
push0
|
||||||
|
lag global[$e]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $0
|
||||||
|
eq?
|
||||||
|
bt code_010d
|
||||||
|
pushi $2b ; 43, '+', type
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $0
|
||||||
|
ne?
|
||||||
|
code_010d: bnt code_0115
|
||||||
|
ret
|
||||||
|
|
||||||
|
bnt code_0115
|
||||||
|
jmp code_01bd
|
||||||
|
|
||||||
|
code_0115: pToa curRect
|
||||||
|
not
|
||||||
|
bt code_0151
|
||||||
|
pushi $89 ; 137, top
|
||||||
|
push0
|
||||||
|
pToa curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
lat temp[$4]
|
||||||
|
le?
|
||||||
|
bnt code_0150
|
||||||
|
pprev
|
||||||
|
pushi $8a ; 138, bottom
|
||||||
|
push0
|
||||||
|
pToa curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
le?
|
||||||
|
bnt code_0150
|
||||||
|
pushi $87 ; 135, left
|
||||||
|
push0
|
||||||
|
pToa curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
lat temp[$3]
|
||||||
|
le?
|
||||||
|
bnt code_0150
|
||||||
|
pprev
|
||||||
|
pushi $88 ; 136, right
|
||||||
|
push0
|
||||||
|
pToa curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
le?
|
||||||
|
code_0150: not
|
||||||
|
code_0151: bnt code_019a
|
||||||
|
ldi $0
|
||||||
|
aTop curRect
|
||||||
|
sat temp[$0]
|
||||||
|
code_0159: lst temp[$0]
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
lt?
|
||||||
|
bnt code_01bd
|
||||||
|
pushi $4b ; 75, 'K', at
|
||||||
|
push1
|
||||||
|
lst temp[$0]
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
sat temp[$1]
|
||||||
|
bnt code_0194
|
||||||
|
pushi $a3 ; 163, contains
|
||||||
|
push2
|
||||||
|
lst temp[$3]
|
||||||
|
lst temp[$4]
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
bnt code_0194
|
||||||
|
pushi $54c ; 1356, inWhichList
|
||||||
|
push1
|
||||||
|
lst temp[$2]
|
||||||
|
lat temp[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
aTop curRect
|
||||||
|
bnt code_0194
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
pToa curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0194: +at temp[$0]
|
||||||
|
jmp code_0159
|
||||||
|
|
||||||
|
jmp code_01bd
|
||||||
|
|
||||||
|
code_019a: pToa curRect
|
||||||
|
bnt code_01bd
|
||||||
|
pushi $54c ; 1356, inWhichList
|
||||||
|
push1
|
||||||
|
lst temp[$2]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
sat temp[$0]
|
||||||
|
push
|
||||||
|
pToa curRect
|
||||||
|
ne?
|
||||||
|
bnt code_01bd
|
||||||
|
lat temp[$0]
|
||||||
|
bnt code_01bd
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
lat temp[$0]
|
||||||
|
aTop curRect
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_01bd: ret
|
||||||
|
|
||||||
|
CursorRegionController::reset:
|
||||||
|
ldi $0
|
||||||
|
aTop curRect
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
self $6
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
CursorRegion::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
super Rect, $4
|
||||||
|
bnot
|
||||||
|
pToa aCursor
|
||||||
|
not
|
||||||
|
bnt code_01ef
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
&rest $2
|
||||||
|
class Cursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
aTop aCursor
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
class Set
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
aTop list
|
||||||
|
code_01ef: lap param[$0]
|
||||||
|
bnt code_01fd
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
lap param[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_01fd: ret
|
||||||
|
|
||||||
|
CursorRegion::dispose:
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
aTop aCursor
|
||||||
|
pToa list
|
||||||
|
bnt code_021a
|
||||||
|
pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
aTop list
|
||||||
|
code_021a: lag global[$cd]
|
||||||
|
bnt code_0225
|
||||||
|
pushi $58 ; 88, 'X', delete
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0225: pushi $95 ; 149, dispose
|
||||||
|
push0
|
||||||
|
super Rect, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
CursorRegion::doit:
|
||||||
|
lsg global[$b]
|
||||||
|
pToa aCursor
|
||||||
|
ne?
|
||||||
|
bnt code_0249
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
push2
|
||||||
|
pTos aCursor
|
||||||
|
push1
|
||||||
|
lag global[$2]
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
lag global[$b]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0249: ret
|
||||||
|
|
||||||
|
CursorRegion::add:
|
||||||
|
pToa list
|
||||||
|
bnt code_0257
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0257: ret
|
||||||
|
|
||||||
|
CursorRegion::delete:
|
||||||
|
pToa list
|
||||||
|
bnt code_0264
|
||||||
|
pushi $58 ; 88, 'X', delete
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0264: ret
|
||||||
|
|
||||||
|
CursorRegion::eachElementDo:
|
||||||
|
pToa list
|
||||||
|
bnt code_0272
|
||||||
|
pushi $9d ; 157, eachElementDo
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0272: ret
|
||||||
|
|
||||||
|
CursorRegion::inWhichList:
|
||||||
|
link $3
|
||||||
|
lap param[$0]
|
||||||
|
bnt code_027d
|
||||||
|
lap param[$1]
|
||||||
|
jmp code_0286
|
||||||
|
|
||||||
|
code_027d: pushi $f4 ; 244, curEvent
|
||||||
|
push0
|
||||||
|
lag global[$e]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
code_0286: sat temp[$2]
|
||||||
|
pToa list
|
||||||
|
not
|
||||||
|
bt code_0296
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
pToa list
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
code_0296: bnt code_02c2
|
||||||
|
pTos top
|
||||||
|
push2
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
le?
|
||||||
|
bnt code_02bf
|
||||||
|
pprev
|
||||||
|
pToa bottom
|
||||||
|
le?
|
||||||
|
bnt code_02bf
|
||||||
|
pTos left
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
lat temp[$2]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
le?
|
||||||
|
bnt code_02bf
|
||||||
|
pprev
|
||||||
|
pToa right
|
||||||
|
le?
|
||||||
|
bnt code_02bf
|
||||||
|
selfID
|
||||||
|
jmp code_02c1
|
||||||
|
|
||||||
|
code_02bf: ldi $0
|
||||||
|
code_02c1: ret
|
||||||
|
|
||||||
|
code_02c2: ldi $0
|
||||||
|
sat temp[$0]
|
||||||
|
code_02c6: lst temp[$0]
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
pToa list
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
lt?
|
||||||
|
bnt code_02f1
|
||||||
|
pushi $54c ; 1356, inWhichList
|
||||||
|
push1
|
||||||
|
lst temp[$2]
|
||||||
|
pushi $4b ; 75, 'K', at
|
||||||
|
push1
|
||||||
|
lst temp[$0]
|
||||||
|
pToa list
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
sat temp[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
bnt code_02ed
|
||||||
|
lat temp[$1]
|
||||||
|
ret
|
||||||
|
|
||||||
|
code_02ed: +at temp[$0]
|
||||||
|
jmp code_02c6
|
||||||
|
|
||||||
|
code_02f1: selfID
|
||||||
|
ret
|
||||||
|
|
||||||
|
CursorRegion::setCursor:
|
||||||
|
pToa aCursor
|
||||||
|
not
|
||||||
|
bnt code_0303
|
||||||
|
pushi $8d ; 141, new
|
||||||
|
push0
|
||||||
|
class Cursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
aTop aCursor
|
||||||
|
code_0303: pushi $1b3 ; 435, setCursor
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
|
@ -0,0 +1,914 @@
|
||||||
|
export59962_0 = GameRoomCursorController
|
||||||
|
|
||||||
|
GameRoomCursorController::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegionController, $4
|
||||||
|
bnot
|
||||||
|
pushi $5a ; 90, 'Z', size
|
||||||
|
push0
|
||||||
|
self $4
|
||||||
|
bnot
|
||||||
|
bnt code_009f
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
lofsa NorthExitCurReg
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
lofsa SouthExitCurReg
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
lofsa EastExitCurReg
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push1
|
||||||
|
pushSelf
|
||||||
|
lofsa WestExitCurReg
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
ldi $0
|
||||||
|
aTop curRect
|
||||||
|
jmp code_00b9
|
||||||
|
|
||||||
|
code_009f: pushi $9f ; 159, add
|
||||||
|
push2
|
||||||
|
lofsa RoomCurReg
|
||||||
|
push
|
||||||
|
lofsa InterfaceCurReg
|
||||||
|
push
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
pushi $9d ; 157, eachElementDo
|
||||||
|
push2
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
pushSelf
|
||||||
|
self $8
|
||||||
|
bnot
|
||||||
|
code_00b9: ret
|
||||||
|
|
||||||
|
GameRoomCursorController::doit:
|
||||||
|
lag global[$1]
|
||||||
|
bnt code_00e4
|
||||||
|
push1
|
||||||
|
push
|
||||||
|
calle export60000_0, $2
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
bt code_00d7
|
||||||
|
pushi $97 ; 151, isKindOf
|
||||||
|
push1
|
||||||
|
class WorldActor
|
||||||
|
push
|
||||||
|
lag global[$1]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
code_00d7: bnt code_00e4
|
||||||
|
push2
|
||||||
|
lofsa string_014e ; "ego(0x%x) is not a valid object"
|
||||||
|
push
|
||||||
|
lsg global[$1]
|
||||||
|
callk kernel_132, $4
|
||||||
|
bnot
|
||||||
|
code_00e4: pushi $32d ; 813, pObj
|
||||||
|
push0
|
||||||
|
class WDragger
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bt code_0110
|
||||||
|
lag global[$1]
|
||||||
|
not
|
||||||
|
bt code_0110
|
||||||
|
pushi $381 ; 897, pMode
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
and
|
||||||
|
bt code_0110
|
||||||
|
pushi $a1 ; 161, firstEqual
|
||||||
|
push2
|
||||||
|
pushi $1d3 ; 467, modal
|
||||||
|
push2
|
||||||
|
class DialogHandler
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
code_0110: bnt code_0117
|
||||||
|
ldi $0
|
||||||
|
aTop curRect
|
||||||
|
ret
|
||||||
|
|
||||||
|
code_0117: pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegionController, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
RoomCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
pushi $280 ; 640, disposeWhenDone
|
||||||
|
pushi $131 ; 305, asStr
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
lofsa WestExitCurReg
|
||||||
|
push
|
||||||
|
lofsa EastExitCurReg
|
||||||
|
push
|
||||||
|
lofsa SouthExitCurReg
|
||||||
|
push
|
||||||
|
lofsa NorthExitCurReg
|
||||||
|
push
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
pushi $9d ; 157, eachElementDo
|
||||||
|
push2
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
pushSelf
|
||||||
|
self $2a
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
RoomCurReg::doit:
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $25e ; 606, cursorLoop
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
WestExitCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
pushi $9 ; inLeft
|
||||||
|
push0
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
push0
|
||||||
|
pushi $1e ; 30, brRight
|
||||||
|
pushi $14 ; 20, nsRight
|
||||||
|
pushi $118 ; 280, bitANDLong
|
||||||
|
self $16
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
WestExitCurReg::doit:
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
eq?
|
||||||
|
bt code_01db
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $6e ; 110, 'n', resX
|
||||||
|
eq?
|
||||||
|
code_01db: bnt code_0258
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bnt code_0258
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $526 ; 1318, pExits
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $8 ; fixPriority
|
||||||
|
and
|
||||||
|
bnt code_0206
|
||||||
|
ldi $9 ; inLeft
|
||||||
|
jmp code_0208
|
||||||
|
|
||||||
|
code_0206: ldi $11 ; 17, bitmap
|
||||||
|
code_0208: push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $54f ; 1359, pFlags
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $80 ; 128, lastKey
|
||||||
|
and
|
||||||
|
bnt code_024e
|
||||||
|
pushi $a0 ; 160, firstTrue
|
||||||
|
push2
|
||||||
|
pushi $35c ; 860, getBase
|
||||||
|
class BNPC
|
||||||
|
push
|
||||||
|
pushi $421 ; 1057, pWObjectList
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
bnt code_024e
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $11 ; 17, bitmap
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_024e: pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
jmp code_0271
|
||||||
|
|
||||||
|
code_0258: pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $25e ; 606, cursorLoop
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0271: pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
EastExitCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
pushi $a ; 10, inTop
|
||||||
|
push0
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
pushi $26c ; 620, prevSignal
|
||||||
|
pushi $1e ; 30, brRight
|
||||||
|
pushi $280 ; 640, disposeWhenDone
|
||||||
|
pushi $118 ; 280, bitANDLong
|
||||||
|
self $16
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
EastExitCurReg::doit:
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
eq?
|
||||||
|
bt code_02d0
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $6e ; 110, 'n', resX
|
||||||
|
eq?
|
||||||
|
code_02d0: bnt code_034d
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bnt code_034d
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $526 ; 1318, pExits
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $4 ; scaleX
|
||||||
|
and
|
||||||
|
bnt code_02fc
|
||||||
|
ldi $a ; 10, inTop
|
||||||
|
jmp code_02fe
|
||||||
|
|
||||||
|
code_02fc: ldi $11 ; 17, bitmap
|
||||||
|
code_02fe: push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $54f ; 1359, pFlags
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $40 ; 64, '@', yStep
|
||||||
|
and
|
||||||
|
bnt code_0343
|
||||||
|
pushi $a0 ; 160, firstTrue
|
||||||
|
push2
|
||||||
|
pushi $35c ; 860, getBase
|
||||||
|
class BNPC
|
||||||
|
push
|
||||||
|
pushi $421 ; 1057, pWObjectList
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
bnt code_0343
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $11 ; 17, bitmap
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0343: pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
jmp code_0366
|
||||||
|
|
||||||
|
code_034d: pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $25e ; 606, cursorLoop
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0366: pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
NorthExitCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
pushi $b ; 11, inRight
|
||||||
|
push0
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
pushi $280 ; 640, disposeWhenDone
|
||||||
|
pushi $1e ; 30, brRight
|
||||||
|
self $16
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
NorthExitCurReg::doit:
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
eq?
|
||||||
|
bt code_03c1
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $6e ; 110, 'n', resX
|
||||||
|
eq?
|
||||||
|
code_03c1: bnt code_043e
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bnt code_043e
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $526 ; 1318, pExits
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $1
|
||||||
|
and
|
||||||
|
bnt code_03ed
|
||||||
|
ldi $b ; 11, inRight
|
||||||
|
jmp code_03ef
|
||||||
|
|
||||||
|
code_03ed: ldi $11 ; 17, bitmap
|
||||||
|
code_03ef: push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $54f ; 1359, pFlags
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $10 ; 16, cel
|
||||||
|
and
|
||||||
|
bnt code_0434
|
||||||
|
pushi $a0 ; 160, firstTrue
|
||||||
|
push2
|
||||||
|
pushi $35c ; 860, getBase
|
||||||
|
class BNPC
|
||||||
|
push
|
||||||
|
pushi $421 ; 1057, pWObjectList
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
bnt code_0434
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $11 ; 17, bitmap
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0434: pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
jmp code_0457
|
||||||
|
|
||||||
|
code_043e: pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $25e ; 606, cursorLoop
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0457: pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
SouthExitCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
pushi $c ; 12, inBottom
|
||||||
|
push0
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
push0
|
||||||
|
pushi $118 ; 280, bitANDLong
|
||||||
|
pushi $280 ; 640, disposeWhenDone
|
||||||
|
pushi $131 ; 305, asStr
|
||||||
|
self $16
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
SouthExitCurReg::doit:
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
eq?
|
||||||
|
bt code_04b5
|
||||||
|
pushi $25b ; 603, verb
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $6e ; 110, 'n', resX
|
||||||
|
eq?
|
||||||
|
code_04b5: bnt code_0532
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bnt code_0532
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $526 ; 1318, pExits
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $2
|
||||||
|
and
|
||||||
|
bnt code_04e1
|
||||||
|
ldi $c ; 12, inBottom
|
||||||
|
jmp code_04e3
|
||||||
|
|
||||||
|
code_04e1: ldi $11 ; 17, bitmap
|
||||||
|
code_04e3: push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $54f ; 1359, pFlags
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
ldi $20 ; 32, ' ', name
|
||||||
|
and
|
||||||
|
bnt code_0528
|
||||||
|
pushi $a0 ; 160, firstTrue
|
||||||
|
push2
|
||||||
|
pushi $35c ; 860, getBase
|
||||||
|
class BNPC
|
||||||
|
push
|
||||||
|
pushi $421 ; 1057, pWObjectList
|
||||||
|
push0
|
||||||
|
pushi $c5 ; 197, pRoom
|
||||||
|
push0
|
||||||
|
lag global[$1]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
bnt code_0528
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $11 ; 17, bitmap
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0528: pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
jmp code_054b
|
||||||
|
|
||||||
|
code_0532: pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
pushi $25e ; 606, cursorLoop
|
||||||
|
push0
|
||||||
|
pushi $24f ; 591, curIcon
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_054b: pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
InterfaceCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $9f ; 159, add
|
||||||
|
push1
|
||||||
|
lofsa InvBoxCurReg
|
||||||
|
push
|
||||||
|
pushi $9d ; 157, eachElementDo
|
||||||
|
push2
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
pushSelf
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
push0
|
||||||
|
pushi $131 ; 305, asStr
|
||||||
|
pushi $280 ; 640, disposeWhenDone
|
||||||
|
pushi $1e0 ; 480, isControl
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
push0
|
||||||
|
push0
|
||||||
|
self $24
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
InterfaceCurReg::doit:
|
||||||
|
lsg global[$b]
|
||||||
|
pToa aCursor
|
||||||
|
ne?
|
||||||
|
bnt code_05f9
|
||||||
|
pushi $54b ; 1355, specialCursorInUse
|
||||||
|
push0
|
||||||
|
lag global[$cd]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
bt code_05c1
|
||||||
|
pushi $54b ; 1355, specialCursorInUse
|
||||||
|
push0
|
||||||
|
lag global[$cd]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
bnt code_05f9
|
||||||
|
pushi $383 ; 899, curPanel
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
push2
|
||||||
|
pushi $a410 ; -23536
|
||||||
|
push0
|
||||||
|
callk kernel_2, $4
|
||||||
|
bnot
|
||||||
|
ne?
|
||||||
|
code_05c1: bnt code_05f9
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
push2
|
||||||
|
pushi $a410 ; -23536
|
||||||
|
push2
|
||||||
|
callk kernel_2, $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
push2
|
||||||
|
pTos aCursor
|
||||||
|
push1
|
||||||
|
lag global[$2]
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
pToa aCursor
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $54b ; 1355, specialCursorInUse
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
lag global[$cd]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_05f9: ret
|
||||||
|
|
||||||
|
InvBoxCurReg::init:
|
||||||
|
pushi $94 ; 148, init
|
||||||
|
push0
|
||||||
|
&rest $1
|
||||||
|
super CursorRegion, $4
|
||||||
|
bnot
|
||||||
|
pushi $b5 ; 181, set
|
||||||
|
pushi $4 ; scaleX
|
||||||
|
pushi $170 ; 368, display
|
||||||
|
pushi $16c ; 364, basicClip
|
||||||
|
pushi $277 ; 631, controlOff
|
||||||
|
pushi $1b9 ; 441, deleteCast
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
pushi $3 ; z
|
||||||
|
pushi $270d ; 9997
|
||||||
|
push2
|
||||||
|
push0
|
||||||
|
self $16
|
||||||
|
bnot
|
||||||
|
ret
|
||||||
|
|
||||||
|
InvBoxCurReg::doit:
|
||||||
|
lsg global[$b]
|
||||||
|
pToa aCursor
|
||||||
|
ne?
|
||||||
|
bnt code_0685
|
||||||
|
pushi $383 ; 899, curPanel
|
||||||
|
push0
|
||||||
|
lag global[$6]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
push
|
||||||
|
push2
|
||||||
|
pushi $a410 ; -23536
|
||||||
|
push0
|
||||||
|
callk kernel_2, $4
|
||||||
|
bnot
|
||||||
|
eq?
|
||||||
|
bnt code_0685
|
||||||
|
pushi $54b ; 1355, specialCursorInUse
|
||||||
|
push0
|
||||||
|
lag global[$cd]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
not
|
||||||
|
bnt code_0685
|
||||||
|
pushi $45 ; 69, 'E', doit
|
||||||
|
push0
|
||||||
|
push2
|
||||||
|
pushi $a410 ; -23536
|
||||||
|
push2
|
||||||
|
callk kernel_2, $4
|
||||||
|
bnot
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $f ; 15, loop
|
||||||
|
push1
|
||||||
|
push2
|
||||||
|
pToa aCursor
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
pushi $1b3 ; 435, setCursor
|
||||||
|
push2
|
||||||
|
pTos aCursor
|
||||||
|
push1
|
||||||
|
lag global[$2]
|
||||||
|
send $8
|
||||||
|
bnot
|
||||||
|
pushi $57 ; 87, 'W', draw
|
||||||
|
push0
|
||||||
|
lag global[$b]
|
||||||
|
send $4
|
||||||
|
bnot
|
||||||
|
pushi $54b ; 1355, specialCursorInUse
|
||||||
|
push1
|
||||||
|
push1
|
||||||
|
lag global[$cd]
|
||||||
|
send $6
|
||||||
|
bnot
|
||||||
|
code_0685: ret
|
||||||
|
|
||||||
Loading…
Reference in New Issue