Str::format:
		link	$1
		pTos	-info-
		ldi	$8000		; -32768
		and
		bnt	code_00b2
		push1
		pushSelf
		callk	kernel_10, $2
		bnot
		sat	temp[$0]
		pushi	$71		; 113, 'q', data
		push1
		push1
		push2
		&rest	$1
		callk	kernel_92, $2
		bnot
		push
		lat	temp[$0]
		send	$6
		bnot
		lat	temp[$0]
		ret

		jmp	code_00bf

code_00b2:	push2
		pushi	$3		; z
		pTos	data
		&rest	$1
		callk	kernel_92, $4
		bnot
		selfID
		ret

code_00bf:	ret

Str::with:
		link	$1
		push1
		pushSelf
		callk	kernel_10, $2
		bnot
		sat	temp[$0]
		pushi	$71		; 113, 'q', data
		push1
		push2
		pushi	$8		; fixPriority
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		push
		callk	kernel_91, $4
		bnot
		push
		lat	temp[$0]
		send	$6
		bnot
		lat	temp[$0]
		ret

Str::newWith:
		link	$1
		pushi	$8d		; 141, new
		push1
		lsp	param[$1]
		class	Str
		send	$6
		bnot
		sat	temp[$0]
		lap	param[$2]
		bnt	code_0104
		pushi	$d3		; 211, copy
		push1
		push
		lat	temp[$0]
		send	$6
		bnot
code_0104:	lat	temp[$0]
		ret

Str::newCopies:
		link	$3
		lsp	param[$0]
		ldi	$1
		lt?
		bnt	code_011a
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		ret

code_011a:	lsp	param[$0]
		ldi	$2
		lt?
		bnt	code_0127
		ldi	$1
		sat	temp[$1]
		jmp	code_012b

code_0127:	lap	param[$2]
		sat	temp[$1]
code_012b:	lsp	param[$0]
		ldi	$2
		gt?
		bnt	code_0153
		lap	param[$3]
		bnt	code_0153
		pushi	$8d		; 141, new
		push1
		lst	temp[$1]
		class	Str
		send	$6
		bnot
		sat	temp[$0]
		pushi	$d6		; 214, fill
		pushi	$3		; z
		push0
		lst	temp[$1]
		lsp	param[$1]
		send	$a
		bnot
		jmp	code_018a

code_0153:	pushi	$d1		; 209, newWith
		push1
		lst	temp[$1]
		push1
		lsp	param[$1]
		call	code_07bc, $2
		bnot
		mul
		push
		class	Str
		send	$6
		bnot
		sat	temp[$0]
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		sat	temp[$2]
code_0175:	-at	temp[$1]
		push
		ldi	$0
		ge?
		bnt	code_018a
		pushi	$f7		; 247, cat
		push1
		lst	temp[$2]
		lat	temp[$0]
		send	$6
		bnot
		jmp	code_0175

code_018a:	lat	temp[$0]
		ret

Str::at:
		link	$3
		lsp	param[$0]
		ldi	$1
		eq?
		bnt	code_01a2
		pushi	$3		; z
		push2
		pTos	data
		lsp	param[$1]
		callk	kernel_91, $6
		bnot
		ret

code_01a2:	lsp	param[$1]
		lap	param[$0]
		add
		push
		ldi	$ff		; 255, asInteger
		add
		sat	temp[$1]
		push
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$2]
		gt?
		bnt	code_01e0
		lsp	param[$1]
		lat	temp[$2]
		gt?
		bnt	code_01d3
		pushi	$5		; scaleY
		dup
		pTos	data
		lst	temp[$2]
		lsp	param[$1]
		lat	temp[$2]
		sub
		push
		pushi	$20		; 32, ' ', name
		callk	kernel_91, $a
		bnot
code_01d3:	pushi	$4		; scaleX
		pushi	$3		; z
		pTos	data
		lst	temp[$1]
		push0
		callk	kernel_91, $8
		bnot
code_01e0:	pushi	$3		; z
		dup
		pTos	data
		lsp	param[$1]
		&rest	$2
		callk	kernel_91, $6
		bnot
		selfID
		ret

Str::cat:
		pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		lsp	param[$1]
		push0
		push1
		lsp	param[$1]
		call	code_07bc, $2
		bnot
		push
		ldi	$1
		add
		push
		self	$c
		bnot
		ret

