BreakStrIntoList::doit:
		link	$9
		pushi	$d0		; 208, with
		push1
		lsp	param[$1]
		class	Str
		send	$6
		bnot
		sat	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		send	$4
		bnot
		push
		ldi	$1
		sub
		sat	temp[$8]
		ldi	$0
		sat	temp[$5]
code_00a1:	ldi	$1
		bnt	code_0179
		pushi	$4		; scaleX
		dup
		pushi	$71		; 113, 'q', data
		push0
		lat	temp[$0]
		send	$4
		bnot
		push
		lsp	param[$2]
		lsg	global[$3a]
		callk	kernel_70, $8
		bnot
		sat	temp[$3]
		not
		bnt	code_00c2
		jmp	code_0179

code_00c2:	lst	temp[$8]
		lat	temp[$3]
		sub
		sat	temp[$8]
		pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		push0
		lst	temp[$0]
		push0
		lst	temp[$3]
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		sat	temp[$2]
		send	$c
		bnot
		pushi	$4b		; 75, 'K', at
		push2
		lst	temp[$3]
		push0
		lat	temp[$2]
		send	$8
		bnot
		pushi	$9f		; 159, add
		push1
		lst	temp[$2]
		lap	param[$3]
		send	$6
		bnot
		pushi	$d7		; 215, move
		pushi	$3		; z
		push0
		lst	temp[$3]
		pushi	$ff		; 255, asInteger
		lat	temp[$0]
		send	$a
		bnot
code_0109:	pushi	$4b		; 75, 'K', at
		push1
		push0
		lat	temp[$0]
		send	$6
		bnot
		push
		ldi	$20		; 32, ' ', name
		eq?
		bnt	code_0129
		pushi	$d7		; 215, move
		pushi	$3		; z
		push0
		push1
		pushi	$ff		; 255, asInteger
		lat	temp[$0]
		send	$a
		bnot
		jmp	code_0109

code_0129:	lst	temp[$8]
		ldi	$0
		gt?
		bnt	code_00a1
		pushi	$4		; scaleX
		dup
		pushi	$71		; 113, 'q', data
		push0
		lat	temp[$2]
		send	$4
		bnot
		push
		lsp	param[$2]
		lsg	global[$3a]
		callk	kernel_70, $8
		bnot
		push1
		pushi	$5		; scaleY
		callk	kernel_70, $2
		bnot
		sat	temp[$4]
		pushi	$f5		; 245, format
		pushi	$3		; z
		lofsa	string_0099	; "|c%d|%s"
		push
		lst	temp[$4]
		lst	temp[$0]
		class	Str
		send	$a
		bnot
		sat	temp[$6]
		pushi	$d3		; 211, copy
		push1
		push
		lat	temp[$0]
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$6]
		send	$4
		bnot
		jmp	code_00a1

code_0179:	pushi	$95		; 149, dispose
		push0
		lat	temp[$0]
		send	$4
		bnot
		ret

FastScrollWindow::init:
		pushi	$8d		; 141, new
		push0
		class	List
		send	$4
		bnot
		aTop	pTextList
		pushi	$94		; 148, init
		push0
		&rest	$1
		super	BitMap, $4
		bnot
		pushi	$9f		; 159, add
		push1
		pushSelf
		lag	global[$27]
		send	$6
		bnot
		ret

FastScrollWindow::dispose:
		pushi	$58		; 88, 'X', delete
		push1
		pushSelf
		lag	global[$27]
		send	$6
		bnot
		pToa	pTextList
		bnt	code_01bb
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
		ldi	$0
		aTop	pTextList
code_01bb:	pushi	$95		; 149, dispose
		push0
		&rest	$1
		super	BitMap, $4
		bnot
		ret

FastScrollWindow::clear:
		pToa	pTextList
		bnt	code_01dd
		pushi	$9d		; 157, eachElementDo
		push1
		pushi	$95		; 149, dispose
		send	$6
		bnot
		pushi	$a6		; 166, release
		push0
		pToa	pTextList
		send	$4
		bnot
code_01dd:	pToa	bitmap
		bnt	code_0205
		pushi	$7		; priority
		pushi	$5		; scaleY
		push
		push0
		push0
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		ldi	$1
		sub
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		ldi	$1
		sub
		push
		lsg	global[$54]
		callk	kernel_35, $e
		bnot
