BtnList::init:
		link	$2
		pToa	pRect
		not
		bnt	code_00a2
		pushi	$8d		; 141, new
		push0
		class	Rect
		send	$4
		bnot
		aTop	pRect
code_00a2:	ldi	$1
		aTop	pInitted
		lap	param[$0]
		bnt	code_00ae
		lap	param[$1]
		jmp	code_00c0

code_00ae:	pToa	client
		not
		bnt	code_00be
		pushi	$1d0		; 464, pScreen
		push0
		lag	global[$3]
		send	$4
		bnot
		jmp	code_00c0

code_00be:	pToa	client
code_00c0:	aTop	client
		pTos	client
		pushi	$1d0		; 464, pScreen
		push0
		lag	global[$3]
		send	$4
		bnot
		ne?
		bnt	code_00da
		pushi	$1d1		; 465, addToDisposeList
		push1
		pushSelf
		pToa	client
		send	$6
		bnot
code_00da:	pToa	itemList
		not
		bnt	code_00ea
		pushi	$8d		; 141, new
		push0
		class	Set
		send	$4
		bnot
		aTop	itemList
code_00ea:	pTos	start
		pTos	row
		pToa	col
		mul
		add
		aTop	end
		push
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		gt?
		bnt	code_0106
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		aTop	end
code_0106:	pToa	start
		sat	temp[$0]
code_010a:	lst	temp[$0]
		pToa	end
		lt?
		bnt	code_014d
		pushi	$9f		; 159, add
		push1
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		sat	temp[$1]
		push
		pToa	client
		send	$6
		bnot
		pushi	$36		; 54, '6', client
		push1
		pushi	$36		; 54, '6', client
		push0
		self	$4
		bnot
		push
		push0
		push1
		push0
		push0
		pToa	client
		send	$4
		bnot
		push
		lat	temp[$1]
		send	$c
		bnot
		pushi	$9f		; 159, add
		push1
		lst	temp[$1]
		pToa	itemList
		send	$6
		bnot
		+at	temp[$0]
		jmp	code_010a

code_014d:	pushi	$dc		; 220, posn
		push2
		pTos	x
		pTos	y
		self	$8
		bnot
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		pTos	row
		pToa	col
		mul
		gt?
		bnt	code_016e
		pushi	$23d		; 573, addPaging
		push0
		self	$4
		bnot
code_016e:	pushi	$94		; 148, init
		push0
		&rest	$2
		super	Set, $4
		bnot
		ret

BtnList::dispose:
		link	$1
		pToa	keep
		bnt	code_01c5
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		bnt	code_01c5
		pToa	client
		bnt	code_01c5
		ldi	$0
		sat	temp[$0]
code_018f:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		bnt	code_01be
		pushi	$58		; 88, 'X', delete
		push1
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		push
		pToa	client
		send	$6
		bnot
		pushi	$36		; 54, '6', client
		push1
		push0
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		send	$6
		bnot
		+at	temp[$0]
		jmp	code_018f

code_01be:	ldi	$0
		aTop	keep
		aTop	client
		ret

code_01c5:	ldi	$0
		aTop	pInitted
		pToa	itemList
		bnt	code_01dc
		pushi	$a6		; 166, release
		push0
		pushi	$95		; 149, dispose
		push0
		send	$8
		bnot
		ldi	$0
		aTop	itemList
code_01dc:	pTos	upButton
		ldi	$0
		ne?
		bnt	code_01f7
		pTos	upButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_01f7
		pushi	$95		; 149, dispose
		push0
		pToa	upButton
		send	$4
		bnot
		ldi	$0
		aTop	upButton
code_01f7:	pTos	downButton
		ldi	$0
		ne?
		bnt	code_0212
		pTos	downButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_0212
		pushi	$95		; 149, dispose
		push0
		pToa	downButton
		send	$4
		bnot
		ldi	$0
		aTop	downButton
code_0212:	ldi	$0
		sat	temp[$0]
code_0216:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		bnt	code_0261
		pToa	client
		not
		bt	code_0239
		pushi	$a3		; 163, contains
		push1
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		push
		pToa	client
		send	$6
		bnot
		not