Str::translate:
		lsp	param[$0]
		ldi	$2
		lt?
		bnt	code_021a
		ldi	$0
		ret

code_021a:	pushi	$5		; scaleY
		pushi	$8		; fixPriority
		pTos	data
		lsp	param[$1]
		lsp	param[$2]
		pTos	data
		callk	kernel_92, $a
		bnot
		ldi	$1
		ret

Str::all:
		link	$7
		lsp	param[$0]
		ldi	$1
		lt?
		bnt	code_0239
		ldi	$0
		ret

code_0239:	ldi	$0
		sat	temp[$2]
		ldi	$0
		sat	temp[$1]
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$3]
		push1
		lsp	param[$1]
		call	code_07bc, $2
		bnot
		sat	temp[$4]
		push1
		lsp	param[$2]
		call	code_07bc, $2
		bnot
		sat	temp[$5]
		pushi	$8d		; 141, new
		push1
		lst	temp[$3]
		ldi	$2
		div
		push
		ldi	$1
		add
		push
		class	Str
		send	$6
		bnot
		sat	temp[$6]
		ldi	$0
		sat	temp[$0]
code_0276:	lst	temp[$0]
		lst	temp[$3]
		lat	temp[$4]
		sub
		le?
		bnt	code_02f2
		pushi	$d4		; 212, compToFrom
		pushi	$4		; scaleX
		lst	temp[$0]
		lsp	param[$1]
		push0
		lst	temp[$4]
		self	$c
		bnot
		push
		ldi	$0
		gt?
		bnt	code_02ee
		lsp	param[$0]
		ldi	$2
		eq?
		bnt	code_02c6
		lat	temp[$5]
		bnt	code_02ec
		pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		lst	temp[$1]
		lsp	param[$2]
		push0
		push
		lat	temp[$6]
		send	$c
		bnot
		lst	temp[$0]
		lst	temp[$5]
		ldi	$1
		sub
		add
		sat	temp[$0]
		lst	temp[$1]
		lat	temp[$5]
		add
		sat	temp[$1]
		jmp	code_02ec

code_02c6:	lat	temp[$4]
		bnt	code_02ec
		pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		lst	temp[$1]
		lsp	param[$1]
		push0
		push
		lat	temp[$6]
		send	$c
		bnot
		lst	temp[$0]
		lst	temp[$4]
		ldi	$1
		sub
		add
		sat	temp[$0]
		lst	temp[$1]
		lat	temp[$4]
		add
		sat	temp[$1]
code_02ec:	+at	temp[$2]
code_02ee:	+at	temp[$0]
		jmp	code_0276

code_02f2:	pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		push0
		lst	temp[$6]
		push0
		lst	temp[$1]
		self	$c
		bnot
		pushi	$4b		; 75, 'K', at
		push2
		lst	temp[$1]
		push0
		self	$8
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$6]
		send	$4
		bnot
		lat	temp[$2]
		ret

Str::upper:
		link	$3
		push2
		pushi	$6		; maxScale
		pTos	data
		callk	kernel_92, $4
		bnot
		ret

Str::lower:
		link	$3
		push2
		pushi	$7		; priority
		pTos	data
		callk	kernel_92, $4
		bnot
		ret

Str::subStr:
		link	$1
		lsp	param[$2]
		ldi	$ff		; 255, asInteger
		eq?
		bnt	code_0343
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		lap	param[$1]
		sub
		jmp	code_0345

code_0343:	lap	param[$2]
code_0345:	sat	temp[$0]
		pushi	$d2		; 210, copyToFrom
		pushi	$4		; scaleX
		push0
		pushSelf
		lsp	param[$1]
		push
		pushi	$4b		; 75, 'K', at
		push2
		push
		push0
		pushi	$9a		; 154, yourself
		push0
		pushi	$8d		; 141, new
		push1
		push
		ldi	$1
		add
		push
		class	Str
		send	$6
		bnot
		send	$18
		bnot
		ret

Str::left:
		link	$4
		lsp	param[$0]
		ldi	$1
		lt?
		bnt	code_0380
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		ret

code_0380:	lsp	param[$0]
		ldi	$2
		lt?
		bnt	code_038d
		ldi	$20		; 32, ' ', name
		sat	temp[$0]
		jmp	code_0391