code_0205:	ret

FastScrollWindow::draw:
		link	$5
		pToa	bitmap
		not
		bnt	code_0230
		pushi	$5		; scaleY
		push0
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		pushi	$fe		; 254, strIndex
		lsg	global[$54]
		callk	kernel_35, $a
		bnot
		aTop	bitmap
		push1
		pushSelf
		callk	kernel_30, $2
		bnot
code_0230:	pushi	$7		; priority
		pushi	$5		; scaleY
		pTos	bitmap
		push0
		push0
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		ldi	$1
		sub
		push
		pushi	$e1		; 225, height
		push0
		self	$4
		bnot
		push
		ldi	$1
		sub
		push
		lsg	global[$54]
		callk	kernel_35, $e
		bnot
		pTos	pStartOverride
		ldi	$1
		eq?
		bnt	code_029e
		pTos	pIndex
		ldi	$0
		lt?
		bnt	code_0267
		ldi	$0
		aTop	pIndex
code_0267:	pToa	pIndex
		sat	temp[$1]
		push
		pToa	pNumLines
		add
		sat	temp[$4]
		push
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		gt?
		bnt	code_0287
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		sat	temp[$4]
code_0287:	pTos	pNumLines
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pIndex
		sub
		eq?
		bnt	code_02ae
		ldi	$0
		aTop	pStartOverride
		jmp	code_02ae

code_029e:	pToa	pStart
		aTop	pIndex
		sat	temp[$1]
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		sat	temp[$4]
code_02ae:	ldi	$0
		sat	temp[$2]
code_02b2:	lst	temp[$1]
		lat	temp[$4]
		lt?
		bnt	code_02fe
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$1]
		pToa	pTextList
		send	$6
		bnot
		sat	temp[$3]
		pushi	$e		; 14, view
		pushi	$4		; scaleX
		pTos	bitmap
		pushi	$71		; 113, 'q', data
		push0
		send	$4
		bnot
		push
		push0
		lst	temp[$2]
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		lst	temp[$2]
		ldi	$c		; 12, inBottom
		add
		push
		pushi	$ff		; 255, asInteger
		push0
		pushi	$f0		; 240, drawSelected
		lsg	global[$3a]
		push0
		pushi	$ff		; 255, asInteger
		push0
		callk	kernel_35, $1c
		bnot
		lst	temp[$2]
		ldi	$c		; 12, inBottom
		add
		sat	temp[$2]
		+at	temp[$1]
		jmp	code_02b2

code_02fe:	push1
		pushSelf
		callk	kernel_32, $2
		bnot
		ret

FastScrollWindow::add:
		link	$1
		pushi	$45		; 69, 'E', doit
		pushi	$3		; z
		lsp	param[$1]
		pushi	$4e		; 78, 'N', width
		push0
		self	$4
		bnot
		push
		pTos	pTextList
		lofsa	BreakStrIntoList
		send	$a
		bnot
code_031d:	pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pBufferSize
		gt?
		bnt	code_034a
		pushi	$4b		; 75, 'K', at
		push1
		push0
		pToa	pTextList
		send	$6
		bnot
		sat	temp[$0]
		pushi	$58		; 88, 'X', delete
		push1
		push
		pToa	pTextList
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$0]
		send	$4
		bnot
		jmp	code_031d

code_034a:	pTos	pIndex
		ldi	$0
		ne?
		bnt	code_0361
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pBufferSize
		eq?
		bnt	code_0361
		dpToa	pIndex
code_0361:	pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		sub
		aTop	pStart
		pTos	pStart
		ldi	$0
		lt?
		bnt	code_037a
		ldi	$0
		aTop	pStart
code_037a:	ret