code_0239:	bnt	code_025d
		push1
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		push
		calle	export60000_0, $2
		bnot
		bnt	code_025d
		pushi	$95		; 149, dispose
		push0
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		send	$4
		bnot
code_025d:	+at	temp[$0]
		jmp	code_0216

code_0261:	pushi	$a6		; 166, release
		push0
		self	$4
		bnot
		pToa	pRect
		bnt	code_0277
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
		ldi	$0
		aTop	pRect
code_0277:	pushi	$95		; 149, dispose
		push0
		super	Set, $4
		bnot
		ret

BtnList::add:
		pushi	$9f		; 159, add
		push0
		&rest	$1
		super	Set, $4
		bnot
		pToa	pInitted
		bnt	code_0295
		pushi	$1ad		; 429, update
		push0
		self	$4
		bnot
code_0295:	ret

BtnList::delete:
		pushi	$58		; 88, 'X', delete
		push0
		&rest	$1
		super	Set, $4
		bnot
		pToa	pInitted
		bnt	code_02aa
		pushi	$1ad		; 429, update
		push0
		self	$4
		bnot
code_02aa:	ret

BtnList::draw:
		link	$5
		lap	param[$0]
		bnt	code_02b5
		lap	param[$1]
		aTop	start
code_02b5:	pTos	start
		pTos	row
		pToa	col
		mul
		add
		aTop	end
		pTos	end
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		gt?
		bnt	code_02d2
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		aTop	end
code_02d2:	pushi	$a6		; 166, release
		push0
		pToa	itemList
		send	$4
		bnot
		ldi	$0
		sat	temp[$3]
		sat	temp[$2]
		pTos	upButton
		ldi	$0
		ne?
		bnt	code_02fa
		pTos	upButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_02fa
		pushi	$94		; 148, init
		push1
		pTos	client
		pToa	upButton
		send	$6
		bnot
code_02fa:	pTos	downButton
		ldi	$0
		ne?
		bnt	code_0313
		pTos	downButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_0313
		pushi	$94		; 148, init
		push1
		pTos	client
		pToa	downButton
		send	$6
		bnot
code_0313:	pToa	elements
		sat	temp[$4]
		pToa	start
		sat	temp[$0]
code_031b:	lst	temp[$0]
		pToa	end
		lt?
		bnt	code_0357
		pushi	$9f		; 159, add
		push1
		pushi	$3		; z
		pushi	$11		; 17, bitmap
		lst	temp[$4]
		lst	temp[$0]
		callk	kernel_90, $6
		bnot
		sat	temp[$1]
		push
		pToa	client
		send	$6
		bnot
		pushi	$94		; 148, init
		push1
		pTos	client
		pushi	$57		; 87, 'W', draw
		push0
		lat	temp[$1]
		send	$a
		bnot
		pushi	$9f		; 159, add
		push1
		lst	temp[$1]
		pToa	itemList
		send	$6
		bnot
		+at	temp[$0]
		jmp	code_031b

code_0357:	ret

BtnList::erase:
		link	$3
		ldi	$0
		sat	temp[$1]
code_035e:	lst	temp[$1]
		pushi	$5a		; 90, 'Z', size
		push0
		pToa	itemList
		send	$4
		bnot
		lt?
		bnt	code_03aa
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$1]
		pToa	itemList
		send	$6
		bnot
		sat	temp[$2]
		pushi	$58		; 88, 'X', delete
		push1
		push
		pToa	client
		send	$6
		bnot
		pushi	$69		; 105, 'i', hide
		push0
		lat	temp[$2]
		send	$4
		bnot
		pushi	$58		; 88, 'X', delete
		push1
		lst	temp[$2]
		pushi	$cf		; 207, casts
		push0
		push0
		push0
		lat	temp[$2]
		send	$4
		bnot
		send	$4
		bnot
		send	$6
		bnot
		push0
		push1
		push0
		lat	temp[$2]
		send	$6
		bnot
		+at	temp[$1]
		jmp	code_035e

code_03aa:	pushi	$a6		; 166, release
		push0
		pToa	itemList
		send	$4
		bnot
		ret

