Cycle::init:
		lap	param[$0]
		bnt	code_00a2
		lap	param[$1]
		aTop	client
code_00a2:	lag	global[$40]
		aTop	cycleCnt
		ldi	$0
		aTop	completed
		pushi	$161		; 353, lastCel
		push0
		pToa	client
		send	$4
		bnot
		aTop	clientLastCel
		ret

Cycle::nextCel:
		pushi	$10		; 16, cel
		push0
		pToa	client
		send	$4
		bnot
		push
		pToa	cycleDir
		add
		ret

Cycle::cycleDone:
		ret

Cycle::motionCue:
		pushi	$15b		; 347, cycler
		push1
		push0
		pToa	client
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		self	$4
		bnot
		ret

Cycle::dispose:
		pToa	caller
		bnt	code_0100
		pushi	$9f		; 159, add
		push1
		pushi	$cb		; 203, cuee
		push1
		push
		pushi	$9a		; 154, yourself
		push0
		pushi	$8d		; 141, new
		push0
		class	Cue
		send	$4
		bnot
		send	$a
		bnot
		push
		pushi	$ca		; 202, pCuees
		push0
		lag	global[$3]
		send	$4
		bnot
		send	$6
		bnot
code_0100:	pushi	$95		; 149, dispose
		push0
		&rest	$1
		super	Obj, $4
		bnot
		ret

Fwd::doit:
		link	$1
		pushi	$10		; 16, cel
		push0
		pToa	client
		send	$4
		bnot
		push
		pushi	$15f		; 351, nextCel
		push0
		self	$4
		bnot
		sat	temp[$0]
		ne?
		bnt	code_015d
		pTos	clientLastCel
		ldi	$0
		eq?
		bnt	code_012c
		ret

		jmp	code_0146

code_012c:	lst	temp[$0]
		pToa	clientLastCel
		gt?
		bnt	code_013c
		pushi	$160		; 352, cycleDone
		push0
		self	$4
		bnot
		jmp	code_0146

code_013c:	pushi	$10		; 16, cel
		push1
		lst	temp[$0]
		pToa	client
		send	$6
		bnot
code_0146:	pushi	$1007		; 4103, -info-
		push1
		pushi	$1007		; 4103, -info-
		push0
		pToa	client
		send	$4
		bnot
		push
		ldi	$8		; fixPriority
		or
		push
		pToa	client
		send	$6
		bnot
code_015d:	ret

Fwd::cycleDone:
		pushi	$10		; 16, cel
		push1
		push0
		pToa	client
		send	$6
		bnot
		ret

Walk::doit:
		link	$1
		pushi	$162		; 354, isStopped
		push0
		pToa	client
		send	$4
		bnot
		not
		bnt	code_017d
		pushi	$45		; 69, 'E', doit
		push0
		super	Fwd, $4
		bnot
code_017d:	ret

