28 lines
412 B
Plaintext
28 lines
412 B
Plaintext
BScroll::buildVerbList:
|
|
link $2
|
|
class VerbList
|
|
sat temp[$0]
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class WorldEgo
|
|
push
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_0058
|
|
pushi $3a8 ; 936, owns
|
|
push1
|
|
pTos pSelf
|
|
lap param[$1]
|
|
send $6
|
|
bnot
|
|
bnt code_0058
|
|
pushi $9f ; 159, add
|
|
push1
|
|
pushi $77 ; 119, 'w', textTop
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
code_0058: ret
|
|
|