BtnList::update:
		link	$1
		pushi	$dc		; 220, posn
		push2
		pTos	x
		pTos	y
		self	$8
		bnot
		lap	param[$0]
		bnt	code_03cb
		lap	param[$1]
		sat	temp[$0]
		jmp	code_03cf

code_03cb:	pToa	start
		sat	temp[$0]
code_03cf:	pushi	$1ba		; 442, erase
		push0
		self	$4
		bnot
		lst	temp[$0]
		pTos	row
		pToa	col
		mul
		add
		aTop	end
		pTos	end
		lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		add
		gt?
		bnt	code_03f9
		lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		add
		aTop	end
code_03f9:	lat	temp[$0]
		aTop	start
		pushi	$57		; 87, 'W', draw
		push0
		self	$4
		bnot
		pushi	$57		; 87, 'W', draw
		push0
		pToa	client
		send	$4
		bnot
		pTos	upButton
		ldi	$0
		ne?
		bnt	code_042b
		pTos	upButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_042b
		pushi	$1b4		; 436, enable
		push1
		pTos	start
		ldi	$0
		ne?
		push
		pushi	$57		; 87, 'W', draw
		push0
		pToa	upButton
		send	$a
		bnot
code_042b:	pTos	downButton
		ldi	$0
		ne?
		bnt	code_044f
		pTos	downButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_044f
		pushi	$1b4		; 436, enable
		push1
		pTos	end
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		push
		pushi	$57		; 87, 'W', draw
		push0
		pToa	downButton
		send	$a
		bnot
code_044f:	pToa	client
		not
		bnt	code_0459
		ldi	$0
		jmp	code_04f5

code_0459:	pTos	upButton
		ldi	$0
		ne?
		bnt	code_04a9
		pTos	upButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_04a9
		pushi	$1e1		; 481, curItem
		push0
		pToa	client
		send	$4
		bnot
		push
		pToa	upButton
		eq?
		bnt	code_04a9
		pushi	$1cc		; 460, checkState
		push1
		push1
		pToa	upButton
		send	$6
		bnot
		not
		bnt	code_04a9
		pushi	$1cc		; 460, checkState
		push1
		push1
		pToa	downButton
		send	$6
		bnot
		bnt	code_049d
		pushi	$1d4		; 468, selectItem
		push1
		pTos	downButton
		pToa	client
		send	$6
		bnot
		jmp	code_04f5

code_049d:	pushi	$20f		; 527, advance
		push0
		pToa	client
		send	$4
		bnot
		jmp	code_04f5

code_04a9:	pTos	downButton
		ldi	$0
		ne?
		bnt	code_04f5
		pTos	downButton
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_04f5
		pushi	$1e1		; 481, curItem
		push0
		pToa	client
		send	$4
		bnot
		push
		pToa	downButton
		eq?
		bnt	code_04f5
		pushi	$1cc		; 460, checkState
		push1
		push1
		pToa	downButton
		send	$6
		bnot
		not
		bnt	code_04f5
		pushi	$1cc		; 460, checkState
		push1
		push1
		pToa	upButton
		send	$6
		bnot
		bnt	code_04ec
		pushi	$1d4		; 468, selectItem
		push1
		pTos	upButton
		pToa	client
		send	$6
		bnot
		jmp	code_04f5

code_04ec:	pushi	$20f		; 527, advance
		push0
		pToa	client
		send	$4
		bnot
code_04f5:	ret

BtnList::addPaging:
		link	$9
		pTos	downButton
		pToa	upButton
		eq?
		bnt	code_06b7
		pprev
		ldi	$0
		eq?
		bnt	code_06b7
		pushi	$3		; z
		push1
		lofsa	string_00b4	; " Next "
		push
		lsg	global[$3b]
		callk	kernel_70, $6
		bnot
		push
		ldi	$14		; 20, nsRight
		add
		sat	temp[$4]
		pushi	$94		; 148, init
		push1
		pushSelf
		lofsa	upBtnHandler
		sat	temp[$0]
		send	$6
		bnot
		pushi	$4b		; 75, 'K', at
		push1
		push0
		self	$6
		bnot
		sat	temp[$7]
		bnt	code_0547
		pushi	$25		; 37, '%', fore
		push0
		send	$4
		bnot
		sat	temp[$6]
		pushi	$1c1		; 449, borderSize
		push0
		lat	temp[$7]
		send	$4
		bnot
		sat	temp[$5]
		jmp	code_055c

