From 74e2a3c08353421265c6be8c62b17f6ddd6f93d9 Mon Sep 17 00:00:00 2001
From: threememories <threememories@yahoo.com>
Date: Mon, 27 Apr 2026 01:32:19 +0000
Subject: [PATCH] Upload files to "Script"

---
 Script/Script60026.txt |  486 ++++++++
 Script/Script60027.txt |  604 ++++++++++
 Script/Script60028.txt |  152 +++
 Script/Script60029.txt | 2588 ++++++++++++++++++++++++++++++++++++++++
 Script/Script60031.txt |  710 +++++++++++
 5 files changed, 4540 insertions(+)
 create mode 100644 Script/Script60026.txt
 create mode 100644 Script/Script60027.txt
 create mode 100644 Script/Script60028.txt
 create mode 100644 Script/Script60029.txt
 create mode 100644 Script/Script60031.txt

diff --git a/Script/Script60026.txt b/Script/Script60026.txt
new file mode 100644
index 0000000..8c5f633
--- /dev/null
+++ b/Script/Script60026.txt
@@ -0,0 +1,486 @@
+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
+
diff --git a/Script/Script60027.txt b/Script/Script60027.txt
new file mode 100644
index 0000000..9eeebe8
--- /dev/null
+++ b/Script/Script60027.txt
@@ -0,0 +1,604 @@
+export60027_0	= code_0028
+export60027_1	= code_003f
+export60027_2	= code_0056
+export60027_3	= code_008a
+export60027_4	= code_0096
+export60027_5	= code_00af
+export60027_6	= code_007e
+export60027_7	= code_00c0
+export60027_8	= code_0071
+export60027_9	= code_00d9
+export60027_10	= code_00fb
+export60027_11	= code_0107
+export60027_12	= code_017d
+export60027_13	= code_01c1
+export60027_14	= code_0272
+export60027_15	= code_0315
+
+; export60027_0
+code_0028:	pushi	$61		; 97, 'a', frame
+		lap	param[$1]
+		le?
+		bnt	code_003c
+		pprev
+		ldi	$7a		; 122, 'z', borderColor
+		le?
+		bnt	code_003c
+		lsp	param[$1]
+		ldi	$20		; 32, ' ', name
+		sub
+		jmp	code_003e
+
+code_003c:	lap	param[$1]
+code_003e:	ret
+
+; export60027_1
+code_003f:	pushi	$41		; 65, 'A', moveSpeed
+		lap	param[$1]
+		le?
+		bnt	code_0053
+		pprev
+		ldi	$5a		; 90, 'Z', size
+		le?
+		bnt	code_0053
+		lsp	param[$1]
+		ldi	$20		; 32, ' ', name
+		add
+		jmp	code_0055
+
+code_0053:	lap	param[$1]
+code_0055:	ret
+
+; export60027_2
+code_0056:	lsp	param[$1]
+		ldi	$20		; 32, ' ', name
+		eq?
+		bt	code_0070
+		lsp	param[$1]
+		ldi	$d		; 13, seenRect
+		eq?
+		bt	code_0070
+		lsp	param[$1]
+		ldi	$a		; 10, inTop
+		eq?
+		bt	code_0070
+		lsp	param[$1]
+		ldi	$9		; inLeft
+		eq?
+code_0070:	ret
+
+; export60027_8
+code_0071:	lsp	param[$1]
+		ldi	$20		; 32, ' ', name
+		lt?
+		bt	code_007d
+		lsp	param[$1]
+		ldi	$7f		; 127, frameOut
+		gt?
+code_007d:	ret
+
+; export60027_6
+code_007e:	pushi	$20		; 32, ' ', name
+		lap	param[$1]
+		le?
+		bnt	code_0089
+		pprev
+		ldi	$7e		; 126, '~', dimmed
+		le?
+code_0089:	ret
+
+; export60027_3
+code_008a:	pushi	$30		; 48, '0', who
+		lap	param[$1]
+		le?
+		bnt	code_0095
+		pprev
+		ldi	$39		; 57, '9', b_moveCnt
+		le?
+code_0095:	ret
+
+; export60027_4
+code_0096:	pushi	$41		; 65, 'A', moveSpeed
+		lap	param[$1]
+		le?
+		bnt	code_00a1
+		pprev
+		ldi	$5a		; 90, 'Z', size
+		le?
+code_00a1:	bt	code_00ae
+		pushi	$61		; 97, 'a', frame
+		lap	param[$1]
+		le?
+		bnt	code_00ae
+		pprev
+		ldi	$7a		; 122, 'z', borderColor
+		le?
+code_00ae:	ret
+
+; export60027_5
+code_00af:	push1
+		lsp	param[$1]
+		call	code_0089, $2
+		bnot
+		bt	code_00bf
+		push1
+		lsp	param[$1]
+		call	code_0095, $2
+		bnot
+code_00bf:	ret
+
+; export60027_7
+code_00c0:	lsp	param[$1]
+		ldi	$20		; 32, ' ', name
+		ne?
+		bnt	code_00d8
+		push1
+		lsp	param[$1]
+		call	code_007d, $2
+		bnot
+		bnt	code_00d8
+		push1
+		lsp	param[$1]
+		call	code_00ae, $2
+		bnot
+		not
+code_00d8:	ret
+
+; export60027_9
+code_00d9:	push1
+		lsp	param[$1]
+		call	code_0089, $2
+		bnot
+		bt	code_00fa
+		pushi	$61		; 97, 'a', frame
+		lap	param[$1]
+		le?
+		bnt	code_00ed
+		pprev
+		ldi	$66		; 102, 'f', flags
+		le?
+code_00ed:	bt	code_00fa
+		pushi	$41		; 65, 'A', moveSpeed
+		lap	param[$1]
+		le?
+		bnt	code_00fa
+		pprev
+		ldi	$46		; 70, 'F', isBlocked
+		le?
+code_00fa:	ret
+
+; export60027_10
+code_00fb:	pushi	$16		; 22, lsLeft
+		lap	param[$1]
+		le?
+		bnt	code_0106
+		pprev
+		ldi	$1f		; 31, brBottom
+		le?
+code_0106:	ret
+
+; export60027_11
+code_0107:	link	$3
+		lsp	param[$0]
+		ldi	$2
+		gt?
+		bnt	code_0116
+		lap	param[$3]
+		sat	temp[$1]
+		jmp	code_011a
+
+code_0116:	ldi	$0
+		sat	temp[$1]
+code_011a:	lsp	param[$0]
+		ldi	$3		; z
+		gt?
+		bnt	code_0127
+		lap	param[$4]
+		sat	temp[$2]
+		jmp	code_0142
+
+code_0127:	pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$2]
+		push
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$2]
+		send	$4
+		bnot
+		ne?
+		bnt	code_0140
+		ldi	$0
+		ret
+
+code_0140:	-at	temp[$2]
+code_0142:	lat	temp[$1]
+		sat	temp[$0]
+code_0146:	lst	temp[$0]
+		lat	temp[$2]
+		le?
+		bnt	code_017a
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		lap	param[$1]
+		send	$6
+		bnot
+		push
+		call	code_0027, $2
+		bnot
+		push
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		lap	param[$2]
+		send	$6
+		bnot
+		push
+		call	code_0027, $2
+		bnot
+		ne?
+		bnt	code_0176
+		ldi	$0
+		ret
+
+code_0176:	+at	temp[$0]
+		jmp	code_0146
+
+code_017a:	ldi	$1
+		ret
+
+; export60027_12
+code_017d:	link	$3
+		lsp	param[$0]
+		ldi	$2
+		lt?
+		bnt	code_018a
+		ldi	$1
+		jmp	code_018c
+
+code_018a:	lap	param[$2]
+code_018c:	sat	temp[$0]
+		pushi	$d1		; 209, newWith
+		push1
+		push
+		push2
+		push1
+		lsp	param[$1]
+		callk	kernel_92, $4
+		bnot
+		mul
+		push
+		class	Str
+		send	$6
+		bnot
+		sat	temp[$1]
+		ldi	$0
+		sat	temp[$2]
+code_01a8:	lst	temp[$2]
+		lat	temp[$0]
+		lt?
+		bnt	code_01be
+		pushi	$f7		; 247, cat
+		push1
+		lsp	param[$1]
+		lat	temp[$1]
+		send	$6
+		bnot
+		+at	temp[$2]
+		jmp	code_01a8
+
+code_01be:	lat	temp[$1]
+		ret
+
+; export60027_13
+code_01c1:	link	$7
+		lsp	param[$0]
+		ldi	$2
+		gt?
+		bnt	code_01ce
+		lap	param[$3]
+		jmp	code_01d0
+
+code_01ce:	lag	global[$3a]
+code_01d0:	sat	temp[$3]
+		pushi	$97		; 151, isKindOf
+		push1
+		class	Rect
+		push
+		lap	param[$2]
+		send	$6
+		bnot
+		bnt	code_01e4
+		lap	param[$2]
+		jmp	code_0202
+
+code_01e4:	pushi	$e5		; 229, sizeToStr
+		pushi	$3		; z
+		lofsa	string_0006	; "w"
+		push
+		lst	temp[$3]
+		lsp	param[$2]
+		pushi	$9a		; 154, yourself
+		push0
+		pushi	$8d		; 141, new
+		push0
+		class	Rect
+		send	$4
+		bnot
+		send	$e
+		bnot
+code_0202:	sat	temp[$0]
+		pushi	$4e		; 78, 'N', width
+		push0
+		send	$4
+		bnot
+		sat	temp[$1]
+		pushi	$e1		; 225, height
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		sat	temp[$2]
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		sat	temp[$5]
+		pushi	$8d		; 141, new
+		push0
+		class	Rect
+		send	$4
+		bnot
+		sat	temp[$4]
+code_0230:	pushi	$e5		; 229, sizeToStr
+		pushi	$3		; z
+		lsp	param[$1]
+		lst	temp[$3]
+		lst	temp[$1]
+		lat	temp[$4]
+		send	$a
+		bnot
+		lst	temp[$5]
+		ldi	$0
+		lt?
+		bt	code_0266
+		pushi	$e1		; 225, height
+		push0
+		lat	temp[$4]
+		send	$4
+		bnot
+		push
+		lat	temp[$2]
+		le?
+		bt	code_0266
+		pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$5]
+		push0
+		lap	param[$1]
+		send	$8
+		bnot
+		-at	temp[$5]
+		jmp	code_0230
+
+code_0266:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$4]
+		send	$4
+		bnot
+		lat	temp[$5]
+		ret
+
+; export60027_14
+code_0272:	link	$3
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_0287
+		lsp	param[$2]
+		ldi	$1
+		eq?
+		not
+		bnt	code_0287
+		ldi	$0
+		sap	param[$2]
+code_0287:	lsp	param[$0]
+		ldi	$2
+		gt?
+		bnt	code_02a2
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		lap	param[$3]
+		ge?
+		bnt	code_02a2
+		lap	param[$3]
+		sat	temp[$1]
+		jmp	code_02a6
+
+code_02a2:	ldi	$0
+		sat	temp[$1]
+code_02a6:	lsp	param[$0]
+		ldi	$3		; z
+		gt?
+		bnt	code_02c1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		lap	param[$4]
+		ge?
+		bnt	code_02c1
+		lap	param[$4]
+		sat	temp[$2]
+		jmp	code_02c5
+
+code_02c1:	lat	temp[$1]
+		sat	temp[$2]
+code_02c5:	lat	temp[$1]
+		sat	temp[$0]
+code_02c9:	lst	temp[$0]
+		lat	temp[$2]
+		le?
+		bnt	code_0312
+		lap	param[$2]
+		bnt	code_02f2
+		pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$0]
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		lap	param[$1]
+		send	$6
+		bnot
+		push
+		call	code_003e, $2
+		bnot
+		push
+		lap	param[$1]
+		send	$8
+		bnot
+		jmp	code_030e
+
+code_02f2:	pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$0]
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		lap	param[$1]
+		send	$6
+		bnot
+		push
+		call	code_0027, $2
+		bnot
+		push
+		lap	param[$1]
+		send	$8
+		bnot
+code_030e:	+at	temp[$0]
+		jmp	code_02c9
+
+code_0312:	lap	param[$1]
+		ret
+
+; export60027_15
+code_0315:	link	$1
+		push1
+		lsp	param[$1]
+		calle	export60000_0, $2
+		bnot
+		bt	code_0330
+		push2
+		pushi	$4		; scaleX
+		lsp	param[$1]
+		callk	kernel_105, $4
+		bnot
+		push
+		ldi	$33		; 51, '3', play
+		eq?
+code_0330:	bnt	code_03b7
+		pushi	$d0		; 208, with
+		push1
+		lsp	param[$1]
+		class	Str
+		send	$6
+		bnot
+		sap	param[$1]
+		pushi	$d0		; 208, with
+		push1
+		pushi	$88		; 136, right
+		push1
+		push2
+		send	$6
+		bnot
+		push
+		class	Str
+		send	$6
+		bnot
+		sat	temp[$0]
+		pushi	$4		; scaleX
+		push0
+		lofsa	string_0008	; "ss"
+		push
+		push2
+		pushi	$9		; inLeft
+		lst	temp[$0]
+		callk	kernel_91, $4
+		bnot
+		push
+		push2
+		callk	kernel_92, $8
+		bnot
+		bnt	code_039f
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		push
+		lap	param[$1]
+		send	$6
+		bnot
+		push
+		ldi	$73		; 115, 's', center
+		eq?
+		bnt	code_039f
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		lofsa	string_000b	; "are"
+		ret
+
+		jmp	code_03bb
+
+code_039f:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		lofsa	string_000f	; "is"
+		ret
+
+		jmp	code_03bb
+
+code_03b7:	lofsa	string_0012	; "Unknown item is"
+		ret
+
+code_03bb:	ret
+
diff --git a/Script/Script60028.txt b/Script/Script60028.txt
new file mode 100644
index 0000000..69305ad
--- /dev/null
+++ b/Script/Script60028.txt
@@ -0,0 +1,152 @@
+Sequence::new:
+		link	$1
+		pushi	$71		; 113, 'q', data
+		push1
+		lsp	param[$1]
+		pushi	$8d		; 141, new
+		push0
+		super	Obj, $4
+		bnot
+		sat	temp[$0]
+		send	$6
+		bnot
+		lat	temp[$0]
+		ret
+
+Sequence::next:
+		link	$1
+		pTos	nextNode
+		ldi	$1
+		add
+		aTop	nextNode
+		pToa	nextNode
+		sat	temp[$0]
+		push
+		pushi	$5a		; 90, 'Z', size
+		push0
+		pToa	data
+		send	$4
+		bnot
+		lt?
+		bnt	code_007f
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		pToa	data
+		send	$6
+		bnot
+		ret
+
+		jmp	code_0082
+
+code_007f:	ldi	$0
+		ret
+
+code_0082:	ret
+
+Sequence::prev:
+		link	$1
+		pTos	nextNode
+		dup
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_00a1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		pToa	data
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		aTop	nextNode
+		pToa	nextNode
+		sat	temp[$0]
+		jmp	code_00ac
+
+code_00a1:	pTos	nextNode
+		ldi	$1
+		sub
+		aTop	nextNode
+		pToa	nextNode
+		sat	temp[$0]
+code_00ac:	toss
+		lst	temp[$0]
+		ldi	$0
+		ge?
+		bnt	code_00c1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		pToa	data
+		send	$6
+		bnot
+		ret
+
+		jmp	code_00c4
+
+code_00c1:	ldi	$0
+		ret
+
+code_00c4:	ret
+
+Sequence::begin:
+		ldi	$0
+		aTop	nextNode
+		ret
+
+Sequence::end:
+		ldi	$ff		; 255, asInteger
+		aTop	nextNode
+		ret
+
+Sequence::set:
+		link	$1
+		pushi	$b3		; 179, begin
+		push0
+		self	$4
+		bnot
+code_00d8:	pushi	$4c		; 76, 'L', next
+		push0
+		self	$4
+		bnot
+		sat	temp[$0]
+		bnt	code_00e9
+		lsp	param[$1]
+		ne?
+		bnt	code_00e9
+		jmp	code_00d8
+
+code_00e9:	lsp	param[$1]
+		lat	temp[$0]
+		eq?
+		ret
+
+Sequence::value:
+		pTos	nextNode
+		pushi	$5a		; 90, 'Z', size
+		push0
+		pToa	data
+		send	$4
+		bnot
+		lt?
+		bnt	code_0110
+		pTos	nextNode
+		ldi	$0
+		ge?
+		bnt	code_0110
+		pushi	$4b		; 75, 'K', at
+		push1
+		pTos	nextNode
+		pToa	data
+		send	$6
+		bnot
+		ret
+
+		jmp	code_0113
+
+code_0110:	ldi	$0
+		ret
+
+code_0113:	ret
+
diff --git a/Script/Script60029.txt b/Script/Script60029.txt
new file mode 100644
index 0000000..701e6af
--- /dev/null
+++ b/Script/Script60029.txt
@@ -0,0 +1,2588 @@
+export60029_0	= code_00f9
+export60029_1	= code_115d
+export60029_2	= code_117d
+export60029_3	= code_11b9
+export60029_4	= code_1209
+
+UnderlineItem::setSize:
+		link	$3
+		pToa	left
+		sat	temp[$1]
+		pToa	top
+		sat	temp[$2]
+		pushi	$4e		; 78, 'N', width
+		push1
+		pushi	$4e		; 78, 'N', width
+		push0
+		pToa	scratch
+		send	$4
+		bnot
+		push
+		ldi	$8		; fixPriority
+		add
+		push
+		self	$6
+		bnot
+		pushi	$e1		; 225, height
+		push1
+		push2
+		self	$6
+		bnot
+		pushi	$db		; 219, moveTo
+		push2
+		lst	temp[$1]
+		lst	temp[$2]
+		self	$8
+		bnot
+		ret
+
+UnderlineItem::draw:
+		link	$4
+		pToa	bitmap
+		sat	temp[$3]
+		bnt	code_00d2
+		push1
+		pushSelf
+		callk	kernel_31, $2
+		bnot
+		pushi	$9f		; 159, add
+		push1
+		pTos	bitmap
+		lag	global[$66]
+		send	$6
+		bnot
+code_00d2:	pushi	$5		; scaleY
+		push0
+		pushi	$4e		; 78, 'N', width
+		push0
+		self	$4
+		bnot
+		push
+		pushi	$e1		; 225, height
+		push0
+		self	$4
+		bnot
+		push
+		push0
+		pushi	$ff		; 255, asInteger
+		callk	kernel_35, $a
+		bnot
+		aTop	bitmap
+		lat	temp[$3]
+		bnt	code_00f8
+		push1
+		pushSelf
+		callk	kernel_30, $2
+		bnot
+code_00f8:	ret
+
+; export60029_0
+code_00f9:	link	$2f
+		lap	param[$1]
+		sap	param[$1]
+		pushi	$a6		; 166, release
+		push0
+		lofsa	centeredItems
+		send	$4
+		bnot
+		ldi	$0
+		sat	temp[$20]
+		lat	temp[$25]
+		sat	temp[$25]
+		ldi	$ff		; 255, asInteger
+		sat	temp[$e]
+		sat	temp[$d]
+		pushi	$25		; 37, '%', fore
+		push0
+		lag	global[$9]
+		send	$4
+		bnot
+		sat	temp[$18]
+		pushi	$26		; 38, '&', back
+		push0
+		lag	global[$9]
+		send	$4
+		bnot
+		sat	temp[$19]
+		ldi	$5		; scaleY
+		sat	temp[$17]
+		ldi	$0
+		sat	temp[$16]
+		ldi	$0
+		sat	temp[$15]
+		sat	temp[$14]
+		ldi	$0
+		sat	temp[$1b]
+		ldi	$0
+		sat	temp[$8]
+		pushi	$1d3		; 467, modal
+		push0
+		lag	global[$7]
+		bnt	code_014b
+		jmp	code_014d
+
+code_014b:	class	Dialog
+code_014d:	send	$4
+		bnot
+		sat	temp[$13]
+		ldi	$0
+		sat	temp[$24]
+		ldi	$6		; maxScale
+		sat	temp[$12]
+		lag	global[$3a]
+		sat	temp[$7]
+		ldi	$0
+		sat	temp[$10]
+		sat	temp[$f]
+		pushi	$20		; 32, ' ', name
+		push1
+		lofsa	string_00aa	; "PrintD"
+		push
+		pushi	$8d		; 141, new
+		push0
+		lag	global[$7]
+		bnt	code_0175
+		jmp	code_0177
+
+code_0175:	class	Dialog
+code_0177:	send	$4
+		bnot
+		sat	temp[$0]
+		send	$6
+		bnot
+		push0
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		sat	temp[$c]
+		lat	temp[$12]
+		sat	temp[$3]
+		ldi	$0
+		sat	temp[$4]
+		ldi	$0
+		lapi	param[$1]
+		bnt	code_021b
+		pushi	$d0		; 208, with
+		push1
+		push2
+		pushi	$9		; inLeft
+		ldi	$0
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		class	Str
+		send	$6
+		bnot
+		sat	temp[$1]
+		pushi	$17d		; 381, addItem
+		pushi	$7		; priority
+		class	TextItem
+		push
+		pushi	$23		; 35, '#', text
+		pushi	$71		; 113, 'q', data
+		push0
+		lat	temp[$1]
+		send	$4
+		bnot
+		push
+		pushi	$2a		; 42, '*', font
+		lsg	global[$3a]
+		pushi	$25		; 37, '%', fore
+		dup
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$0]
+		send	$12
+		bnot
+		sat	temp[$6]
+		sat	temp[$20]
+		pushi	$71		; 113, 'q', data
+		push1
+		push0
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$1]
+		send	$a
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$6]
+		push0
+		push0
+		pushi	$1be		; 446, setSize
+		push1
+		lst	temp[$6]
+		lat	temp[$0]
+		send	$10
+		bnot
+		lat	temp[$6]
+		sat	temp[$f]
+		sat	temp[$10]
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		sat	temp[$3]
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$12]
+		add
+		sat	temp[$4]
+code_021b:	pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		sat	temp[$1c]
+		ldi	$0
+		sat	temp[$1d]
+		ldi	$1
+		sat	temp[$a]
+code_022d:	lst	temp[$a]
+		lap	param[$0]
+		lt?
+		bnt	code_101b
+		ldi	$0
+		sat	temp[$f]
+		sat	temp[$2]
+		lat	temp[$1d]
+		bnt	code_0245
+		ldi	$0
+		sat	temp[$1d]
+		jmp	code_0276
+
+code_0245:	pushi	$87		; 135, left
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		sat	temp[$3]
+		lst	temp[$1c]
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		ne?
+		bnt	code_0276
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		sat	temp[$1c]
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$12]
+		add
+		sat	temp[$4]
+code_0276:	lat	temp[$a]
+		lspi	param[$1]
+		dup
+		ldi	$65		; 101, 'e', topString
+		eq?
+		bnt	code_028f
+		pushi	$27		; 39, ''', mode
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$6]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_028f:	dup
+		ldi	$69		; 105, 'i', hide
+		eq?
+		bnt	code_02bf
+		pushi	$2a		; 42, '*', font
+		push1
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$7]
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$2a		; 42, '*', font
+		push1
+		lst	temp[$7]
+		pushi	$1be		; 446, setSize
+		push1
+		pushi	$1c3		; 451, fixedWidth
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$6]
+		send	$c
+		bnot
+		jmp	code_0ad1
+
+code_02bf:	dup
+		ldi	$6a		; 106, 'j', scaleSignal
+		eq?
+		bnt	code_02f1
+		pushi	$1c3		; 451, fixedWidth
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$c]
+		send	$6
+		bnot
+		pushi	$1be		; 446, setSize
+		push1
+		pushi	$1c3		; 451, fixedWidth
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$6]
+		send	$6
+		bnot
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		jmp	code_0ad1
+
+code_02f1:	dup
+		ldi	$90		; 144, bitGetIndex
+		eq?
+		bnt	code_031b
+		pushi	$1c4		; 452, fixedHeight
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$c]
+		send	$6
+		bnot
+		pushi	$e1		; 225, height
+		push1
+		pushi	$1c4		; 452, fixedHeight
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$c]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_031b:	dup
+		ldi	$64		; 100, 'd', moveDone
+		eq?
+		bnt	code_0330
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$d]
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$e]
+		jmp	code_0ad1
+
+code_0330:	dup
+		ldi	$7a		; 122, 'z', borderColor
+		eq?
+		bnt	code_0350
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$c]
+		push0
+		push1
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_0350:	dup
+		ldi	$66		; 102, 'f', flags
+		eq?
+		bnt	code_037d
+		pushi	$25		; 37, '%', fore
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$c]
+		send	$6
+		bnot
+		lst	temp[$18]
+		pushi	$25		; 37, '%', fore
+		push0
+		lag	global[$9]
+		send	$4
+		bnot
+		eq?
+		bnt	code_0ad1
+		pushi	$25		; 37, '%', fore
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		sat	temp[$18]
+		jmp	code_0ad1
+
+code_037d:	dup
+		ldi	$67		; 103, 'g', quitGame
+		eq?
+		bnt	code_03aa
+		pushi	$26		; 38, '&', back
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$c]
+		send	$6
+		bnot
+		lst	temp[$19]
+		pushi	$26		; 38, '&', back
+		push0
+		lag	global[$9]
+		send	$4
+		bnot
+		eq?
+		bnt	code_0ad1
+		pushi	$26		; 38, '&', back
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		sat	temp[$19]
+		jmp	code_0ad1
+
+code_03aa:	dup
+		ldi	$80		; 128, lastKey
+		eq?
+		bnt	code_03c0
+		pushi	$7		; priority
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$c]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_03c0:	dup
+		ldi	$73		; 115, 's', center
+		eq?
+		bnt	code_03d6
+		pushi	$be		; 190, seconds
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_03d6:	dup
+		ldi	$75		; 117, 'u', show
+		eq?
+		bnt	code_03e4
+		push0
+		callk	kernel_33, $0
+		bnot
+		jmp	code_0ad1
+
+code_03e4:	dup
+		ldi	$72		; 114, 'r', skip
+		eq?
+		bnt	code_03fb
+		pushi	$7		; priority
+		push1
+		pushi	$f		; 15, loop
+		lat	temp[$c]
+		send	$6
+		bnot
+		ldi	$0
+		sat	temp[$13]
+		jmp	code_0ad1
+
+code_03fb:	dup
+		ldi	$91		; 145, bitPutIndex
+		eq?
+		bnt	code_040b
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$13]
+		jmp	code_0ad1
+
+code_040b:	dup
+		ldi	$96		; 150, isClass
+		eq?
+		bnt	code_042f
+		pushi	$9d		; 157, eachElementDo
+		pushi	$3		; z
+		pushi	$dd		; 221, moveBy
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$e
+		bnot
+		jmp	code_0ad1
+
+code_042f:	dup
+		ldi	$74		; 116, 't', all
+		eq?
+		bnt	code_0503
+		pushi	$17d		; 381, addItem
+		pushi	$5		; scaleY
+		class	TitleItem
+		push
+		pushi	$23		; 35, '#', text
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$25		; 37, '%', fore
+		lsg	global[$55]
+		lat	temp[$0]
+		send	$e
+		bnot
+		sat	temp[$f]
+		lst	temp[$24]
+		ldi	$0
+		eq?
+		bnt	code_0489
+		pushi	$9d		; 157, eachElementDo
+		pushi	$3		; z
+		pushi	$dd		; 221, moveBy
+		push0
+		pushi	$e1		; 225, height
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$6		; maxScale
+		add
+		push
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		pushi	$fb		; 251, subStr
+		push0
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$18
+		bnot
+		lat	temp[$f]
+		sat	temp[$24]
+		jmp	code_049e
+
+code_0489:	pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		pushi	$fb		; 251, subStr
+		lst	temp[$4]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$e
+		bnot
+code_049e:	pushi	$8c		; 140, scratch
+		push1
+		lst	temp[$f]
+		pushi	$1be		; 446, setSize
+		push0
+		pushi	$8d		; 141, new
+		push0
+		class	UnderlineItem
+		send	$4
+		bnot
+		sat	temp[$1f]
+		send	$a
+		bnot
+		pushi	$9f		; 159, add
+		push2
+		lst	temp[$f]
+		lst	temp[$1f]
+		lofsa	centeredItems
+		send	$8
+		bnot
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$1f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$1f]
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		add
+		push
+		lat	temp[$0]
+		send	$a
+		bnot
+		lst	temp[$24]
+		lat	temp[$f]
+		eq?
+		bnt	code_0ad1
+		ldi	$0
+		sat	temp[$f]
+		jmp	code_0ad1
+
+code_0503:	dup
+		ldi	$6e		; 110, 'n', resX
+		eq?
+		bnt	code_0548
+		pushi	$17d		; 381, addItem
+		pushi	$7		; priority
+		class	TextItem
+		push
+		pushi	$23		; 35, '#', text
+		push2
+		pushi	$9		; inLeft
+		+at	temp[$a]
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		pushi	$2a		; 42, '*', font
+		lst	temp[$7]
+		pushi	$25		; 37, '%', fore
+		dup
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$0]
+		send	$12
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		jmp	code_0ad1
+
+code_0548:	dup
+		ldi	$76		; 118, 'v', textLeft
+		eq?
+		bnt	code_0585
+		pushi	$17d		; 381, addItem
+		pushi	$5		; scaleY
+		class	EditItem
+		push
+		pushi	$23		; 35, '#', text
+		push2
+		pushi	$9		; inLeft
+		+at	temp[$a]
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		pushi	$2e		; 46, '.', max
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$e
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		jmp	code_0ad1
+
+code_0585:	dup
+		ldi	$7f		; 127, frameOut
+		eq?
+		bnt	code_05d0
+		pushi	$17d		; 381, addItem
+		pushi	$9		; inLeft
+		class	EditItem
+		push
+		pushi	$23		; 35, '#', text
+		push2
+		pushi	$9		; inLeft
+		+at	temp[$a]
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		pushi	$2e		; 46, '.', max
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$8b		; 139, numLines
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$1dc		; 476, pRightMargin
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$16
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		jmp	code_0ad1
+
+code_05d0:	dup
+		ldi	$94		; 148, init
+		eq?
+		bnt	code_0615
+		pushi	$17d		; 381, addItem
+		pushi	$7		; priority
+		class	EditItem
+		push
+		pushi	$23		; 35, '#', text
+		push2
+		pushi	$9		; inLeft
+		+at	temp[$a]
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		pushi	$2e		; 46, '.', max
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$1d9		; 473, matchSelector
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$12
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		jmp	code_0ad1
+
+code_0615:	dup
+		ldi	$78		; 120, 'x', textRight
+		eq?
+		bnt	code_065a
+		lat	temp[$a]
+		lspi	param[$1]
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_0ad1
+		pushi	$17d		; 381, addItem
+		pushi	$7		; priority
+		class	IconItem
+		push
+		pushi	$e		; 14, view
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$f		; 15, loop
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$10		; 16, cel
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$12
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		jmp	code_0ad1
+
+code_065a:	dup
+		ldi	$77		; 119, 'w', textTop
+		eq?
+		bnt	code_0667
+		ldi	$1
+		sat	temp[$2]
+		jmp	code_0ad1
+
+code_0667:	dup
+		ldi	$7e		; 126, '~', dimmed
+		eq?
+		bnt	code_067c
+		ldi	$1
+		sat	temp[$2]
+		ldi	$8		; fixPriority
+		sat	temp[$16]
+		ldi	$0
+		sat	temp[$17]
+		jmp	code_0ad1
+
+code_067c:	dup
+		ldi	$77		; 119, 'w', textTop
+		eq?
+		bnt	code_0689
+		ldi	$1
+		sat	temp[$2]
+		jmp	code_0ad1
+
+code_0689:	dup
+		ldi	$84		; 132, pitch
+		eq?
+		bnt	code_06c6
+		pushi	$17d		; 381, addItem
+		pushi	$9		; inLeft
+		lsg	global[$9]
+		pushi	$e		; 14, view
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$f		; 15, loop
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$10		; 16, cel
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$51		; 81, 'Q', value
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$16
+		bnot
+		sat	temp[$f]
+		ldi	$2
+		sat	temp[$2]
+		ldi	$8		; fixPriority
+		sat	temp[$16]
+		ldi	$0
+		sat	temp[$17]
+		jmp	code_0ad1
+
+code_06c6:	dup
+		ldi	$8e		; 142, getIndex
+		eq?
+		bnt	code_071d
+		pushi	$9f		; 159, add
+		push1
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$f]
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$29		; 41, ')', state
+		push1
+		pushi	$29		; 41, ')', state
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$80		; 128, lastKey
+		or
+		push
+		pushi	$db		; 219, moveTo
+		push2
+		lst	temp[$3]
+		lst	temp[$4]
+		pushi	$94		; 148, init
+		push1
+		lst	temp[$0]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$f]
+		send	$18
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lst	temp[$3]
+		lst	temp[$4]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$e
+		bnot
+		jmp	code_0ad1
+
+code_071d:	dup
+		ldi	$8f		; 143, putIndex
+		eq?
+		bnt	code_076c
+		pushi	$9f		; 159, add
+		push1
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$f]
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$29		; 41, ')', state
+		push1
+		pushi	$29		; 41, ')', state
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$80		; 128, lastKey
+		or
+		push
+		pushi	$94		; 148, init
+		push1
+		lst	temp[$0]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$f]
+		send	$10
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lst	temp[$3]
+		lst	temp[$4]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$e
+		bnot
+		jmp	code_0ad1
+
+code_076c:	dup
+		ldi	$89		; 137, top
+		eq?
+		bnt	code_077c
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$1a]
+		jmp	code_0ad1
+
+code_077c:	dup
+		ldi	$8a		; 138, bottom
+		eq?
+		bnt	code_0790
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$16]
+		ldi	$0
+		sat	temp[$17]
+		jmp	code_0ad1
+
+code_0790:	dup
+		ldi	$8b		; 139, numLines
+		eq?
+		bnt	code_07a0
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$17]
+		jmp	code_0ad1
+
+code_07a0:	dup
+		ldi	$87		; 135, left
+		eq?
+		bnt	code_07b6
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$18]
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$19]
+		jmp	code_0ad1
+
+code_07b6:	dup
+		ldi	$86		; 134, yaw
+		eq?
+		bnt	code_07c6
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$14]
+		jmp	code_0ad1
+
+code_07c6:	dup
+		ldi	$85		; 133, roll
+		eq?
+		bnt	code_07d6
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$15]
+		jmp	code_0ad1
+
+code_07d6:	dup
+		ldi	$95		; 149, dispose
+		eq?
+		bnt	code_089b
+		ldi	$1
+		sat	temp[$1d]
+		+at	temp[$a]
+		lspi	param[$1]
+		dup
+		ldi	$fd		; 253, strip
+		eq?
+		bnt	code_07f1
+		ldi	$6		; maxScale
+		jmp	code_0850
+
+code_07f1:	dup
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_080c
+		lat	temp[$10]
+		bnt	code_0808
+		pushi	$88		; 136, right
+		push0
+		send	$4
+		bnot
+		push
+		ldi	$c		; 12, inBottom
+		add
+		jmp	code_0850
+
+code_0808:	lat	temp[$3]
+		jmp	code_0850
+
+code_080c:	dup
+		ldi	$fe		; 254, strIndex
+		eq?
+		bnt	code_0823
+		lat	temp[$10]
+		bnt	code_081f
+		pushi	$87		; 135, left
+		push0
+		send	$4
+		bnot
+		jmp	code_0850
+
+code_081f:	lat	temp[$3]
+		jmp	code_0850
+
+code_0823:	dup
+		ldi	$fa		; 250, lower
+		eq?
+		bnt	code_084e
+		lat	temp[$10]
+		bnt	code_084a
+		pushi	$87		; 135, left
+		push0
+		send	$4
+		bnot
+		push
+		pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		+at	temp[$a]
+		lapi	param[$1]
+		sub
+		push
+		ldi	$2
+		div
+		add
+		jmp	code_0850
+
+code_084a:	lat	temp[$3]
+		jmp	code_0850
+
+code_084e:	lat	temp[$3]
+code_0850:	toss
+		sat	temp[$3]
+		+at	temp[$a]
+		lspi	param[$1]
+		dup
+		ldi	$fd		; 253, strip
+		eq?
+		bnt	code_0861
+		ldi	$6		; maxScale
+		jmp	code_0895
+
+code_0861:	dup
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_087c
+		lat	temp[$10]
+		bnt	code_0878
+		pushi	$8a		; 138, bottom
+		push0
+		send	$4
+		bnot
+		push
+		ldi	$6		; maxScale
+		add
+		jmp	code_0895
+
+code_0878:	lat	temp[$4]
+		jmp	code_0895
+
+code_087c:	dup
+		ldi	$fe		; 254, strIndex
+		eq?
+		bnt	code_0893
+		lat	temp[$10]
+		bnt	code_088f
+		pushi	$89		; 137, top
+		push0
+		send	$4
+		bnot
+		jmp	code_0895
+
+code_088f:	lat	temp[$4]
+		jmp	code_0895
+
+code_0893:	lat	temp[$4]
+code_0895:	toss
+		sat	temp[$4]
+		jmp	code_0ad1
+
+code_089b:	dup
+		ldi	$8c		; 140, scratch
+		eq?
+		bnt	code_0a40
+		push0
+		callk	kernel_121, $0
+		bnot
+		sat	temp[$21]
+		+at	temp[$a]
+		lspi	param[$1]
+		ldi	$0
+		sati	temp[$25]
+		bnt	code_0933
+		pushi	$97		; 151, isKindOf
+		push1
+		class	BtnList
+		push
+		ldi	$0
+		lati	temp[$25]
+		send	$6
+		bnot
+		bnt	code_0933
+		ldi	$0
+		lati	temp[$25]
+		sat	temp[$5]
+		pushi	$233		; 563, buttonW
+		push0
+		send	$4
+		bnot
+		not
+		bnt	code_08e5
+		lat	temp[$14]
+		bnt	code_08e5
+		pushi	$233		; 563, buttonW
+		push1
+		lst	temp[$14]
+		lat	temp[$5]
+		send	$6
+		bnot
+code_08e5:	pushi	$234		; 564, buttonH
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		not
+		bnt	code_0900
+		lat	temp[$15]
+		bnt	code_0900
+		pushi	$234		; 564, buttonH
+		push1
+		lst	temp[$15]
+		lat	temp[$5]
+		send	$6
+		bnot
+code_0900:	pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push1
+		push1
+		lst	temp[$3]
+		push2
+		push1
+		lst	temp[$4]
+		pushi	$94		; 148, init
+		push1
+		lst	temp[$0]
+		lat	temp[$5]
+		send	$12
+		bnot
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		pushi	$e2		; 226, heighten
+		push1
+		pushi	$6		; maxScale
+		lat	temp[$c]
+		send	$6
+		bnot
+		jmp	code_09b3
+
+code_0933:	+at	temp[$a]
+		lspi	param[$1]
+		ldi	$1
+		sati	temp[$25]
+		+at	temp[$a]
+		lspi	param[$1]
+		ldi	$2
+		sati	temp[$25]
+		+at	temp[$a]
+		lspi	param[$1]
+		ldi	$3		; z
+		sati	temp[$25]
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		pushi	$230		; 560, startVal
+		push1
+		ldi	$1
+		lsti	temp[$25]
+		pushi	$232		; 562, col
+		push1
+		ldi	$2
+		lsti	temp[$25]
+		pushi	$231		; 561, row
+		push1
+		ldi	$3		; z
+		lsti	temp[$25]
+		pushi	$233		; 563, buttonW
+		push1
+		lat	temp[$14]
+		bnt	code_0976
+		jmp	code_0978
+
+code_0976:	ldi	$0
+code_0978:	push
+		pushi	$234		; 564, buttonH
+		push1
+		lat	temp[$15]
+		bnt	code_0983
+		jmp	code_0985
+
+code_0983:	ldi	$0
+code_0985:	push
+		pushi	$23e		; 574, addList
+		push1
+		ldi	$0
+		lsti	temp[$25]
+		push1
+		push1
+		lst	temp[$3]
+		push2
+		push1
+		lst	temp[$4]
+		pushi	$94		; 148, init
+		push1
+		lst	temp[$0]
+		pushi	$8d		; 141, new
+		push0
+		class	BtnList
+		send	$4
+		bnot
+		sat	temp[$5]
+		send	$36
+		bnot
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+code_09b3:	pushi	$236		; 566, upButton
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		bnt	code_09f0
+		pushi	$236		; 566, upButton
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_09f0
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		sat	temp[$10]
+		pushi	$243		; 579, prevItem
+		push1
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		jmp	code_09fe
+
+code_09f0:	ldi	$0
+		sat	temp[$10]
+		pushi	$243		; 579, prevItem
+		push1
+		push0
+		lat	temp[$0]
+		send	$6
+		bnot
+code_09fe:	pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		pushi	$23a		; 570, itemList
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		push
+		pushi	$23a		; 570, itemList
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		send	$6
+		bnot
+		sat	temp[$1e]
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		sat	temp[$3]
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$12]
+		add
+		sat	temp[$4]
+		jmp	code_0ad1
+
+code_0a40:	dup
+		ldi	$8d		; 141, new
+		eq?
+		bnt	code_0a50
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$12]
+		jmp	code_0ad1
+
+code_0a50:	dup
+		ldi	$81		; 129, magnifier
+		eq?
+		bnt	code_0a89
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$f]
+		pushi	$1be		; 446, setSize
+		push0
+		send	$4
+		bnot
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		ldi	$0
+		sat	temp[$16]
+		sat	temp[$17]
+		jmp	code_0ad1
+
+code_0a89:	dup
+		ldi	$7d		; 125, '}', titleFont
+		eq?
+		bnt	code_0a9f
+		pushi	$244		; 580, selectHandler
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$6
+		bnot
+		jmp	code_0ad1
+
+code_0a9f:	dup
+		ldi	$93		; 147, pLine
+		eq?
+		bnt	code_0abd
+		pushi	$246		; 582, retObject
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		pushi	$247		; 583, retSelector
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$c
+		bnot
+		jmp	code_0ad1
+
+code_0abd:	dup
+		ldi	$92		; 146, pModule
+		eq?
+		bnt	code_0ad1
+		pushi	$241		; 577, keepDialog
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$6
+		bnot
+code_0ad1:	toss
+		lst	temp[$2]
+		ldi	$1
+		eq?
+		bnt	code_0b0c
+		pushi	$17d		; 381, addItem
+		pushi	$5		; scaleY
+		lsg	global[$9]
+		pushi	$23		; 35, '#', text
+		push2
+		pushi	$9		; inLeft
+		+at	temp[$a]
+		lspi	param[$1]
+		callk	kernel_91, $4
+		bnot
+		push
+		pushi	$51		; 81, 'Q', value
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$0]
+		send	$e
+		bnot
+		sat	temp[$f]
+		pushi	$20		; 32, ' ', name
+		push1
+		pushi	$23		; 35, '#', text
+		push0
+		send	$4
+		bnot
+		push
+		lat	temp[$f]
+		send	$6
+		bnot
+code_0b0c:	lat	temp[$2]
+		bnt	code_0cc7
+		lat	temp[$17]
+		bnt	code_0b41
+		lat	temp[$10]
+		bnt	code_0b41
+		pushi	$97		; 151, isKindOf
+		push1
+		class	Button
+		push
+		lat	temp[$10]
+		send	$6
+		bnot
+		bnt	code_0b41
+		pushi	$88		; 136, right
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		ldi	$c		; 12, inBottom
+		add
+		sat	temp[$3]
+		pushi	$89		; 137, top
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		sat	temp[$4]
+code_0b41:	lat	temp[$16]
+		bnt	code_0b8f
+		lat	temp[$10]
+		bnt	code_0b63
+		pushi	$97		; 151, isKindOf
+		push1
+		class	Button
+		push
+		lat	temp[$10]
+		send	$6
+		bnot
+		bnt	code_0b63
+		ldi	$fe		; 254, strIndex
+		sat	temp[$3]
+		ldi	$ff		; 255, asInteger
+		sat	temp[$4]
+		jmp	code_0b8f
+
+code_0b63:	pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		push
+		lat	temp[$14]
+		bnt	code_0b72
+		jmp	code_0b7a
+
+code_0b72:	pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+code_0b7a:	sub
+		push
+		ldi	$2
+		div
+		sat	temp[$3]
+		push
+		ldi	$0
+		lt?
+		bnt	code_0b8b
+		ldi	$6		; maxScale
+		sat	temp[$3]
+code_0b8b:	ldi	$fc		; 252, getToken
+		sat	temp[$4]
+code_0b8f:	pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$0]
+		send	$a
+		bnot
+		lat	temp[$14]
+		bnt	code_0bb0
+		pushi	$4e		; 78, 'N', width
+		push1
+		push
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0c9c
+
+code_0bb0:	lat	temp[$16]
+		bnt	code_0c9c
+		lat	temp[$10]
+		bnt	code_0c9c
+		pushi	$97		; 151, isKindOf
+		push1
+		class	Button
+		push
+		lat	temp[$10]
+		send	$6
+		bnot
+		bnt	code_0c9c
+		pushi	$1e3		; 483, wide
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$0
+		eq?
+		bnt	code_0c7f
+		pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		gt?
+		bnt	code_0c01
+		pushi	$4e		; 78, 'N', width
+		push1
+		pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0c7f
+
+code_0c01:	pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		sat	temp[$b]
+code_0c0f:	lst	temp[$b]
+		ldi	$0
+		ge?
+		bnt	code_0c7f
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$b]
+		lat	temp[$0]
+		send	$6
+		bnot
+		push
+		ldi	$0
+		sati	temp[$25]
+		pushi	$97		; 151, isKindOf
+		push1
+		class	Button
+		push
+		ldi	$0
+		lati	temp[$25]
+		send	$6
+		bnot
+		not
+		bnt	code_0c3d
+		jmp	code_0c7f
+
+		jmp	code_0c7b
+
+code_0c3d:	ldi	$0
+		lsti	temp[$25]
+		lat	temp[$f]
+		ne?
+		bnt	code_0c7b
+		pushi	$4e		; 78, 'N', width
+		push1
+		pushi	$4e		; 78, 'N', width
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$0
+		lati	temp[$25]
+		send	$6
+		bnot
+		pushi	$db		; 219, moveTo
+		push2
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		ldi	$0
+		lati	temp[$25]
+		send	$4
+		bnot
+		push
+		ldi	$0
+		lati	temp[$25]
+		send	$8
+		bnot
+code_0c7b:	-at	temp[$b]
+		jmp	code_0c0f
+
+code_0c7f:	pushi	$db		; 219, moveTo
+		push2
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$10]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		lat	temp[$f]
+		send	$8
+		bnot
+code_0c9c:	lat	temp[$15]
+		bnt	code_0caa
+		pushi	$e1		; 225, height
+		push1
+		push
+		lat	temp[$f]
+		send	$6
+		bnot
+code_0caa:	lst	temp[$18]
+		lat	temp[$19]
+		eq?
+		bnt	code_0cb5
+		pprev
+		ldi	$0
+		eq?
+code_0cb5:	not
+		bnt	code_0cc7
+		pushi	$25		; 37, '%', fore
+		push1
+		lst	temp[$18]
+		pushi	$26		; 38, '&', back
+		push1
+		lst	temp[$19]
+		lat	temp[$f]
+		send	$c
+		bnot
+code_0cc7:	lat	temp[$f]
+		bnt	code_1016
+		ldi	$0
+		sat	temp[$11]
+code_0cd0:	lst	temp[$a]
+		lap	param[$0]
+		ge?
+		bnt	code_0cda
+		jmp	code_0f99
+
+code_0cda:	+at	temp[$a]
+		lspi	param[$1]
+		dup
+		ldi	$fdf7		; -521
+		eq?
+		bnt	code_0cf5
+		pushi	$17a		; 378, clut
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0cf5:	dup
+		ldi	$fde8		; -536
+		eq?
+		bnt	code_0d0b
+		pushi	$23		; 35, '#', text
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0d0b:	dup
+		ldi	$fde9		; -535
+		eq?
+		bnt	code_0d35
+		pushi	$1f5		; 501, setIcon
+		pushi	$5		; scaleY
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$e
+		bnot
+		jmp	code_0f95
+
+code_0d35:	dup
+		ldi	$fdf8		; -520
+		eq?
+		bnt	code_0da7
+		pushi	$8c		; 140, scratch
+		push1
+		lst	temp[$f]
+		pushi	$1be		; 446, setSize
+		push0
+		pushi	$8d		; 141, new
+		push0
+		class	UnderlineItem
+		send	$4
+		bnot
+		sat	temp[$1f]
+		send	$a
+		bnot
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$1f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$1f]
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$4		; scaleX
+		sub
+		push
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		add
+		push
+		lat	temp[$0]
+		send	$a
+		bnot
+		pushi	$a3		; 163, contains
+		push1
+		lst	temp[$f]
+		lofsa	centeredItems
+		send	$6
+		bnot
+		bnt	code_0f95
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$1f]
+		lofsa	centeredItems
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0da7:	dup
+		ldi	$fdea		; -534
+		eq?
+		bnt	code_0e08
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$22]
+		+at	temp[$a]
+		lapi	param[$1]
+		sat	temp[$23]
+		pushi	$243		; 579, prevItem
+		push1
+		lst	temp[$10]
+		pushi	$249		; 585, posnItem
+		pushi	$5		; scaleY
+		lst	temp[$f]
+		lst	temp[$22]
+		push
+		lst	temp[$22]
+		ldi	$fa		; 250, lower
+		eq?
+		bnt	code_0dd9
+		+at	temp[$a]
+		lapi	param[$1]
+		jmp	code_0ddb
+
+code_0dd9:	ldi	$0
+code_0ddb:	push
+		lst	temp[$1f]
+		ldi	$fa		; 250, lower
+		eq?
+		bnt	code_0de9
+		+at	temp[$a]
+		lapi	param[$1]
+		jmp	code_0deb
+
+code_0de9:	ldi	$0
+code_0deb:	push
+		lat	temp[$0]
+		send	$14
+		bnot
+		lst	temp[$22]
+		ldi	$fb		; 251, subStr
+		eq?
+		bnt	code_0f95
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$f]
+		lofsa	centeredItems
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0e08:	dup
+		ldi	$fdeb		; -533
+		eq?
+		bnt	code_0e4c
+		pushi	$243		; 579, prevItem
+		push1
+		lst	temp[$10]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lat	temp[$10]
+		bnt	code_0e2b
+		pushi	$88		; 136, right
+		push0
+		send	$4
+		bnot
+		jmp	code_0e2d
+
+code_0e2b:	ldi	$6		; maxScale
+code_0e2d:	push
+		+at	temp[$a]
+		lapi	param[$1]
+		add
+		push
+		lat	temp[$10]
+		bnt	code_0e41
+		pushi	$89		; 137, top
+		push0
+		send	$4
+		bnot
+		jmp	code_0e43
+
+code_0e41:	ldi	$6		; maxScale
+code_0e43:	push
+		lat	temp[$0]
+		send	$10
+		bnot
+		jmp	code_0f95
+
+code_0e4c:	dup
+		ldi	$fdec		; -532
+		eq?
+		bnt	code_0e90
+		pushi	$243		; 579, prevItem
+		push1
+		lst	temp[$10]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		lst	temp[$f]
+		lat	temp[$10]
+		bnt	code_0e6f
+		pushi	$87		; 135, left
+		push0
+		send	$4
+		bnot
+		jmp	code_0e71
+
+code_0e6f:	ldi	$6		; maxScale
+code_0e71:	push
+		lat	temp[$10]
+		bnt	code_0e7f
+		pushi	$8a		; 138, bottom
+		push0
+		send	$4
+		bnot
+		jmp	code_0e81
+
+code_0e7f:	ldi	$6		; maxScale
+code_0e81:	push
+		+at	temp[$a]
+		lapi	param[$1]
+		add
+		push
+		lat	temp[$0]
+		send	$10
+		bnot
+		jmp	code_0f95
+
+code_0e90:	dup
+		ldi	$fded		; -531
+		eq?
+		bnt	code_0ea6
+		+at	temp[$a]
+		lapi	param[$1]
+		not
+		bnt	code_0f95
+		ldi	$1
+		sat	temp[$11]
+		jmp	code_0f95
+
+code_0ea6:	dup
+		ldi	$fdee		; -530
+		eq?
+		bnt	code_0ebd
+		pushi	$1c8		; 456, helpStr
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0ebd:	dup
+		ldi	$fdef		; -529
+		eq?
+		bnt	code_0ed5
+		pushi	$1c7		; 455, handler
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0ed5:	dup
+		ldi	$fdf0		; -528
+		eq?
+		bnt	code_0eeb
+		pushi	$4e		; 78, 'N', width
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0eeb:	dup
+		ldi	$fdf1		; -527
+		eq?
+		bnt	code_0f03
+		pushi	$e1		; 225, height
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0f03:	dup
+		ldi	$fdf2		; -526
+		eq?
+		bnt	code_0f18
+		+at	temp[$a]
+		lapi	param[$1]
+		bnt	code_0f95
+		lat	temp[$f]
+		sat	temp[$8]
+		jmp	code_0f95
+
+code_0f18:	dup
+		ldi	$fdf3		; -525
+		eq?
+		bnt	code_0f2f
+		pushi	$21		; 33, '!', key
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0f2f:	dup
+		ldi	$fdf4		; -524
+		eq?
+		bnt	code_0f46
+		pushi	$2a		; 42, '*', font
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0f46:	dup
+		ldi	$fdf5		; -523
+		eq?
+		bnt	code_0f5d
+		pushi	$25		; 37, '%', fore
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0f5d:	dup
+		ldi	$fdf9		; -519
+		eq?
+		bnt	code_0f7b
+		pushi	$3		; z
+		lst	temp[$f]
+		+at	temp[$a]
+		lspi	param[$1]
+		+at	temp[$a]
+		lspi	param[$1]
+		calle	export60025_5, $6
+		bnot
+		jmp	code_0f95
+
+code_0f7b:	dup
+		ldi	$fdf6		; -522
+		eq?
+		bnt	code_0f91
+		pushi	$26		; 38, '&', back
+		push1
+		+at	temp[$a]
+		lspi	param[$1]
+		lat	temp[$f]
+		send	$6
+		bnot
+		jmp	code_0f95
+
+code_0f91:	-at	temp[$a]
+		jmp	code_0f99
+
+code_0f95:	toss
+		jmp	code_0cd0
+
+code_0f99:	lat	temp[$11]
+		bnt	code_0fdb
+		pushi	$58		; 88, 'X', delete
+		push1
+		lst	temp[$f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+		ldi	$0
+		sat	temp[$f]
+		ldi	$0
+		sat	temp[$2]
+		pushi	$243		; 579, prevItem
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		sub
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		jmp	code_1016
+
+code_0fdb:	pushi	$a3		; 163, contains
+		push1
+		lst	temp[$f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		not
+		bnt	code_0ffe
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$f]
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$f]
+		send	$4
+		bnot
+code_0ffe:	pushi	$1be		; 446, setSize
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		lat	temp[$f]
+		sat	temp[$10]
+		pushi	$243		; 579, prevItem
+		push1
+		lst	temp[$f]
+		lat	temp[$0]
+		send	$6
+		bnot
+code_1016:	+at	temp[$a]
+		jmp	code_022d
+
+code_101b:	pushi	$1be		; 446, setSize
+		push0
+		pushi	$e3		; 227, expand
+		push2
+		lst	temp[$12]
+		dup
+		lat	temp[$0]
+		send	$c
+		bnot
+		ldi	$0
+		sat	temp[$a]
+code_102f:	lst	temp[$a]
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lofsa	centeredItems
+		send	$4
+		bnot
+		lt?
+		bnt	code_1063
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$a]
+		lofsa	centeredItems
+		send	$6
+		bnot
+		sat	temp[$f]
+		pushi	$249		; 585, posnItem
+		pushi	$3		; z
+		push
+		pushi	$fb		; 251, subStr
+		push2
+		push0
+		send	$4
+		bnot
+		push
+		lat	temp[$0]
+		send	$a
+		bnot
+		+at	temp[$a]
+		jmp	code_102f
+
+code_1063:	lag	global[$3]
+		bnt	code_1083
+		push0
+		push0
+		send	$4
+		bnot
+		bnt	code_1083
+		pushi	$de		; 222, centerIn
+		push1
+		push0
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		push
+		lat	temp[$c]
+		send	$6
+		bnot
+		jmp	code_108b
+
+code_1083:	pushi	$73		; 115, 's', center
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+code_108b:	pushi	$db		; 219, moveTo
+		push2
+		lst	temp[$d]
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_10a2
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		jmp	code_10a4
+
+code_10a2:	lat	temp[$d]
+code_10a4:	push
+		lst	temp[$e]
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_10b8
+		pushi	$89		; 137, top
+		push0
+		lat	temp[$c]
+		send	$4
+		bnot
+		jmp	code_10ba
+
+code_10b8:	lat	temp[$e]
+code_10ba:	push
+		lat	temp[$c]
+		send	$8
+		bnot
+		pushi	$1d3		; 467, modal
+		push1
+		lst	temp[$13]
+		pushi	$248		; 584, open
+		push0
+		lat	temp[$0]
+		send	$a
+		bnot
+		lat	temp[$8]
+		not
+		bnt	code_110d
+		pushi	$a0		; 160, firstTrue
+		push2
+		pushi	$1cc		; 460, checkState
+		push1
+		lat	temp[$0]
+		send	$8
+		bnot
+		sat	temp[$8]
+		bnt	code_110d
+		pushi	$a0		; 160, firstTrue
+		push2
+		pushi	$1cc		; 460, checkState
+		push2
+		lat	temp[$0]
+		send	$8
+		bnot
+		not
+		bnt	code_110d
+		pushi	$29		; 41, ')', state
+		push1
+		pushi	$29		; 41, ')', state
+		push0
+		lat	temp[$8]
+		send	$4
+		bnot
+		push
+		ldi	$2
+		or
+		push
+		lat	temp[$8]
+		send	$6
+		bnot
+code_110d:	lst	temp[$13]
+		ldi	$0
+		eq?
+		bnt	code_1123
+		pushi	$9f		; 159, add
+		push1
+		lst	temp[$0]
+		lag	global[$13]
+		send	$6
+		bnot
+		lat	temp[$0]
+		ret
+
+code_1123:	lst	temp[$13]
+		ldi	$2
+		eq?
+		bnt	code_1148
+		lat	temp[$8]
+		bnt	code_113a
+		pushi	$1d4		; 468, selectItem
+		push1
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+code_113a:	pushi	$aa		; 170, addToFront
+		push1
+		lst	temp[$0]
+		lag	global[$13]
+		send	$6
+		bnot
+		lat	temp[$0]
+		ret
+
+code_1148:	pushi	$1ce		; 462, process
+		push1
+		lst	temp[$8]
+		lat	temp[$0]
+		send	$6
+		bnot
+		sat	temp[$9]
+		push0
+		callk	kernel_33, $0
+		bnot
+		lat	temp[$9]
+		ret
+
+; export60029_1
+code_115d:	link	$1
+		push1
+		pushi	$f5		; 245, format
+		push0
+		&rest	$1
+		class	Str
+		send	$4
+		bnot
+		sat	temp[$0]
+		push
+		call	code_00f8, $2
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+code_117c:	ret
+
+; export60029_2
+code_117d:	pushi	$a		; 10, inTop
+		lsp	param[$0]
+		ldi	$3		; z
+		ge?
+		bnt	code_118a
+		lap	param[$3]
+		jmp	code_118d
+
+code_118a:	lofsa	string_00b1	; ""
+code_118d:	push
+		pushi	$76		; 118, 'v', textLeft
+		lsp	param[$1]
+		lsp	param[$2]
+		pushi	$77		; 119, 'w', textTop
+		lofsa	string_00b2	; " OK "
+		push
+		push1
+		pushi	$77		; 119, 'w', textTop
+		lofsa	string_00b7	; "Cancel"
+		push
+		push0
+		&rest	$4		; scaleX
+		call	code_00f8, $14
+		bnot
+		bnt	code_11b8
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$0
+		gt?
+code_11b8:	ret
+
+; export60029_3
+code_11b9:	link	$2
+		pushi	$8d		; 141, new
+		push1
+		pushi	$5		; scaleY
+		class	Str
+		send	$6
+		bnot
+		sat	temp[$0]
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_11df
+		pushi	$f5		; 245, format
+		push2
+		lofsa	string_00be	; "%d"
+		push
+		lsp	param[$2]
+		lat	temp[$0]
+		send	$8
+		bnot
+code_11df:	pushi	$3		; z
+		lst	temp[$0]
+		pushi	$5		; scaleY
+		lsp	param[$1]
+		call	code_117c, $6
+		bnot
+		bnt	code_11f9
+		pushi	$ff		; 255, asInteger
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		jmp	code_11fb
+
+code_11f9:	ldi	$ff		; 255, asInteger
+code_11fb:	sat	temp[$1]
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		lat	temp[$1]
+		ret
+
+; export60029_4
+code_1209:	link	$1
+		pushi	$8d		; 141, new
+		push1
+		lsp	param[$1]
+		class	Str
+		send	$6
+		bnot
+		sat	temp[$0]
+		push2
+		push
+		lsp	param[$1]
+		&rest	$2
+		call	code_117c, $4
+		bnot
+		bnt	code_122c
+		lat	temp[$0]
+		ret
+
+		jmp	code_1238
+
+code_122c:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		ldi	$0
+		ret
+
+code_1238:	ret
+
diff --git a/Script/Script60031.txt b/Script/Script60031.txt
new file mode 100644
index 0000000..50bf114
--- /dev/null
+++ b/Script/Script60031.txt
@@ -0,0 +1,710 @@
+Feature::dispose:
+		pushi	$18f		; 399, setPolygon
+		push1
+		push0
+		self	$6
+		bnot
+		pToa	actions
+		bnt	code_00e3
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	actions
+code_00e3:	pToa	onMeCheck
+		bnt	code_00f2
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	onMeCheck
+code_00f2:	pushi	$95		; 149, dispose
+		push0
+		super	BitMap, $4
+		bnot
+		ret
+
+Feature::getName:
+		link	$2
+		pTos	modNum
+		ldi	$0
+		gt?
+		bnt	code_018e
+		pTos	modNum
+		pushi	$180		; 384, modNum
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		ne?
+		bnt	code_018e
+		pushi	$6		; maxScale
+		push2
+		pTos	modNum
+		pTos	noun
+		push0
+		pTos	case
+		push1
+		callk	kernel_72, $c
+		bnot
+		bnt	code_014b
+		pushi	$8d		; 141, new
+		push0
+		class	Str
+		send	$4
+		bnot
+		sat	temp[$0]
+		pushi	$7		; priority
+		push0
+		pTos	modNum
+		pTos	noun
+		push0
+		pTos	case
+		push1
+		pushi	$71		; 113, 'q', data
+		push0
+		send	$4
+		bnot
+		push
+		callk	kernel_72, $e
+		bnot
+		lat	temp[$0]
+		ret
+
+		jmp	code_019a
+
+code_014b:	pushi	$6		; maxScale
+		push2
+		pTos	modNum
+		pTos	noun
+		push0
+		push0
+		push1
+		callk	kernel_72, $c
+		bnot
+		bnt	code_0180
+		pushi	$8d		; 141, new
+		push0
+		class	Str
+		send	$4
+		bnot
+		sat	temp[$0]
+		pushi	$7		; priority
+		push0
+		pTos	modNum
+		pTos	noun
+		push0
+		push0
+		push1
+		pushi	$71		; 113, 'q', data
+		push0
+		send	$4
+		bnot
+		push
+		callk	kernel_72, $e
+		bnot
+		lat	temp[$0]
+		ret
+
+		jmp	code_019a
+
+code_0180:	pushi	$f6		; 246, newCopies
+		push1
+		pTos	name
+		class	Str
+		send	$6
+		bnot
+		ret
+
+		jmp	code_019a
+
+code_018e:	pushi	$f6		; 246, newCopies
+		push1
+		pTos	name
+		class	Str
+		send	$6
+		bnot
+		ret
+
+code_019a:	ret
+
+Feature::handleEvent:
+		pushi	$c8		; 200, handleEvent
+		push1
+		lsp	param[$1]
+		super	BitMap, $6
+		bnot
+		bnt	code_01ac
+		ldi	$0
+		jmp	code_0243
+
+code_01ac:	pToa	canDrag
+		bnt	code_01f9
+		pushi	$2b		; 43, '+', type
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		eq?
+		bnt	code_01f9
+		pushi	$48		; 72, 'H', modifiers
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$3		; z
+		and
+		bnt	code_01f9
+		pushi	$a3		; 163, contains
+		push2
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		self	$8
+		bnot
+		bnt	code_01f9
+		pushi	$50		; 80, 'P', claimed
+		push1
+		push1
+		lap	param[$1]
+		send	$6
+		bnot
+		pushi	$ee		; 238, drag
+		push1
+		lsp	param[$1]
+		self	$6
+		bnot
+		jmp	code_0243
+
+code_01f9:	pToa	canDrag
+		not
+		bnt	code_0243
+		pushi	$2b		; 43, '+', type
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$1
+		eq?
+		bnt	code_0243
+		pushi	$48		; 72, 'H', modifiers
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$3		; z
+		and
+		bnt	code_0243
+		pushi	$a3		; 163, contains
+		push2
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		self	$8
+		bnot
+		bnt	code_0243
+		pushi	$50		; 80, 'P', claimed
+		push1
+		push1
+		lap	param[$1]
+		send	$6
+		bnot
+		pushi	$191		; 401, help
+		push0
+		self	$4
+		bnot
+code_0243:	pushi	$50		; 80, 'P', claimed
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		ret
+
+Feature::onMe:
+		link	$2
+		lsp	param[$0]
+		ldi	$1
+		eq?
+		bnt	code_0269
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$0]
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$1]
+		jmp	code_0271
+
+code_0269:	lap	param[$1]
+		sat	temp[$0]
+		lap	param[$2]
+		sat	temp[$1]
+code_0271:	pToa	onMeCheck
+		not
+		bnt	code_02a1
+		pToa	left
+		bt	code_0284
+		pToa	right
+		bt	code_0284
+		pToa	top
+		bt	code_0284
+		pToa	bottom
+code_0284:	not
+		bt	code_02d0
+		pTos	left
+		lat	temp[$0]
+		le?
+		bnt	code_02d0
+		pprev
+		pToa	right
+		le?
+		bnt	code_02d0
+		pTos	top
+		lat	temp[$1]
+		le?
+		bnt	code_02d0
+		pprev
+		pToa	bottom
+		le?
+		jmp	code_02d0
+
+code_02a1:	pushi	$97		; 151, isKindOf
+		push1
+		class	List
+		push
+		pToa	onMeCheck
+		send	$6
+		bnot
+		bnt	code_02c3
+		pushi	$a0		; 160, firstTrue
+		pushi	$3		; z
+		pushi	$eb		; 235, onMe
+		lst	temp[$0]
+		lst	temp[$1]
+		pToa	onMeCheck
+		send	$a
+		bnot
+		jmp	code_02d0
+
+code_02c3:	pushi	$eb		; 235, onMe
+		push2
+		lst	temp[$0]
+		lst	temp[$1]
+		pToa	onMeCheck
+		send	$8
+		bnot
+code_02d0:	ret
+
+Feature::doVerb:
+		link	$5
+		lag	global[$2c]
+		bnt	code_02d9
+		jmp	code_02dc
+
+code_02d9:	lofsa	dftDoVerb
+code_02dc:	sat	temp[$0]
+		pTos	modNum
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_02e9
+		lag	global[$34]
+		aTop	modNum
+code_02e9:	lag	global[$45]
+		bnt	code_0316
+		pushi	$6		; maxScale
+		push0
+		pTos	modNum
+		pTos	noun
+		lsp	param[$1]
+		pTos	case
+		push1
+		callk	kernel_72, $c
+		bnot
+		bnt	code_0316
+		pushi	$193		; 403, say
+		pushi	$6		; maxScale
+		pTos	noun
+		lsp	param[$1]
+		pTos	case
+		push0
+		push0
+		pTos	modNum
+		lag	global[$14]
+		send	$10
+		bnot
+		jmp	code_0321
+
+code_0316:	pushi	$45		; 69, 'E', doit
+		push2
+		lsp	param[$1]
+		pushSelf
+		lat	temp[$0]
+		send	$8
+		bnot
+code_0321:	ret
+
+Feature::actionVerbs:
+		link	$1
+		lap	param[$0]
+		bnt	code_0375
+		pToa	_actionVerbs
+		bnt	code_033b
+		pushi	$a6		; 166, release
+		push0
+		pushi	$95		; 149, dispose
+		push0
+		send	$8
+		bnot
+		ldi	$0
+		aTop	_actionVerbs
+code_033b:	lsp	param[$1]
+		ldi	$0
+		ge?
+		bnt	code_0385
+		pushi	$20		; 32, ' ', name
+		push1
+		lofsa	string_00a0	; "actionVerbsList"
+		push
+		pushi	$8d		; 141, new
+		push0
+		class	List
+		send	$4
+		bnot
+		aTop	_actionVerbs
+		send	$6
+		bnot
+		ldi	$0
+		sat	temp[$0]
+code_035b:	lst	temp[$0]
+		lap	param[$0]
+		lt?
+		bnt	code_0385
+		pushi	$9f		; 159, add
+		push1
+		lat	temp[$0]
+		lspi	param[$1]
+		pToa	_actionVerbs
+		send	$6
+		bnot
+		+at	temp[$0]
+		jmp	code_035b
+
+		jmp	code_0385
+
+code_0375:	pToa	_actionVerbs
+		bnt	code_0382
+		pushi	$5a		; 90, 'Z', size
+		push0
+		send	$4
+		bnot
+		ret
+
+		jmp	code_0385
+
+code_0382:	ldi	$0
+		ret
+
+code_0385:	ret
+
+Feature::approachVerbs:
+		link	$1
+		lap	param[$0]
+		bnt	code_03d4
+		ldi	$0
+		lapi	param[$1]
+		bnt	code_03d4
+		pToa	_approachVerbs
+		bnt	code_03a1
+		pushi	$a6		; 166, release
+		push0
+		pushi	$95		; 149, dispose
+		push0
+		send	$8
+		bnot
+code_03a1:	pushi	$20		; 32, ' ', name
+		push1
+		lofsa	string_00b0	; "approachVerbsList"
+		push
+		pushi	$8d		; 141, new
+		push0
+		class	List
+		send	$4
+		bnot
+		aTop	_approachVerbs
+		send	$6
+		bnot
+		ldi	$0
+		sat	temp[$0]
+code_03ba:	lst	temp[$0]
+		lap	param[$0]
+		lt?
+		bnt	code_03e3
+		pushi	$9f		; 159, add
+		push1
+		lat	temp[$0]
+		lspi	param[$1]
+		pToa	_approachVerbs
+		send	$6
+		bnot
+		+at	temp[$0]
+		jmp	code_03ba
+
+		jmp	code_03e3
+
+code_03d4:	pToa	_approachVerbs
+		bnt	code_03e3
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	_approachVerbs
+code_03e3:	ret
+
+Feature::facingMe:
+		link	$4
+		lap	param[$0]
+		bnt	code_03f4
+		lap	param[$1]
+		bnt	code_03f4
+		lap	param[$1]
+		sat	temp[$0]
+		jmp	code_0411
+
+code_03f4:	pushi	$a3		; 163, contains
+		push1
+		lsg	global[$1]
+		pushi	$f2		; 242, pCast
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		send	$6
+		bnot
+		bnt	code_040e
+		lag	global[$1]
+		sat	temp[$0]
+		jmp	code_0411
+
+code_040e:	ldi	$1
+		ret
+
+code_0411:	lst	temp[$0]
+		selfID
+		eq?
+		bnt	code_041a
+		ldi	$1
+		ret
+
+code_041a:	lsp	param[$0]
+		ldi	$3		; z
+		eq?
+		bnt	code_042b
+		lap	param[$2]
+		sat	temp[$2]
+		lap	param[$3]
+		sat	temp[$3]
+		jmp	code_0433
+
+code_042b:	pToa	x
+		sat	temp[$2]
+		pToa	y
+		sat	temp[$3]
+code_0433:	push1
+		pushi	$4		; scaleX
+		push1
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		push
+		pTos	x
+		pTos	y
+		callk	kernel_63, $8
+		bnot
+		push
+		pushi	$43		; 67, 'C', heading
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+		sub
+		push
+		callk	kernel_61, $2
+		bnot
+		sat	temp[$1]
+		push
+		ldi	$b4		; 180, end
+		gt?
+		bnt	code_046e
+		pushi	$168		; 360, pY1
+		lat	temp[$1]
+		sub
+		sat	temp[$1]
+code_046e:	lst	temp[$1]
+		pToa	sightAngle
+		le?
+		bnt	code_047a
+		ldi	$1
+		ret
+
+		jmp	code_047d
+
+code_047a:	ldi	$0
+		ret
+
+code_047d:	ret
+
+Feature::setPolygon:
+		pToa	onMeCheck
+		bnt	code_048d
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	onMeCheck
+code_048d:	lap	param[$0]
+		not
+		bt	code_0497
+		lsp	param[$1]
+		ldi	$0
+		eq?
+code_0497:	bnt	code_049c
+		ret
+
+		jmp	code_04ca
+
+code_049c:	lsp	param[$0]
+		ldi	$1
+		eq?
+		bnt	code_04ab
+		ldi	$0
+		lapi	param[$1]
+		aTop	onMeCheck
+		jmp	code_04ca
+
+code_04ab:	pushi	$8d		; 141, new
+		push0
+		class	List
+		send	$4
+		bnot
+		aTop	onMeCheck
+		pushi	$9f		; 159, add
+		push1
+		lsp	param[$1]
+		&rest	$2
+		pushi	$20		; 32, ' ', name
+		push1
+		lofsa	string_00c2	; "omMeList"
+		push
+		pToa	onMeCheck
+		send	$c
+		bnot
+code_04ca:	ret
+
+Feature::createPoly:
+		pToa	onMeCheck
+		bnt	code_04d6
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_04d6:	pushi	$8d		; 141, new
+		push0
+		class	Polygon
+		send	$4
+		bnot
+		aTop	onMeCheck
+		pushi	$94		; 148, init
+		push1
+		lsp	param[$1]
+		&rest	$2
+		pushi	$2b		; 43, '+', type
+		push1
+		push0
+		pToa	onMeCheck
+		send	$c
+		bnot
+		ret
+
+Feature::help:
+		ret
+
+Feature::trackDoit:
+		ldi	$1
+		ret
+
+Feature::dragDoit:
+		pushi	$db		; 219, moveTo
+		push2
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pTos	left
+		pToa	x
+		sub
+		sub
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pTos	top
+		pToa	y
+		sub
+		sub
+		push
+		self	$8
+		bnot
+		ret
+
+Actions::doVerb:
+		ldi	$0
+		ret
+
+dftDoVerb::doit:
+		ldi	$1
+		ret
+