code_038d:	lap	param[$2]
		sat	temp[$0]
code_0391:	lsp	param[$1]
		ldi	$1
		lt?
		bnt	code_03a2
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		ret

code_03a2:	pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$2]
		pushi	$fb		; 251, subStr
		push2
		push0
		lsp	param[$1]
		gt?
		bnt	code_03b8
		lat	temp[$2]
		jmp	code_03ba

code_03b8:	lap	param[$1]
code_03ba:	push
		self	$8
		bnot
		sat	temp[$1]
		lsp	param[$1]
		lat	temp[$2]
		gt?
		bnt	code_03f1
		lat	temp[$0]
		bnt	code_03f1
		pushi	$f6		; 246, newCopies
		push2
		lst	temp[$0]
		lsp	param[$1]
		lat	temp[$2]
		sub
		push
		class	Str
		send	$8
		bnot
		sat	temp[$3]
		pushi	$f7		; 247, cat
		push1
		push
		lat	temp[$1]
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$3]
		send	$4
		bnot
code_03f1:	lat	temp[$1]
		ret

Str::right:
		link	$4
		lsp	param[$0]
		ldi	$1
		lt?
		bnt	code_0407
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		ret

code_0407:	lsp	param[$0]
		ldi	$2
		lt?
		bnt	code_0414
		ldi	$20		; 32, ' ', name
		sat	temp[$0]
		jmp	code_0418

code_0414:	lap	param[$2]
		sat	temp[$0]
code_0418:	lsp	param[$1]
		ldi	$1
		lt?
		bnt	code_0429
		pushi	$8d		; 141, new
		push0
		class	Str
		send	$4
		bnot
		ret

code_0429:	pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$2]
		pushi	$fb		; 251, subStr
		push2
		lsp	param[$1]
		gt?
		bnt	code_043e
		ldi	$0
		jmp	code_0443

code_043e:	lst	temp[$2]
		lap	param[$1]
		sub
code_0443:	push
		lsp	param[$1]
		lat	temp[$2]
		gt?
		bnt	code_044f
		lat	temp[$2]
		jmp	code_0451

code_044f:	lap	param[$1]
code_0451:	push
		self	$8
		bnot
		sat	temp[$1]
		lsp	param[$1]
		lat	temp[$2]
		gt?
		bnt	code_048b
		lat	temp[$0]
		bnt	code_048b
		pushi	$f6		; 246, newCopies
		push2
		lst	temp[$0]
		lsp	param[$1]
		lat	temp[$2]
		sub
		push
		class	Str
		send	$8
		bnot
		sat	temp[$3]
		pushi	$f7		; 247, cat
		push1
		lst	temp[$1]
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		lat	temp[$1]
		send	$4
		bnot
		lat	temp[$3]
		sat	temp[$1]
code_048b:	lat	temp[$1]
		ret

Str::indexOf:
		link	$2
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$1]
		lsp	param[$0]
		ldi	$1
		gt?
		bnt	code_04c5
		lap	param[$2]
		bnt	code_04c5
		-at	temp[$1]
		sat	temp[$0]
code_04a7:	lst	temp[$0]
		ldi	$0
		ge?
		bnt	code_04e5
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		push
		lap	param[$1]
		eq?
		bnt	code_04bf
		lat	temp[$0]
		ret

code_04bf:	-at	temp[$0]
		jmp	code_04a7

		jmp	code_04e5

code_04c5:	ldi	$0
		sat	temp[$0]
code_04c9:	lst	temp[$0]
		lat	temp[$1]
		lt?
		bnt	code_04e5
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		push
		lap	param[$1]
		eq?
		bnt	code_04e1
		lat	temp[$0]
		ret

code_04e1:	+at	temp[$0]
		jmp	code_04c9

code_04e5:	ldi	$ff		; 255, asInteger
		ret

Str::strIndex:
		link	$5
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$0]
		push1
		lsp	param[$1]
		call	code_07bc, $2
		bnot
		sat	temp[$1]
		lsp	param[$0]
		ldi	$1
		gt?
		bnt	code_0535
		lap	param[$2]
		bnt	code_0535
		lst	temp[$0]
		lat	temp[$1]
		sub
		push
		ldi	$1
		sub
		sat	temp[$2]