code_0547:	pushi	$25		; 37, '%', fore
		push0
		class	<NIL>
		send	$4
		bnot
		sat	temp[$6]
		pushi	$1c1		; 449, borderSize
		push0
		class	<NIL>
		send	$4
		bnot
		sat	temp[$5]
code_055c:	pushi	$23		; 35, '#', text
		push1
		pushi	$d0		; 208, with
		push1
		lofsa	string_00bb	; "Prev"
		push
		class	Str
		send	$6
		bnot
		push
		pushi	$51		; 81, 'Q', value
		push1
		push0
		pushi	$2a		; 42, '*', font
		push1
		lsg	global[$3b]
		pushi	$1c1		; 449, borderSize
		push1
		lst	temp[$5]
		pushi	$1e3		; 483, wide
		push1
		lst	temp[$4]
		pushi	$25		; 37, '%', fore
		push1
		pushi	$25		; 37, '%', fore
		push0
		lag	global[$9]
		send	$4
		bnot
		push
		pushi	$1be		; 446, setSize
		push0
		pushi	$4e		; 78, 'N', width
		push1
		lst	temp[$4]
		pushi	$29		; 41, ')', state
		push1
		push1
		pushi	$1c7		; 455, handler
		push1
		lst	temp[$0]
		push0
		push1
		push0
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$8d		; 141, new
		push0
		lag	global[$9]
		send	$4
		bnot
		aTop	upButton
		send	$40
		bnot
		pushi	$94		; 148, init
		push1
		pushSelf
		lofsa	downBtnHandler
		sat	temp[$0]
		send	$6
		bnot
		pushi	$23		; 35, '#', text
		push1
		pushi	$d0		; 208, with
		push1
		lofsa	string_00c0	; "Next"
		push
		class	Str
		send	$6
		bnot
		push
		pushi	$51		; 81, 'Q', value
		push1
		push0
		pushi	$2a		; 42, '*', font
		push1
		lsg	global[$3b]
		pushi	$1c1		; 449, borderSize
		push1
		lst	temp[$5]
		pushi	$1e3		; 483, wide
		push1
		lst	temp[$4]
		pushi	$25		; 37, '%', fore
		push1
		pushi	$25		; 37, '%', fore
		push0
		lag	global[$9]
		send	$4
		bnot
		push
		pushi	$1be		; 446, setSize
		push0
		pushi	$4e		; 78, 'N', width
		push1
		lst	temp[$4]
		pushi	$29		; 41, ')', state
		push1
		push1
		pushi	$1c7		; 455, handler
		push1
		lst	temp[$0]
		push0
		push1
		push0
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$8d		; 141, new
		push0
		lag	global[$9]
		send	$4
		bnot
		aTop	downButton
		send	$40
		bnot
		pushi	$b5		; 181, set
		pushi	$4		; scaleX
		pTos	x
		pTos	y
		pTos	x
		pTos	buttonW
		pToa	col
		mul
		add
		push
		pTos	y
		pTos	buttonH
		pTos	margin
		ldi	$2
		div
		add
		push
		pToa	row
		mul
		add
		push
		pushi	$8d		; 141, new
		push0
		class	Rect
		send	$4
		bnot
		sat	temp[$1]
		send	$c
		bnot
		pushi	$4e		; 78, 'N', width
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		pTos	margin
		pushi	$4e		; 78, 'N', width
		push0
		pToa	downButton
		send	$4
		bnot
		add
		push
		pushi	$4e		; 78, 'N', width
		push0
		pToa	upButton
		send	$4
		bnot
		add
		sub
		push
		ldi	$2
		div
		sat	temp[$8]
		pushi	$db		; 219, moveTo
		push2
		push
		pushi	$8a		; 138, bottom
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		pToa	downButton
		send	$8
		bnot
		pushi	$db		; 219, moveTo
		push2
		pushi	$88		; 136, right
		push0
		pToa	downButton
		send	$4
		bnot
		push
		pToa	margin
		add
		push
		pushi	$89		; 137, top
		push0
		pToa	downButton
		send	$4
		bnot
		push
		pToa	upButton
		send	$8
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$1]
		send	$4
		bnot
