export60026_0	= code_0010
export60026_1	= code_0104
export60026_2	= code_022e

; export60026_0
code_0010:	pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$1a		; 26, signal
		dup
		pushi	$97		; 151, isKindOf
		callk	kernel_107, $8
		bnot
		sag	global[$56]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$1a		; 26, signal
		pushi	$97		; 151, isKindOf
		pushi	$1a		; 26, signal
		callk	kernel_107, $8
		bnot
		sag	global[$57]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$1a		; 26, signal
		pushi	$97		; 151, isKindOf
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$58]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$97		; 151, isKindOf
		pushi	$1a		; 26, signal
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$59]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$97		; 151, isKindOf
		pushi	$1a		; 26, signal
		pushi	$97		; 151, isKindOf
		callk	kernel_107, $8
		bnot
		sag	global[$5a]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$97		; 151, isKindOf
		pushi	$59		; 89, 'Y', printLang
		pushi	$1a		; 26, signal
		callk	kernel_107, $8
		bnot
		sag	global[$5b]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$9f		; 159, add
		dup
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$5c]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$3f		; 63, '?', xStep
		dup
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$5d]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$46		; 70, 'F', isBlocked
		dup
		pushi	$de		; 222, centerIn
		callk	kernel_107, $8
		bnot
		sag	global[$5e]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$46		; 70, 'F', isBlocked
		pushi	$de		; 222, centerIn
		pushi	$46		; 70, 'F', isBlocked
		callk	kernel_107, $8
		bnot
		sag	global[$5f]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$46		; 70, 'F', isBlocked
		pushi	$de		; 222, centerIn
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$60]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$de		; 222, centerIn
		pushi	$46		; 70, 'F', isBlocked
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$61]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$de		; 222, centerIn
		pushi	$46		; 70, 'F', isBlocked
		pushi	$de		; 222, centerIn
		callk	kernel_107, $8
		bnot
		sag	global[$62]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$d8		; 216, callKernel
		dup
		pushi	$26		; 38, '&', back
		callk	kernel_107, $8
		bnot
		sag	global[$63]
		pushi	$4		; scaleX
		pushi	$3		; z
		pushi	$df		; 223, centerOn
		dup
		dup
		callk	kernel_107, $8
		bnot
		sag	global[$55]
		ret

; export60026_1
code_0104:	link	$3
		pushi	$e		; 14, view
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_0149
		pushi	$8		; fixPriority
		pushi	$9		; inLeft
		pushi	$e		; 14, view
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$f		; 15, loop
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$10		; 16, cel
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$ff		; 255, asInteger
		dup
		push1
		pushi	$17a		; 378, clut
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		callk	kernel_35, $10
		bnot
		sat	temp[$0]
		jmp	code_01a4

code_0149:	push0
		push0
		lap	param[$1]
		send	$4
		bnot
		bnt	code_015b
		push0
		push0
		lap	param[$1]
		send	$4
		bnot
		jmp	code_0162

code_015b:	push0
		push0
		lag	global[$3]
		send	$4
		bnot
code_0162:	sat	temp[$1]
		pushi	$7		; priority
		push0
		pushi	$4e		; 78, 'N', width
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$e1		; 225, height
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$72		; 114, 'r', skip
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$26		; 38, '&', back
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$6e		; 110, 'n', resX
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		pushi	$6f		; 111, 'o', resY
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		callk	kernel_35, $e
		bnot
		sat	temp[$0]