FastScrollWindow::handleEvent:
		link	$1
		pushi	$2b		; 43, '+', type
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		ldi	$4		; scaleX
		and
		bnt	code_0545
		pushi	$31		; 49, '1', message
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		dup
		ldi	$4700		; 18176
		eq?
		bnt	code_03e8
		pushi	$5a		; 90, 'Z', size
		push0
		pushi	$23		; 35, '#', text
		push0
		push2
		pushi	$a410		; -23536
		pushi	$4		; scaleX
		callk	kernel_2, $4
		bnot
		send	$4
		bnot
		send	$4
		bnot
		not
		bnt	code_0511
		pushi	$50		; 80, 'P', claimed
		push1
		push1
		lap	param[$1]
		send	$6
		bnot
		ldi	$0
		aTop	pIndex
		ldi	$1
		aTop	pStartOverride
		pushi	$57		; 87, 'W', draw
		push0
		self	$4
		bnot
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		gt?
		bnt	code_0511
		pushi	$351		; 849, newLinesShow
		push0
		lag	global[$6]
		send	$4
		bnot
		jmp	code_0511

code_03e8:	dup
		ldi	$4f00		; 20224
		eq?
		bnt	code_042a
		pushi	$5a		; 90, 'Z', size
		push0
		pushi	$23		; 35, '#', text
		push0
		push2
		pushi	$a410		; -23536
		pushi	$4		; scaleX
		callk	kernel_2, $4
		bnot
		send	$4
		bnot
		send	$4
		bnot
		not
		bnt	code_0511
		pushi	$50		; 80, 'P', claimed
		push1
		push1
		lap	param[$1]
		send	$6
		bnot
		ldi	$0
		aTop	pIndex
		aTop	pStartOverride
		pushi	$57		; 87, 'W', draw
		push0
		self	$4
		bnot
		pushi	$352		; 850, newLinesHide
		push0
		lag	global[$6]
		send	$4
		bnot
		jmp	code_0511

code_042a:	dup
		ldi	$4900		; 18688
		eq?
		bnt	code_0460
		pTos	pIndex
		pToa	pNumLines
		sub
		aTop	pIndex
		push
		ldi	$0
		lt?
		bnt	code_0442
		ldi	$0
		aTop	pIndex
code_0442:	pTos	pIndex
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		sub
		lt?
		bnt	code_0511
		pushi	$351		; 849, newLinesShow
		push0
		lag	global[$6]
		send	$4
		bnot
		jmp	code_0511

code_0460:	dup
		ldi	$5100		; 20736
		eq?
		bnt	code_04a5
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		sub
		sat	temp[$0]
		pTos	pIndex
		pToa	pNumLines
		add
		aTop	pIndex
		push
		lat	temp[$0]
		gt?
		bnt	code_0491
		lat	temp[$0]
		aTop	pIndex
		pTos	pIndex
		ldi	$0
		lt?
		bnt	code_0491
		ldi	$0
		aTop	pIndex
code_0491:	pTos	pIndex
		lat	temp[$0]
		ge?
		bnt	code_0511
		pushi	$352		; 850, newLinesHide
		push0
		lag	global[$6]
		send	$4
		bnot
		jmp	code_0511

code_04a5:	dup
		ldi	$4800		; 18432
		eq?
		bnt	code_04d4
		dpToa	pIndex
		push
		ldi	$0
		lt?
		bnt	code_04b8
		ldi	$0
		aTop	pIndex
code_04b8:	pTos	pIndex
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		sub
		lt?
		bnt	code_0511
		pushi	$351		; 849, newLinesShow
		push0
		lag	global[$6]
		send	$4
		bnot
		jmp	code_0511

code_04d4:	dup
		ldi	$5000		; 20480
		eq?
		bnt	code_0511
		ipToa	pIndex
		push
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		ge?
		bnt	code_04f7
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		ldi	$1
		sub
		aTop	pIndex
code_04f7:	pTos	pIndex
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	pTextList
		send	$4
		bnot
		push
		pToa	pNumLines
		sub
		ge?
		bnt	code_0511
		pushi	$352		; 850, newLinesHide
		push0
		lag	global[$6]
		send	$4
		bnot
code_0511:	toss
		pushi	$5		; scaleY
		pushi	$31		; 49, '1', message
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		pushi	$4900		; 18688
		pushi	$5100		; 20736
		pushi	$4800		; 18432
		pushi	$5000		; 20480
		calle	export60025_4, $a
		bnot
		bnt	code_0545
		pushi	$50		; 80, 'P', claimed
		push1
		push1
		lap	param[$1]
		send	$6
		bnot
		ldi	$1
		aTop	pStartOverride
		pushi	$57		; 87, 'W', draw
		push0
		self	$4
		bnot
code_0545:	pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		ret