code_06b7:	pushi	$9f		; 159, add
		push2
		pTos	downButton
		pTos	upButton
		pToa	client
		send	$8
		bnot
		pushi	$1b4		; 436, enable
		push2
		push0
		push1
		pToa	upButton
		send	$8
		bnot
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		pTos	row
		pToa	col
		mul
		le?
		bnt	code_06e9
		pushi	$1b4		; 436, enable
		push2
		push0
		push1
		pToa	downButton
		send	$8
		bnot
code_06e9:	ret

BtnList::addList:
		link	$3
		ldi	$0
		sat	temp[$2]
		pushi	$5a		; 90, 'Z', size
		push0
		lap	param[$1]
		send	$4
		bnot
		not
		bt	code_0707
		pushi	$4b		; 75, 'K', at
		push1
		push0
		lap	param[$1]
		send	$6
		bnot
		sat	temp[$1]
		not
code_0707:	bnt	code_070d
		ldi	$0
		jmp	code_074c

code_070d:	pushi	$97		; 151, isKindOf
		push1
		class	Str
		push
		lat	temp[$1]
		send	$6
		bnot
		bnt	code_0721
		ldi	$1
		sat	temp[$2]
		jmp	code_074c

code_0721:	pushi	$97		; 151, isKindOf
		push1
		class	<NIL>
		push
		lat	temp[$1]
		send	$6
		bnot
		bnt	code_0735
		ldi	$2
		sat	temp[$2]
		jmp	code_074c

code_0735:	pushi	$99		; 153, respondsTo
		push1
		pushi	$23		; 35, '#', text
		lat	temp[$1]
		send	$6
		bnot
		bnt	code_0748
		ldi	$3		; z
		sat	temp[$2]
		jmp	code_074c

code_0748:	ldi	$4		; scaleX
		sat	temp[$2]
code_074c:	lat	temp[$2]
		bnt	code_0820
		ldi	$0
		sat	temp[$0]
code_0755:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		lap	param[$1]
		send	$4
		bnot
		lt?
		bnt	code_0809
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		lap	param[$1]
		send	$6
		bnot
		sat	temp[$1]
		lst	temp[$2]
		ldi	$2
		eq?
		bnt	code_0782
		pushi	$9f		; 159, add
		push1
		lst	temp[$1]
		self	$6
		bnot
		jmp	code_07cb

code_0782:	pushi	$9f		; 159, add
		push1
		pushi	$23		; 35, '#', text
		push1
		lst	temp[$2]
		dup
		ldi	$1
		eq?
		bnt	code_0795
		lat	temp[$1]
		jmp	code_07b3

code_0795:	dup
		ldi	$3		; z
		eq?
		bnt	code_07a5
		pushi	$23		; 35, '#', text
		push0
		lat	temp[$1]
		send	$4
		bnot
		jmp	code_07b3

code_07a5:	dup
		ldi	$4		; scaleX
		eq?
		bnt	code_07b3
		pushi	$20		; 32, ' ', name
		push0
		lat	temp[$1]
		send	$4
		bnot
code_07b3:	toss
		push
		pushi	$9a		; 154, yourself
		push0
		pushi	$8d		; 141, new
		push0
		lag	global[$9]
		send	$4
		bnot
		sat	temp[$1]
		send	$a
		bnot
		push
		self	$6
		bnot
code_07cb:	pushi	$2a		; 42, '*', font
		push0
		lat	temp[$1]
		send	$4
		bnot
		not
		bnt	code_07eb
		pToa	client
		bnt	code_07eb
		pushi	$2a		; 42, '*', font
		push1
		pushi	$2a		; 42, '*', font
		push0
		pToa	client
		send	$4
		bnot
		push
		lat	temp[$1]
		send	$6
		bnot