code_0512:	lst	temp[$2]
		ldi	$0
		ge?
		bnt	code_056b
		pushi	$d4		; 212, compToFrom
		pushi	$4		; scaleX
		lst	temp[$2]
		lsp	param[$1]
		push0
		lst	temp[$1]
		self	$c
		bnot
		bnt	code_052f
		lat	temp[$2]
		ret

code_052f:	-at	temp[$2]
		jmp	code_0512

		jmp	code_056b

code_0535:	push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		sat	temp[$4]
		pToa	data
		sat	temp[$3]
		ldi	$0
		sat	temp[$2]
code_0548:	lst	temp[$2]
		lst	temp[$0]
		lat	temp[$1]
		sub
		le?
		bnt	code_056b
		pushi	$5		; scaleY
		push0
		lst	temp[$3]
		lst	temp[$4]
		lst	temp[$1]
		lst	temp[$2]
		callk	kernel_92, $a
		bnot
		not
		bnt	code_0567
		lat	temp[$2]
		ret

code_0567:	+at	temp[$2]
		jmp	code_0548

code_056b:	ldi	$ff		; 255, asInteger
		ret

Str::asInteger:
		push2
		pushi	$4		; scaleX
		pTos	data
		callk	kernel_92, $4
		bnot
		ret

Str::size:
		push2
		push1
		pTos	data
		callk	kernel_92, $4
		bnot
		ret

Str::init:
		pushi	$4b		; 75, 'K', at
		push2
		push0
		push0
		self	$8
		bnot
		ret

Str::strMax:
		pushi	$5a		; 90, 'Z', size
		push0
		super	ByteArray, $4
		bnot
		push
		ldi	$1
		sub
		ret

Str::compare:
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		push1
		lsp	param[$1]
		call	code_07bc, $2
		bnot
		ne?
		bnt	code_05ac
		ldi	$0
		jmp	code_05c8

code_05ac:	pushi	$d4		; 212, compToFrom
		pushi	$4		; scaleX
		push0
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		push
		push0
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		push
		self	$c
		bnot
code_05c8:	ret

Str::compToFrom:
		pushi	$4		; scaleX
		push0
		pTos	data
		push2
		pushi	$9		; inLeft
		lsp	param[$2]
		callk	kernel_91, $4
		bnot
		push
		lsp	param[$4]
		callk	kernel_92, $8
		bnot
		not
		ret

Str::getToken:
		link	$b
		push2
		pushi	$9		; inLeft
		pushi	$71		; 113, 'q', data
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		callk	kernel_91, $4
		bnot
		sat	temp[$5]
		ldi	$0
		sat	temp[$4]
		ldi	$ff		; 255, asInteger
		sat	temp[$7]
		ldi	$ff		; 255, asInteger
		sat	temp[$8]
		pToa	data
		sat	temp[$a]
		push2
		push1
		push
		callk	kernel_92, $4
		bnot
		sat	temp[$9]
		ldi	$0
		sat	temp[$0]
code_0611:	lst	temp[$0]
		lat	temp[$9]
		lt?
		bnt	code_067c
		pushi	$3		; z
		push2
		lst	temp[$a]
		lst	temp[$0]
		callk	kernel_91, $6
		bnot
		sat	temp[$6]
		ldi	$0
		sat	temp[$4]
		ldi	$0
		sat	temp[$3]
code_062e:	lst	temp[$3]
		push2
		push1
		lst	temp[$5]
		callk	kernel_92, $4
		bnot
		lt?
		bnt	code_0655
		lst	temp[$6]
		pushi	$3		; z
		push2
		lst	temp[$5]
		lst	temp[$3]
		callk	kernel_91, $6
		bnot
		eq?
		bnt	code_0651
		ldi	$1
		sat	temp[$4]
		jmp	code_0655

code_0651:	+at	temp[$3]
		jmp	code_062e

code_0655:	lst	temp[$7]
		ldi	$ff		; 255, asInteger
		eq?
		bnt	code_0667
		lat	temp[$4]
		not
		bnt	code_0667
		lat	temp[$0]
		sat	temp[$7]
		jmp	code_0678

code_0667:	lst	temp[$7]
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_0678
		lat	temp[$4]
		bnt	code_0678
		lat	temp[$0]
		sat	temp[$8]
		jmp	code_067c