code_01a4:	pushi	$99		; 153, respondsTo
		push1
		pushi	$23		; 35, '#', text
		lap	param[$1]
		send	$6
		bnot
		bnt	code_022b
		pushi	$23		; 35, '#', text
		push0
		lap	param[$1]
		send	$4
		bnot
		bnt	code_022b
		pushi	$f		; 15, loop
		pushi	$4		; scaleX
		lst	temp[$0]
		push2
		pushi	$9		; inLeft
		pushi	$23		; 35, '#', text
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		callk	kernel_91, $4
		bnot
		push
		push0
		push0
		pushi	$4e		; 78, 'N', width
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$e1		; 225, height
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$25		; 37, '%', fore
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$26		; 38, '&', back
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$72		; 114, 'r', skip
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$2a		; 42, '*', font
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$27		; 39, ''', mode
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$7a		; 122, 'z', borderColor
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$7e		; 126, '~', dimmed
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		push0
		callk	kernel_35, $1e
		bnot
code_022b:	lat	temp[$0]
		ret

; export60026_2
code_022e:	link	$2
		pushi	$71		; 113, 'q', data
		push0
		lofsa	DispTextArray
		send	$4
		bnot
		not
		bnt	code_0250
		pushi	$71		; 113, 'q', data
		push1
		pushi	$3		; z
		push0
		pushi	$32		; 50, '2', edit
		push0
		callk	kernel_91, $6
		bnot
		push
		lofsa	DispTextArray
		send	$6
		bnot
code_0250:	lsp	param[$1]
		ldi	$ff		; 255, asInteger
		eq?
		bnt	code_0293
		ldi	$0
		sat	temp[$1]
code_025b:	lst	temp[$1]
		pushi	$5a		; 90, 'Z', size
		push0
		lofsa	DispTextArray
		send	$4
		bnot
		lt?
		bnt	code_0342
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$1]
		lofsa	DispTextArray
		send	$6
		bnot
		sat	temp[$0]
		bnt	code_028c
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
		pushi	$4b		; 75, 'K', at
		push2
		lst	temp[$1]
		push0
		lofsa	DispTextArray
		send	$8
		bnot
code_028c:	+at	temp[$1]
		jmp	code_025b

		jmp	code_0342

code_0293:	pushi	$4b		; 75, 'K', at
		push1
		lsp	param[$1]
		lofsa	DispTextArray
		send	$6
		bnot
		sat	temp[$0]
		bnt	code_02b5
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
		pushi	$4b		; 75, 'K', at
		push2
		lsp	param[$1]
		push0
		lofsa	DispTextArray
		send	$8
		bnot
code_02b5:	lsp	param[$0]
		ldi	$1
		gt?
		bnt	code_0342
		lap	param[$2]
		bnt	code_0342
		pushi	$4b		; 75, 'K', at
		push2
		lsp	param[$1]
		pushi	$23		; 35, '#', text
		push1
		pushi	$d0		; 208, with
		push1
		lsp	param[$2]
		class	Str
		send	$6
		bnot
		push
		pushi	$db		; 219, moveTo
		push2
		lsp	param[$0]
		ldi	$2
		gt?
		bnt	code_02e5
		lap	param[$3]
		jmp	code_02e7

code_02e5:	ldi	$a		; 10, inTop
code_02e7:	push
		lsp	param[$0]
		ldi	$3		; z
		gt?
		bnt	code_02f3
		lap	param[$4]
		jmp	code_02fc

code_02f3:	lsp	param[$1]
		ldi	$10		; 16, cel
		mod
		push
		ldi	$c		; 12, inBottom
		mul
code_02fc:	push
		pushi	$25		; 37, '%', fore
		push1
		lsp	param[$0]
		ldi	$4		; scaleX
		gt?
		bnt	code_030b
		lap	param[$5]
		jmp	code_030d

code_030b:	lag	global[$55]
code_030d:	push
		pushi	$2a		; 42, '*', font
		push1
		lsp	param[$0]
		ldi	$5		; scaleY
		gt?
		bnt	code_031c
		lap	param[$6]
		jmp	code_031e

code_031c:	lag	global[$3a]
code_031e:	push
		pushi	$29		; 41, ')', state
		push1
		push0
		pushi	$1be		; 446, setSize
		push0
		pushi	$94		; 148, init
		push0
		pushi	$9a		; 154, yourself
		push0
		pushi	$8d		; 141, new
		push0
		class	TextItem
		send	$4
		bnot
		send	$2c
		bnot
		push
		lofsa	DispTextArray
		send	$8
		bnot
code_0342:	ret