code_07eb:	pushi	$51		; 81, 'Q', value
		push0
		lat	temp[$1]
		send	$4
		bnot
		not
		bnt	code_0804
		pushi	$51		; 81, 'Q', value
		push1
		pTos	startVal
		lat	temp[$0]
		add
		push
		lat	temp[$1]
		send	$6
		bnot
code_0804:	+at	temp[$0]
		jmp	code_0755

code_0809:	pushi	$a1		; 161, firstEqual
		push2
		pushi	$88		; 136, right
		push0
		self	$8
		bnot
		bnt	code_0820
		pushi	$9d		; 157, eachElementDo
		push1
		pushi	$1be		; 446, setSize
		self	$6
		bnot
code_0820:	ret

BtnList::posn:
		link	$b
		pToa	pRect
		not
		bnt	code_0833
		pushi	$8d		; 141, new
		push0
		class	Rect
		send	$4
		bnot
		aTop	pRect
code_0833:	lap	param[$0]
		bnt	code_083b
		lap	param[$1]
		jmp	code_083d

code_083b:	ldi	$0
code_083d:	aTop	x
		lap	param[$0]
		bnt	code_0847
		lap	param[$2]
		jmp	code_0849

code_0847:	pToa	margin
code_0849:	aTop	y
		pToa	client
		bnt	code_087c
		pushi	$db		; 219, moveTo
		push2
		pushi	$87		; 135, left
		push0
		push0
		push0
		send	$4
		bnot
		send	$4
		bnot
		push
		pToa	x
		add
		push
		pushi	$89		; 137, top
		push0
		push0
		push0
		pToa	client
		send	$4
		bnot
		send	$4
		bnot
		push
		pToa	y
		add
		push
		pToa	pRect
		send	$8
		bnot
code_087c:	pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		pTos	row
		pToa	col
		mul
		gt?
		bnt	code_0892
		pTos	row
		pToa	col
		mul
		jmp	code_0898

code_0892:	pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
code_0898:	sat	temp[$4]
		pToa	buttonW
		not
		bnt	code_08d3
		ldi	$0
		sat	temp[$5]
		sat	temp[$0]
code_08a6:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		bnt	code_08cf
		pushi	$4e		; 78, 'N', width
		push0
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		send	$4
		bnot
		sat	temp[$6]
		push
		lat	temp[$5]
		gt?
		bnt	code_08cb
		lat	temp[$6]
		sat	temp[$5]
code_08cb:	+at	temp[$0]
		jmp	code_08a6

code_08cf:	lat	temp[$5]
		aTop	buttonW
code_08d3:	pushi	$9d		; 157, eachElementDo
		push2
		pushi	$4e		; 78, 'N', width
		pTos	buttonW
		self	$8
		bnot
		pToa	buttonH
		not
		bnt	code_0918
		ldi	$0
		sat	temp[$5]
		sat	temp[$0]
code_08ea:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		bnt	code_0914
		pushi	$e1		; 225, height
		push0
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		send	$4
		bnot
		sat	temp[$6]
		push
		lat	temp[$5]
		gt?
		bnt	code_0910
		lat	temp[$6]
		sat	temp[$5]
code_0910:	+at	temp[$0]
		jmp	code_08ea

code_0914:	lat	temp[$5]
		aTop	buttonH
code_0918:	pushi	$9d		; 157, eachElementDo
		push2
		pushi	$e1		; 225, height
		pTos	buttonH
		self	$8
		bnot
		pushi	$4e		; 78, 'N', width
		push1
		pTos	buttonW
		pToa	col
		mul
		push
		pushi	$e1		; 225, height
		push1
		pTos	buttonH
		pToa	row
		mul
		push
		pToa	pRect
		send	$c
		bnot
		pToa	client
		bnt	code_094e
		pushi	$af		; 175, union
		push1
		pTos	pRect
		push0
		push0
		send	$4
		bnot
		send	$6
		bnot
code_094e:	ldi	$0
		sat	temp[$8]
		sat	temp[$7]
		pTos	margin
		pToa	buttonW
		add
		sat	temp[$a]
		pTos	margin
		ldi	$2
		div
		push
		pToa	buttonH
		add
		sat	temp[$9]
		ldi	$0
		sat	temp[$0]
		pToa	x
		sat	temp[$3]
		pToa	y
		sat	temp[$2]