code_0678:	+at	temp[$0]
		jmp	code_0611

code_067c:	lst	temp[$8]
		ldi	$ff		; 255, asInteger
		eq?
		bnt	code_068b
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$8]
code_068b:	lst	temp[$7]
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_06f8
		lsp	param[$0]
		ldi	$2
		eq?
		bnt	code_069e
		lap	param[$2]
		jmp	code_06ad

code_069e:	pushi	$8d		; 141, new
		push1
		lst	temp[$8]
		lat	temp[$7]
		sub
		push
		class	Str
		send	$6
		bnot
code_06ad:	sat	temp[$2]
		lat	temp[$8]
		bnt	code_06e8
		pushi	$6		; maxScale
		dup
		push2
		pushi	$9		; inLeft
		lst	temp[$2]
		callk	kernel_91, $4
		bnot
		push
		push0
		pTos	data
		lst	temp[$7]
		lst	temp[$8]
		lat	temp[$7]
		sub
		push
		callk	kernel_91, $c
		bnot
		pushi	$4		; scaleX
		pushi	$3		; z
		push2
		pushi	$9		; inLeft
		lst	temp[$2]
		callk	kernel_91, $4
		bnot
		push
		lst	temp[$8]
		lat	temp[$7]
		sub
		push
		push0
		callk	kernel_91, $8
		bnot
code_06e8:	pushi	$d7		; 215, move
		pushi	$3		; z
		push0
		lst	temp[$8]
		pushi	$ff		; 255, asInteger
		self	$a
		bnot
		jmp	code_06fc

code_06f8:	ldi	$0
		sat	temp[$2]
code_06fc:	lat	temp[$2]
		ret

Str::strip:
		link	$5
		lap	param[$1]
		sap	param[$1]
		ldi	$0
		sat	temp[$2]
		ldi	$0
		sat	temp[$3]
		lsp	param[$0]
		ldi	$1
		lt?
		bnt	code_071b
		ldi	$5		; scaleY
		sat	temp[$3]
		jmp	code_077d

code_071b:	ldi	$0
		sat	temp[$4]
code_071f:	lst	temp[$4]
		lap	param[$0]
		lt?
		bnt	code_077d
		lat	temp[$4]
		lspi	param[$1]
		dup
		ldi	$87		; 135, left
		eq?
		bnt	code_073c
		lst	temp[$3]
		ldi	$4		; scaleX
		or
		sat	temp[$3]
		jmp	code_0778

code_073c:	dup
		ldi	$88		; 136, right
		eq?
		bnt	code_074c
		lst	temp[$3]
		ldi	$1
		or
		sat	temp[$3]
		jmp	code_0778

code_074c:	dup
		ldi	$73		; 115, 's', center
		eq?
		bnt	code_075b
		lst	temp[$3]
		ldi	$2
		or
		sat	temp[$3]
		jmp	code_0778

code_075b:	dup
		ldi	$74		; 116, 't', all
		eq?
		bnt	code_0767
		ldi	$7		; priority
		sat	temp[$3]
		jmp	code_0778

code_0767:	dup
		ldi	$75		; 117, 'u', show
		eq?
		bnt	code_0778
		lst	temp[$4]
		ldi	$1
		add
		lapi	param[$1]
		sat	temp[$2]
		+at	temp[$4]
code_0778:	toss
		+at	temp[$4]
		jmp	code_071f

code_077d:	lat	temp[$2]
		bnt	code_0790
		pushi	$4		; scaleX
		pushi	$5		; scaleY
		pTos	data
		lst	temp[$3]
		push
		callk	kernel_92, $8
		bnot
		jmp	code_079c

code_0790:	pushi	$3		; z
		pushi	$5		; scaleY
		pTos	data
		lst	temp[$3]
		callk	kernel_92, $6
		bnot
code_079c:	ret

Str::weigh:
		link	$6
		pushi	$4		; scaleX
		push0
		pTos	data
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		push
		pushi	$ff		; 255, asInteger
		callk	kernel_92, $8
		bnot
		ret

Str::callKernel:
		push0
		&rest	$1
		callk	kernel_92, $0
		bnot
code_07bc:	ret

		push2
		push1
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		push
		callk	kernel_92, $4
		bnot
		ret

