ShadowText::centerOn:
		link	$4
		push1
		lsp	param[$1]
		calle	export60000_0, $2
		bnot
		not
		bnt	code_00a4
		ret

code_00a4:	lap	param[$1]
		aTop	pObj
		push1
		pTos	pObj
		callk	kernel_20, $2
		bnot
		pushi	$4e		; 78, 'N', width
		push0
		pToa	pObj
		send	$4
		bnot
		sat	temp[$0]
		pushi	$e1		; 225, height
		push0
		pToa	pObj
		send	$4
		bnot
		sat	temp[$1]
		pushi	$89		; 137, top
		push0
		pToa	pObj
		send	$4
		bnot
		sat	temp[$3]
		pushi	$df		; 223, centerOn
		push2
		pushi	$88		; 136, right
		push0
		pToa	pObj
		send	$4
		bnot
		push
		lst	temp[$0]
		ldi	$2
		div
		sub
		push
		lst	temp[$3]
		super	TextItem, $8
		bnot
		pushi	$3		; z
		pushi	$2335		; 9013
		push0
		push0
		callk	kernel_29, $6
		bnot
		push
		ldi	$1
		add
		sat	temp[$3]
		pTos	left
		ldi	$0
		lt?
		bnt	code_010c
		pushi	$db		; 219, moveTo
		push2
		push0
		pTos	top
		self	$8
		bnot
code_010c:	pTos	top
		lat	temp[$3]
		lt?
		bnt	code_011e
		pushi	$db		; 219, moveTo
		push2
		pTos	left
		lst	temp[$3]
		self	$8
		bnot
code_011e:	push0
		push0
		lag	global[$3]
		send	$4
		bnot
		sat	temp[$2]
		pTos	right
		pushi	$88		; 136, right
		push0
		send	$4
		bnot
		gt?
		bnt	code_0149
		pushi	$dd		; 221, moveBy
		push2
		pushi	$88		; 136, right
		push0
		lat	temp[$2]
		send	$4
		bnot
		push
		pToa	right
		sub
		push
		push0
		self	$8
		bnot
code_0149:	pTos	bottom
		pushi	$8a		; 138, bottom
		push0
		lat	temp[$2]
		send	$4
		bnot
		gt?
		bnt	code_016d
		pushi	$dd		; 221, moveBy
		push2
		push0
		pushi	$8a		; 138, bottom
		push0
		lat	temp[$2]
		send	$4
		bnot
		push
		pToa	bottom
		sub
		push
		self	$8
		bnot
code_016d:	pToa	left
		aTop	x
		pToa	top
		aTop	y
		push1
		pushSelf
		callk	kernel_32, $2
		bnot
		ret

ShadowText::follow:
		pushi	$df		; 223, centerOn
		push1
		pTos	pObj
		self	$6
		bnot
		ret

ShadowText::init:
		pushi	$4a		; 74, 'J', setPri
		push1
		pushi	$2710		; 10000
		self	$6
		bnot
		pushi	$d0		; 208, with
		push1
		lsp	param[$1]
		class	Str
		send	$6
		bnot
		aTop	text
		pushi	$1be		; 446, setSize
		push0
		self	$4
		bnot
		lsp	param[$0]
		ldi	$5		; scaleY
		gt?
		bnt	code_01b6
		pushi	$94		; 148, init
		push1
		lsp	param[$6]
		super	TextItem, $6
		bnot
		jmp	code_01be

code_01b6:	pushi	$94		; 148, init
		push0
		super	TextItem, $4
		bnot
code_01be:	pushi	$db		; 219, moveTo
		push2
		lsp	param[$2]
		lsp	param[$3]
		self	$8
		bnot
		push1
		pushSelf
		callk	kernel_32, $2
		bnot
		lsp	param[$0]
		ldi	$3		; z
		gt?
		bnt	code_0200
		lsp	param[$4]
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_01f5
		pushi	$104		; 260, cueSelector
		push1
		pushi	$95		; 149, dispose
		pushi	$106		; 262, setReal
		push2
		pushSelf
		lsp	param[$4]
		class	GlobalTimer
		send	$8
		bnot
		aTop	pTimer
		send	$6
		bnot
code_01f5:	lsp	param[$0]
		ldi	$4		; scaleX
		gt?
		bnt	code_0200
		lap	param[$5]
		aTop	caller
code_0200:	ret

ShadowText::dispose:
		pToa	pTimer
		bnt	code_020c
		pushi	$36		; 54, '6', client
		push1
		push0
		send	$6
		bnot
code_020c:	pToa	caller
		bnt	code_021b
		pushi	$105		; 261, setCycle
		push2
		push
		push1
		class	GlobalTimer
		send	$8
		bnot
code_021b:	push1
		pTos	pObj
		calle	export60000_0, $2
		bnot
		bnt	code_0251
		pushi	$97		; 151, isKindOf
		push1
		class	WorldObject
		push
		pToa	pObj
		send	$6
		bnot
		bnt	code_0251
		pushi	$32f		; 815, pMsgStr
		push0
		pToa	pObj
		send	$4
		bnot
		push
		selfID
		eq?
		bnt	code_0251
		pushi	$32f		; 815, pMsgStr
		push1
		push0
		pToa	pObj
		send	$6
		bnot
		ldi	$0
		aTop	pObj
code_0251:	pushi	$95		; 149, dispose
		push0
		&rest	$1
		super	TextItem, $4
		bnot
		ret

ShadowText::setSize:
		pushi	$1be		; 446, setSize
		push0
		&rest	$1
		super	TextItem, $4
		bnot
		pushi	$e0		; 224, widen
		push1
		push1
		pushi	$e2		; 226, heighten
		push1
		push1
		self	$c
		bnot
		ret

ShadowText::draw:
		link	$1
		pToa	bitmap
		sat	temp[$0]
		bnt	code_028d
		push1
		pushSelf
		callk	kernel_31, $2
		bnot
		pushi	$9f		; 159, add
		push1
		pTos	bitmap
		lag	global[$66]
		send	$6
		bnot
code_028d:	pushi	$7		; priority
		push0
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		ldi	$20		; 32, ' ', name
		add
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		ldi	$20		; 32, ' ', name
		add
		push
		pushi	$72		; 114, 'r', skip
		push0
		self	$4
		bnot
		push
		pushi	$26		; 38, '&', back
		push0
		self	$4
		bnot
		push
		pushi	$6e		; 110, 'n', resX
		push0
		pToa	plane
		send	$4
		bnot
		push
		pushi	$6f		; 111, 'o', resY
		push0
		pToa	plane
		send	$4
		bnot
		push
		callk	kernel_35, $e
		bnot
		aTop	bitmap
		pushi	$f		; 15, loop
		pushi	$4		; scaleX
		pTos	bitmap
		push2
		pushi	$9		; inLeft
		pTos	text
		callk	kernel_91, $4
		bnot
		push
		push1
		push1
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		pTos	pShadowColor
		pTos	back
		pTos	skip
		pTos	font
		pTos	mode
		pTos	borderColor
		pTos	dimmed
		push0
		callk	kernel_35, $1e
		bnot
		pushi	$f		; 15, loop
		pushi	$4		; scaleX
		pTos	bitmap
		push2
		pushi	$9		; inLeft
		pTos	text
		callk	kernel_91, $4
		bnot
		push
		push0
		push0
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		pTos	fore
		pTos	back
		pTos	skip
		pTos	font
		pTos	mode
		pTos	borderColor
		pTos	dimmed
		push0
		callk	kernel_35, $1e
		bnot
		lat	temp[$0]
		bnt	code_033f
		push1
		pushSelf
		callk	kernel_30, $2
		bnot
code_033f:	ret