code_0972:	lst	temp[$0]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		lt?
		bnt	code_0a14
		pushi	$db		; 219, moveTo
		push2
		lst	temp[$3]
		lst	temp[$2]
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		sat	temp[$1]
		send	$8
		bnot
		pToa	row
		not
		bt	code_099d
		pTos	row
		ldi	$1
		eq?
code_099d:	bnt	code_09ba
		lst	temp[$3]
		lat	temp[$a]
		add
		sat	temp[$3]
		+at	temp[$8]
		push
		pToa	col
		ge?
		bnt	code_0a0f
		ldi	$0
		sat	temp[$8]
		pToa	x
		sat	temp[$3]
		jmp	code_0a0f

code_09ba:	pToa	col
		not
		bt	code_09c4
		pTos	col
		ldi	$1
		eq?
code_09c4:	bnt	code_09e1
		lst	temp[$2]
		lat	temp[$9]
		add
		sat	temp[$2]
		+at	temp[$7]
		push
		pToa	row
		ge?
		bnt	code_0a0f
		ldi	$0
		sat	temp[$7]
		pToa	y
		sat	temp[$2]
		jmp	code_0a0f

code_09e1:	lst	temp[$3]
		lat	temp[$a]
		add
		sat	temp[$3]
		+at	temp[$8]
		push
		pToa	col
		ge?
		bnt	code_0a0f
		ldi	$0
		sat	temp[$8]
		pToa	x
		sat	temp[$3]
		lst	temp[$2]
		lat	temp[$9]
		add
		sat	temp[$2]
		+at	temp[$7]
		push
		pToa	row
		ge?
		bnt	code_0a0f
		ldi	$0
		sat	temp[$7]
		pToa	y
		sat	temp[$2]
code_0a0f:	+at	temp[$0]
		jmp	code_0972

code_0a14:	ret

upBtnHandler::init:
		lap	param[$1]
		aTop	client
		ret

upBtnHandler::dispose:
		pToa	client
		bnt	code_0a25
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
code_0a25:	pushi	$95		; 149, dispose
		push0
		super	Script, $4
		bnot
		ret

upBtnHandler::doit:
		link	$1
		pToa	client
		bnt	code_0a69
		pushi	$bb		; 187, start
		push0
		send	$4
		bnot
		push
		pushi	$231		; 561, row
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$232		; 562, col
		push0
		pToa	client
		send	$4
		bnot
		mul
		sub
		sat	temp[$0]
		push
		ldi	$0
		lt?
		bnt	code_0a5e
		ldi	$0
		sat	temp[$0]
code_0a5e:	pushi	$1ad		; 429, update
		push1
		lst	temp[$0]
		pToa	client
		send	$6
		bnot
code_0a69:	ldi	$0
		ret

downBtnHandler::init:
		lap	param[$1]
		aTop	client
		ret

downBtnHandler::dispose:
		pToa	client
		bnt	code_0a7c
		pushi	$95		; 149, dispose
		push0
		send	$4
		bnot
code_0a7c:	pushi	$95		; 149, dispose
		push0
		super	Script, $4
		bnot
		ret

downBtnHandler::doit:
		link	$1
		pToa	client
		bnt	code_0ae5
		pushi	$bb		; 187, start
		push0
		send	$4
		bnot
		push
		pushi	$231		; 561, row
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$232		; 562, col
		push0
		pToa	client
		send	$4
		bnot
		mul
		add
		sat	temp[$0]
		push
		pushi	$b4		; 180, end
		push0
		pToa	client
		send	$4
		bnot
		gt?
		bnt	code_0ada
		pushi	$b4		; 180, end
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$231		; 561, row
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$232		; 562, col
		push0
		pToa	client
		send	$4
		bnot
		mul
		sub
		sat	temp[$0]
code_0ada:	pushi	$1ad		; 429, update
		push1
		lst	temp[$0]
		pToa	client
		send	$6
		bnot
code_0ae5:	ldi	$0
		ret

