RemapObj::init:
		lap	param[$1]
		aTop	pColor
		lap	param[$2]
		aTop	pPercent
		pushi	$3		; z
		push2
		lsp	param[$1]
		push
		callk	kernel_110, $6
		bnot
		ret

RemapObj::dispose:
		push2
		push0
		pTos	pColor
		callk	kernel_110, $4
		bnot
		pushi	$95		; 149, dispose
		push0
		super	Obj, $4
		bnot
		ret

Remaps::add:
		link	$1
		pushi	$a1		; 161, firstEqual
		push2
		pushi	$330		; 816, pColor
		lsp	param[$1]
		self	$8
		bnot
		sat	temp[$0]
		bnt	code_00c1
		lsp	param[$2]
		pushi	$331		; 817, pPercent
		push0
		send	$4
		bnot
		ne?
		bnt	code_00a8
		pushi	$3		; z
		lofsa	string_004b	; "Remaps::add ( %d, %d ): color overwrite"
		push
		lsp	param[$1]
		lsp	param[$2]
		callk	kernel_132, $6
		bnot
code_00a8:	pushi	$332		; 818, pCount
		push1
		pushi	$332		; 818, pCount
		push0
		lat	temp[$0]
		send	$4
		bnot
		push
		ldi	$1
		add
		push
		lat	temp[$0]
		send	$6
		bnot
		jmp	code_00e1

code_00c1:	pushi	$94		; 148, init
		push2
		lsp	param[$1]
		lsp	param[$2]
		pushi	$8d		; 141, new
		push0
		class	RemapObj
		send	$4
		bnot
		sat	temp[$0]
		send	$8
		bnot
		pushi	$9f		; 159, add
		push1
		lst	temp[$0]
		super	List, $6
		bnot
code_00e1:	ret

Remaps::delete:
		link	$1
		pushi	$a1		; 161, firstEqual
		push2
		pushi	$330		; 816, pColor
		lsp	param[$1]
		self	$8
		bnot
		sat	temp[$0]
		bnt	code_0127
		pushi	$332		; 818, pCount
		push1
		pushi	$332		; 818, pCount
		push0
		send	$4
		bnot
		push
		ldi	$1
		sub
		push
		lat	temp[$0]
		send	$6
		bnot
		pushi	$332		; 818, pCount
		push0
		lat	temp[$0]
		send	$4
		bnot
		not
		bnt	code_0127
		pushi	$95		; 149, dispose
		push0
		lat	temp[$0]
		send	$4
		bnot
		pushi	$58		; 88, 'X', delete
		push1
		lst	temp[$0]
		super	List, $6
		bnot
code_0127:	ret

