TextItem::draw:
		link	$1
		pushi	$57		; 87, 'W', draw
		push0
		super	<NIL>, $4
		bnot
		bnt	code_00f8
		ret

code_00f8:	pToa	bitmap
		sat	temp[$0]
		bnt	code_010f
		push1
		pushSelf
		callk	kernel_31, $2
		bnot
		pushi	$9f		; 159, add
		push1
		pTos	bitmap
		lag	global[$66]
		send	$6
		bnot
code_010f:	push1
		pushSelf
		calle	export60026_1, $2
		bnot
		aTop	bitmap
		lat	temp[$0]
		bnt	code_0124
		push1
		pushSelf
		callk	kernel_30, $2
		bnot
code_0124:	ret

TextItem::setSize:
		link	$4
		pToa	text
		bnt	code_01b3
		pToa	left
		sat	temp[$2]
		pToa	top
		sat	temp[$3]
		pushi	$8d		; 141, new
		push0
		class	Rect
		send	$4
		bnot
		sat	temp[$0]
		pushi	$e5		; 229, sizeToStr
		pushi	$3		; z
		push2
		pushi	$9		; inLeft
		pTos	text
		callk	kernel_91, $4
		bnot
		push
		pTos	font
		lap	param[$0]
		bnt	code_0159
		lap	param[$1]
		jmp	code_015b

code_0159:	lag	global[$67]
code_015b:	push
		lat	temp[$0]
		send	$a
		bnot
		pTos	view
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_0196
		pushi	$8d		; 141, new
		push0
		class	Rect
		send	$4
		bnot
		sat	temp[$1]
		pushi	$e6		; 230, sizeToCel
		pushi	$3		; z
		pTos	view
		pTos	loop
		pTos	cel
		send	$a
		bnot
		pushi	$af		; 175, union
		push1
		lst	temp[$1]
		lat	temp[$0]
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$1]
		send	$4
		bnot
code_0196:	pushi	$d3		; 211, copy
		push1
		lst	temp[$0]
		self	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$0]
		send	$4
		bnot
		pushi	$db		; 219, moveTo
		push2
		lst	temp[$2]
		lst	temp[$3]
		self	$8
		bnot
code_01b3:	ret

TextItem::dispose:
		push2
		pushi	$4		; scaleX
		pTos	text
		callk	kernel_105, $4
		bnot
		push
		ldi	$34		; 52, '4', number
		eq?
		bnt	code_01d0
		pushi	$95		; 149, dispose
		push0
		pToa	text
		send	$4
		bnot
		ldi	$0
		aTop	text
code_01d0:	pushi	$95		; 149, dispose
		push0
		super	<NIL>, $4
		bnot
		ret

