Upload files to "Script"
This commit is contained in:
parent
23d5aa2253
commit
b07996d7f7
|
|
@ -0,0 +1,920 @@
|
|||
Pile of Stuff::buildBaseList:
|
||||
pushi $387 ; 903, addBase
|
||||
push1
|
||||
class BContainer
|
||||
push
|
||||
pushi $387 ; 903, addBase
|
||||
push1
|
||||
class BDescribed
|
||||
push
|
||||
self $c
|
||||
bnot
|
||||
pushi $46c ; 1132, pWeightCap
|
||||
push1
|
||||
pushi $3e8 ; 1000, pUpdateClient
|
||||
pushi $46d ; 1133, pBulkCap
|
||||
push1
|
||||
pushi $10e ; 270, hiWord
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BContainer
|
||||
push
|
||||
self $6
|
||||
bnot
|
||||
send $c
|
||||
bnot
|
||||
ret
|
||||
|
||||
Pile of Stuff::centerOn:
|
||||
link $2
|
||||
push1
|
||||
lsp param[$1]
|
||||
callk kernel_20, $2
|
||||
bnot
|
||||
pushi $4e ; 78, 'N', width
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $df ; 223, centerOn
|
||||
push2
|
||||
pushi $88 ; 136, right
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
lst temp[$0]
|
||||
ldi $2
|
||||
div
|
||||
sub
|
||||
push
|
||||
pushi $89 ; 137, top
|
||||
push0
|
||||
lap param[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
super WorldObject, $8
|
||||
bnot
|
||||
pTos left
|
||||
ldi $0
|
||||
lt?
|
||||
bnt code_01bc
|
||||
pushi $db ; 219, moveTo
|
||||
push2
|
||||
push0
|
||||
pTos top
|
||||
self $8
|
||||
bnot
|
||||
code_01bc: pTos top
|
||||
ldi $0
|
||||
lt?
|
||||
bnt code_01cd
|
||||
pushi $db ; 219, moveTo
|
||||
push2
|
||||
pTos left
|
||||
push0
|
||||
self $8
|
||||
bnot
|
||||
code_01cd: push0
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$1]
|
||||
pTos right
|
||||
ldi $3c ; 60, '<', b_di
|
||||
add
|
||||
push
|
||||
pushi $88 ; 136, right
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
gt?
|
||||
bnt code_0201
|
||||
pushi $dd ; 221, moveBy
|
||||
push2
|
||||
pushi $88 ; 136, right
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pTos right
|
||||
ldi $3c ; 60, '<', b_di
|
||||
add
|
||||
sub
|
||||
push
|
||||
push0
|
||||
self $8
|
||||
bnot
|
||||
code_0201: pTos bottom
|
||||
ldi $3c ; 60, '<', b_di
|
||||
add
|
||||
push
|
||||
pushi $8a ; 138, bottom
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
gt?
|
||||
bnt code_022c
|
||||
pushi $dd ; 221, moveBy
|
||||
push2
|
||||
push0
|
||||
pushi $8a ; 138, bottom
|
||||
push0
|
||||
lat temp[$1]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pTos bottom
|
||||
ldi $3c ; 60, '<', b_di
|
||||
add
|
||||
sub
|
||||
push
|
||||
self $8
|
||||
bnot
|
||||
code_022c: pToa left
|
||||
aTop x
|
||||
pToa top
|
||||
aTop y
|
||||
pToa bitmap
|
||||
bnt code_023e
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_32, $2
|
||||
bnot
|
||||
code_023e: ret
|
||||
|
||||
Pile of Stuff::give:
|
||||
link $4
|
||||
pushi $38f ; 911, give
|
||||
push0
|
||||
&rest $1
|
||||
super WorldObject, $4
|
||||
bnot
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BContainer
|
||||
push
|
||||
self $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
push
|
||||
pToa pThresholdCount
|
||||
lt?
|
||||
bnt code_0276
|
||||
pushi $46b ; 1131, unMakePile
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
jmp code_027e
|
||||
|
||||
code_0276: pushi $36a ; 874, updateDisplay
|
||||
push1
|
||||
push1
|
||||
self $6
|
||||
bnot
|
||||
code_027e: ret
|
||||
|
||||
Pile of Stuff::unMakePile:
|
||||
link $4
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BContainer
|
||||
push
|
||||
self $6
|
||||
bnot
|
||||
sat temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$2]
|
||||
ldi $0
|
||||
sat temp[$3]
|
||||
code_02a0: lst temp[$3]
|
||||
lat temp[$2]
|
||||
lt?
|
||||
bnt code_02e8
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$3]
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
lat temp[$0]
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$1]
|
||||
pushi $40d ; 1037, pMoney
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
bnt code_02d7
|
||||
pushi $46e ; 1134, pShow
|
||||
push1
|
||||
push0
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCarryable
|
||||
push
|
||||
lat temp[$1]
|
||||
send $6
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
code_02d7: pushi $390 ; 912, drop
|
||||
push1
|
||||
lst temp[$1]
|
||||
self $6
|
||||
bnot
|
||||
-at temp[$3]
|
||||
-at temp[$2]
|
||||
+at temp[$3]
|
||||
jmp code_02a0
|
||||
|
||||
code_02e8: pushi $95 ; 149, dispose
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ret
|
||||
|
||||
Pile of Stuff::makePiles:
|
||||
link $a
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Set
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$6]
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Set
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$4]
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Set
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$7]
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
code_0317: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pushi $421 ; 1057, pWObjectList
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_0380
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
pushi $421 ; 1057, pWObjectList
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $97 ; 151, isKindOf
|
||||
push1
|
||||
class Pile of Stuff
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_0358
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$6]
|
||||
send $6
|
||||
bnot
|
||||
code_0358: pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCarryable
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_037c
|
||||
pushi $17c ; 380, isNotHidden
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
bnt code_037c
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$4]
|
||||
send $6
|
||||
bnot
|
||||
code_037c: +at temp[$0]
|
||||
jmp code_0317
|
||||
|
||||
code_0380: ldi $0
|
||||
sat temp[$0]
|
||||
code_0384: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$6]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_0424
|
||||
ldi $0
|
||||
sat temp[$9]
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
lat temp[$6]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$3]
|
||||
ldi $0
|
||||
sat temp[$1]
|
||||
code_03a6: lst temp[$1]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$4]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_040d
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$1]
|
||||
lat temp[$4]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
push
|
||||
lat temp[$3]
|
||||
ne?
|
||||
bnt code_0409
|
||||
pushi $165 ; 357, distanceTo
|
||||
push1
|
||||
lst temp[$3]
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $467 ; 1127, pMergeDistance
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
le?
|
||||
bnt code_0409
|
||||
pushi $40d ; 1037, pMoney
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
bnt code_03fa
|
||||
pushi $46e ; 1134, pShow
|
||||
push1
|
||||
push1
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCarryable
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
code_03fa: pushi $38e ; 910, take
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$3]
|
||||
send $6
|
||||
bnot
|
||||
ldi $1
|
||||
sat temp[$9]
|
||||
code_0409: +at temp[$1]
|
||||
jmp code_03a6
|
||||
|
||||
code_040d: lat temp[$9]
|
||||
bnt code_041f
|
||||
pushi $36a ; 874, updateDisplay
|
||||
push1
|
||||
push1
|
||||
lat temp[$3]
|
||||
send $6
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$9]
|
||||
code_041f: +at temp[$0]
|
||||
jmp code_0384
|
||||
|
||||
code_0424: pushi $a6 ; 166, release
|
||||
push0
|
||||
lat temp[$4]
|
||||
send $4
|
||||
bnot
|
||||
pushi $a6 ; 166, release
|
||||
push0
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$6]
|
||||
send $8
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
code_043e: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pushi $421 ; 1057, pWObjectList
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_048d
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
pushi $421 ; 1057, pWObjectList
|
||||
push0
|
||||
lag global[$3]
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCarryable
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_0489
|
||||
pushi $17c ; 380, isNotHidden
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
bnt code_0489
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$4]
|
||||
send $6
|
||||
bnot
|
||||
code_0489: +at temp[$0]
|
||||
jmp code_043e
|
||||
|
||||
code_048d: pushi $8d ; 141, new
|
||||
push0
|
||||
class Set
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$8]
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
code_049c: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$4]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_05c4
|
||||
ldi $1
|
||||
sat temp[$9]
|
||||
pushi $a6 ; 166, release
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $4
|
||||
bnot
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
lat temp[$4]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
ldi $0
|
||||
sat temp[$1]
|
||||
code_04c7: lst temp[$1]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$4]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_052b
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$1]
|
||||
lat temp[$4]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$3]
|
||||
lst temp[$2]
|
||||
ne?
|
||||
bnt code_0527
|
||||
pushi $a3 ; 163, contains
|
||||
push1
|
||||
lst temp[$3]
|
||||
lat temp[$8]
|
||||
send $6
|
||||
bnot
|
||||
not
|
||||
bnt code_0527
|
||||
pushi $165 ; 357, distanceTo
|
||||
push1
|
||||
lst temp[$3]
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $467 ; 1127, pMergeDistance
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
le?
|
||||
bnt code_0527
|
||||
lat temp[$9]
|
||||
bnt code_051c
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$7]
|
||||
send $6
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$9]
|
||||
code_051c: pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$3]
|
||||
lat temp[$7]
|
||||
send $6
|
||||
bnot
|
||||
code_0527: +at temp[$1]
|
||||
jmp code_04c7
|
||||
|
||||
code_052b: pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $4
|
||||
bnot
|
||||
push
|
||||
pushi $468 ; 1128, pMergeCount
|
||||
push0
|
||||
self $4
|
||||
bnot
|
||||
ge?
|
||||
bnt code_05bf
|
||||
pushi $94 ; 148, init
|
||||
push0
|
||||
pushi $df ; 223, centerOn
|
||||
push1
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $6
|
||||
bnot
|
||||
push
|
||||
pushi $8d ; 141, new
|
||||
push0
|
||||
class Pile of Stuff
|
||||
send $4
|
||||
bnot
|
||||
sat temp[$5]
|
||||
send $a
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
code_0564: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_05b4
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
lat temp[$7]
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $40d ; 1037, pMoney
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
bnt code_059a
|
||||
pushi $46e ; 1134, pShow
|
||||
push1
|
||||
push1
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BCarryable
|
||||
push
|
||||
lat temp[$2]
|
||||
send $6
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
code_059a: pushi $38e ; 910, take
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$5]
|
||||
send $6
|
||||
bnot
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
lst temp[$2]
|
||||
lat temp[$8]
|
||||
send $6
|
||||
bnot
|
||||
+at temp[$0]
|
||||
jmp code_0564
|
||||
|
||||
code_05b4: pushi $3c5 ; 965, addToRoom
|
||||
push1
|
||||
lsg global[$3]
|
||||
lat temp[$5]
|
||||
send $6
|
||||
bnot
|
||||
code_05bf: +at temp[$0]
|
||||
jmp code_049c
|
||||
|
||||
code_05c4: pushi $a6 ; 166, release
|
||||
push0
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$8]
|
||||
send $8
|
||||
bnot
|
||||
pushi $a6 ; 166, release
|
||||
push0
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$7]
|
||||
send $8
|
||||
bnot
|
||||
pushi $a6 ; 166, release
|
||||
push0
|
||||
pushi $95 ; 149, dispose
|
||||
push0
|
||||
lat temp[$4]
|
||||
send $8
|
||||
bnot
|
||||
ret
|
||||
|
||||
Pile of Stuff::updateDisplay:
|
||||
link $4
|
||||
pTos signal
|
||||
ldi $df ; 223, centerOn
|
||||
and
|
||||
aTop signal
|
||||
pToa bitmap
|
||||
bnt code_060d
|
||||
pushi $9f ; 159, add
|
||||
push1
|
||||
push
|
||||
lag global[$66]
|
||||
send $6
|
||||
bnot
|
||||
ldi $0
|
||||
aTop bitmap
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_31, $2
|
||||
bnot
|
||||
code_060d: ldi $0
|
||||
sat temp[$1]
|
||||
pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BContainer
|
||||
push
|
||||
self $6
|
||||
bnot
|
||||
sat temp[$2]
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
send $4
|
||||
bnot
|
||||
bnt code_076b
|
||||
pushi $5 ; scaleY
|
||||
push0
|
||||
pushi $3c ; 60, '<', b_di
|
||||
dup
|
||||
pushi $ff ; 255, asInteger
|
||||
dup
|
||||
callk kernel_35, $a
|
||||
bnot
|
||||
aTop bitmap
|
||||
pushi $4 ; scaleX
|
||||
pushi $8 ; fixPriority
|
||||
pTos bitmap
|
||||
pushi $1e ; 30, brRight
|
||||
dup
|
||||
callk kernel_35, $8
|
||||
bnot
|
||||
push1
|
||||
pushSelf
|
||||
callk kernel_30, $2
|
||||
bnot
|
||||
ldi $0
|
||||
sat temp[$0]
|
||||
code_064d: lst temp[$0]
|
||||
pushi $5a ; 90, 'Z', size
|
||||
push0
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
send $4
|
||||
bnot
|
||||
lt?
|
||||
bnt code_076b
|
||||
pushi $4b ; 75, 'K', at
|
||||
push1
|
||||
lst temp[$0]
|
||||
pushi $420 ; 1056, pContents
|
||||
push0
|
||||
lat temp[$2]
|
||||
send $4
|
||||
bnot
|
||||
send $6
|
||||
bnot
|
||||
sat temp[$3]
|
||||
lst temp[$0]
|
||||
ldi $0
|
||||
eq?
|
||||
bnt code_0685
|
||||
pushi $3c8 ; 968, matchScaler
|
||||
push1
|
||||
lsg global[$3]
|
||||
self $6
|
||||
bnot
|
||||
code_0685: pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BWeapon
|
||||
push
|
||||
lat temp[$3]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_069c
|
||||
lst temp[$1]
|
||||
ldi $1
|
||||
or
|
||||
sat temp[$1]
|
||||
jmp code_06e5
|
||||
|
||||
code_069c: pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BWearable
|
||||
push
|
||||
lat temp[$3]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_06b3
|
||||
lst temp[$1]
|
||||
ldi $2
|
||||
or
|
||||
sat temp[$1]
|
||||
jmp code_06e5
|
||||
|
||||
code_06b3: pushi $35c ; 860, getBase
|
||||
push1
|
||||
class BConsume
|
||||
push
|
||||
lat temp[$3]
|
||||
send $6
|
||||
bnot
|
||||
bnt code_06ca
|
||||
lst temp[$1]
|
||||
ldi $4 ; scaleX
|
||||
or
|
||||
sat temp[$1]
|
||||
jmp code_06e5
|
||||
|
||||
code_06ca: pushi $40d ; 1037, pMoney
|
||||
push0
|
||||
lat temp[$3]
|
||||
send $4
|
||||
bnot
|
||||
bnt code_06de
|
||||
lst temp[$1]
|
||||
ldi $8 ; fixPriority
|
||||
or
|
||||
sat temp[$1]
|
||||
jmp code_06e5
|
||||
|
||||
code_06de: lst temp[$1]
|
||||
ldi $10 ; 16, cel
|
||||
or
|
||||
sat temp[$1]
|
||||
code_06e5: lst temp[$1]
|
||||
ldi $2
|
||||
and
|
||||
bnt code_06ff
|
||||
pushi $7 ; priority
|
||||
pushi $3 ; z
|
||||
pTos bitmap
|
||||
pushi $2791 ; 10129
|
||||
push0
|
||||
push0
|
||||
pushi $20 ; 32, ' ', name
|
||||
pushi $13 ; 19, nsTop
|
||||
callk kernel_35, $e
|
||||
bnot
|
||||
code_06ff: lst temp[$1]
|
||||
ldi $1
|
||||
and
|
||||
bnt code_0719
|
||||
pushi $7 ; priority
|
||||
pushi $3 ; z
|
||||
pTos bitmap
|
||||
pushi $3be1 ; 15329
|
||||
push0
|
||||
push0
|
||||
pushi $f ; 15, loop
|
||||
pushi $3 ; z
|
||||
callk kernel_35, $e
|
||||
bnot
|
||||
code_0719: lst temp[$1]
|
||||
ldi $4 ; scaleX
|
||||
and
|
||||
bnt code_0732
|
||||
pushi $7 ; priority
|
||||
pushi $3 ; z
|
||||
pTos bitmap
|
||||
pushi $cba1 ; -13407
|
||||
push0
|
||||
push0
|
||||
push2
|
||||
pushi $1e ; 30, brRight
|
||||
callk kernel_35, $e
|
||||
bnot
|
||||
code_0732: lst temp[$1]
|
||||
ldi $8 ; fixPriority
|
||||
and
|
||||
bnt code_074c
|
||||
pushi $7 ; priority
|
||||
pushi $3 ; z
|
||||
pTos bitmap
|
||||
pushi $c5c5 ; -14907
|
||||
push0
|
||||
push0
|
||||
pushi $14 ; 20, nsRight
|
||||
pushi $20 ; 32, ' ', name
|
||||
callk kernel_35, $e
|
||||
bnot
|
||||
code_074c: lst temp[$1]
|
||||
ldi $10 ; 16, cel
|
||||
and
|
||||
bnt code_0766
|
||||
pushi $7 ; priority
|
||||
pushi $3 ; z
|
||||
pTos bitmap
|
||||
pushi $d5c9 ; -10807
|
||||
push0
|
||||
push0
|
||||
pushi $29 ; 41, ')', state
|
||||
pushi $5 ; scaleY
|
||||
callk kernel_35, $e
|
||||
bnot
|
||||
code_0766: +at temp[$0]
|
||||
jmp code_064d
|
||||
|
||||
code_076b: ret
|
||||
|
||||
|
|
@ -0,0 +1,53 @@
|
|||
export40206_0 = $0
|
||||
|
||||
SetScale::doit:
|
||||
link $2
|
||||
lsp param[$2]
|
||||
ldi $2
|
||||
mul
|
||||
sat temp[$0]
|
||||
ldi $0
|
||||
sat temp[$1]
|
||||
code_0085: lst temp[$0]
|
||||
ldi $ff ; 255, asInteger
|
||||
gt?
|
||||
bnt code_00ce
|
||||
lst temp[$0]
|
||||
ldi $1
|
||||
add
|
||||
push
|
||||
ldi $ff ; 255, asInteger
|
||||
gt?
|
||||
bnt code_00ce
|
||||
lst temp[$0]
|
||||
ldi $28 ; 40, '(', style
|
||||
lt?
|
||||
bnt code_00ce
|
||||
lat temp[$0]
|
||||
lsli local[$c78]
|
||||
ldi $ff ; 255, asInteger
|
||||
ne?
|
||||
bnt code_00ce
|
||||
+at temp[$1]
|
||||
push
|
||||
ldi $2
|
||||
lt?
|
||||
bnt code_00ce
|
||||
pushi $152 ; 338, xScaleAdj
|
||||
push1
|
||||
lat temp[$0]
|
||||
lsli local[$c78]
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
pushi $153 ; 339, yScaleAdj
|
||||
push1
|
||||
+at temp[$0]
|
||||
lsli local[$c78]
|
||||
lap param[$1]
|
||||
send $6
|
||||
bnot
|
||||
jmp code_0085
|
||||
|
||||
code_00ce: ret
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue