diff --git a/Script/Script60077.txt b/Script/Script60077.txt
new file mode 100644
index 0000000..0f8af93
--- /dev/null
+++ b/Script/Script60077.txt
@@ -0,0 +1,152 @@
+RandCycle::init:
+		pushi	$94		; 148, init
+		push1
+		lsp	param[$1]
+		super	Cycle, $6
+		bnot
+		lsp	param[$0]
+		ldi	$4		; scaleX
+		ge?
+		bnt	code_0057
+		lap	param[$4]
+		aTop	reset
+code_0057:	pToa	reset
+		bnt	code_0064
+		pushi	$10		; 16, cel
+		push1
+		push0
+		pToa	client
+		send	$6
+		bnot
+code_0064:	push0
+		callk	kernel_121, $0
+		bnot
+		aTop	cycleCnt
+		lsp	param[$0]
+		ldi	$2
+		ge?
+		bnt	code_0097
+		lsp	param[$2]
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_0086
+		push0
+		callk	kernel_121, $0
+		bnot
+		push
+		lap	param[$2]
+		add
+		aTop	count
+		jmp	code_008a
+
+code_0086:	ldi	$ff		; 255, asInteger
+		aTop	count
+code_008a:	lsp	param[$0]
+		ldi	$3		; z
+		ge?
+		bnt	code_009b
+		lap	param[$3]
+		aTop	caller
+		jmp	code_009b
+
+code_0097:	ldi	$ff		; 255, asInteger
+		aTop	count
+code_009b:	ret
+
+RandCycle::doit:
+		link	$1
+		pTos	count
+		push0
+		callk	kernel_121, $0
+		bnot
+		sat	temp[$0]
+		gt?
+		bt	code_00af
+		pTos	count
+		ldi	$ff		; 255, asInteger
+		eq?
+code_00af:	bnt	code_00dc
+		lst	temp[$0]
+		pToa	cycleCnt
+		sub
+		push
+		pushi	$14a		; 330, cycleSpeed
+		push0
+		pToa	client
+		send	$4
+		bnot
+		gt?
+		bnt	code_00f0
+		pushi	$10		; 16, cel
+		push1
+		pushi	$15f		; 351, nextCel
+		push0
+		self	$4
+		bnot
+		push
+		pToa	client
+		send	$6
+		bnot
+		push0
+		callk	kernel_121, $0
+		bnot
+		aTop	cycleCnt
+		jmp	code_00f0
+
+code_00dc:	pToa	reset
+		bnt	code_00e9
+		pushi	$10		; 16, cel
+		push1
+		push0
+		pToa	client
+		send	$6
+		bnot
+code_00e9:	pushi	$160		; 352, cycleDone
+		push0
+		self	$4
+		bnot
+code_00f0:	ret
+
+RandCycle::nextCel:
+		link	$1
+		push1
+		pTos	client
+		callk	kernel_22, $2
+		bnot
+		push
+		ldi	$1
+		ne?
+		bnt	code_0122
+code_0100:	push2
+		push0
+		pushi	$161		; 353, lastCel
+		push0
+		pToa	client
+		send	$4
+		bnot
+		push
+		callk	kernel_60, $4
+		bnot
+		sat	temp[$0]
+		push
+		pushi	$10		; 16, cel
+		push0
+		pToa	client
+		send	$4
+		bnot
+		eq?
+		bnt	code_0120
+		jmp	code_0100
+
+code_0120:	lat	temp[$0]
+code_0122:	ret
+
+RandCycle::cycleDone:
+		ldi	$1
+		aTop	completed
+		pushi	$159		; 345, motionCue
+		push0
+		self	$4
+		bnot
+		ret
+
diff --git a/Script/Script60078.txt b/Script/Script60078.txt
new file mode 100644
index 0000000..1767c40
--- /dev/null
+++ b/Script/Script60078.txt
@@ -0,0 +1,169 @@
+ActiveCursorList::addToFront:
+		pushi	$aa		; 170, addToFront
+		push0
+		&rest	$1
+		super	Set, $4
+		bnot
+		pushi	$45		; 69, 'E', doit
+		push0
+		self	$4
+		bnot
+		ret
+
+ActiveCursorList::delete:
+		pushi	$58		; 88, 'X', delete
+		push0
+		&rest	$1
+		super	Set, $4
+		bnot
+		pushi	$45		; 69, 'E', doit
+		push0
+		self	$4
+		bnot
+		ret
+
+ActiveCursorList::doit:
+		lsg	global[$b]
+		pushi	$4b		; 75, 'K', at
+		push1
+		push0
+		self	$6
+		bnot
+		ne?
+		bnt	code_00aa
+		pushi	$57		; 87, 'W', draw
+		push0
+		pushi	$4b		; 75, 'K', at
+		push1
+		push0
+		self	$6
+		bnot
+		sag	global[$b]
+		send	$4
+		bnot
+code_00aa:	ret
+
+Cursor::init:
+		lap	param[$0]
+		bnt	code_00b5
+		lap	param[$1]
+		aTop	client
+		jmp	code_00ba
+
+code_00b5:	lofsa	ActiveCursorList
+		aTop	client
+code_00ba:	ret
+
+Cursor::dispose:
+		pushi	$1b5		; 437, disable
+		push0
+		self	$4
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		super	Rect, $4
+		bnot
+		ret
+
+Cursor::draw:
+		pushi	$3		; z
+		pTos	view
+		pTos	loop
+		pTos	cel
+		callk	kernel_85, $6
+		bnot
+		ret
+
+Cursor::posn:
+		push2
+		lsp	param[$1]
+		lsp	param[$2]
+		callk	kernel_85, $4
+		bnot
+		ret
+
+Cursor::show:
+		push1
+		lap	param[$0]
+		bnt	code_00eb
+		lap	param[$1]
+		jmp	code_00ed
+
+code_00eb:	ldi	$1
+code_00ed:	push
+		callk	kernel_85, $2
+		bnot
+		ret
+
+Cursor::setCursor:
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_0108
+		lap	param[$1]
+		aTop	view
+		lap	param[$2]
+		aTop	loop
+		lap	param[$3]
+		aTop	cel
+		jmp	code_0126
+
+code_0108:	pushi	$e		; 14, view
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	view
+		pushi	$f		; 15, loop
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	loop
+		pushi	$10		; 16, cel
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	cel
+code_0126:	pTos	loop
+		ldi	$0
+		lt?
+		bnt	code_0138
+		push2
+		lofsa	string_006b	; "setCursor called with loop of %d"
+		push
+		pTos	loop
+		callk	kernel_132, $4
+		bnot
+code_0138:	ret
+
+Cursor::enable:
+		pToa	client
+		bnt	code_0145
+		pushi	$aa		; 170, addToFront
+		push1
+		pushSelf
+		send	$6
+		bnot
+code_0145:	ret
+
+Cursor::disable:
+		pToa	client
+		bnt	code_015f
+		pushi	$5a		; 90, 'Z', size
+		push0
+		send	$4
+		bnot
+		push
+		ldi	$1
+		gt?
+		bnt	code_015f
+		pushi	$58		; 88, 'X', delete
+		push1
+		pushSelf
+		pToa	client
+		send	$6
+		bnot
+code_015f:	ret
+
diff --git a/Script/Script60080.txt b/Script/Script60080.txt
new file mode 100644
index 0000000..483e201
--- /dev/null
+++ b/Script/Script60080.txt
@@ -0,0 +1,61 @@
+EventHandler::handleEvent:
+		link	$2
+		pushi	$5a		; 90, 'Z', size
+		push0
+		self	$4
+		bnot
+		sat	temp[$1]
+		ldi	$0
+		sat	temp[$0]
+code_0060:	lst	temp[$0]
+		lat	temp[$1]
+		lt?
+		bnt	code_0088
+		pushi	$c8		; 200, handleEvent
+		push1
+		lsp	param[$1]
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$0]
+		self	$6
+		bnot
+		send	$6
+		bnot
+		pushi	$50		; 80, 'P', claimed
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		bnt	code_0084
+		jmp	code_0088
+
+code_0084:	+at	temp[$0]
+		jmp	code_0060
+
+code_0088:	pushi	$50		; 80, 'P', claimed
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		ret
+
+Cast::dispose:
+		pToa	plane
+		bnt	code_00a7
+		pushi	$58		; 88, 'X', delete
+		push1
+		pushSelf
+		pushi	$cf		; 207, casts
+		push0
+		send	$4
+		bnot
+		send	$6
+		bnot
+		ldi	$0
+		aTop	plane
+code_00a7:	pushi	$95		; 149, dispose
+		push0
+		super	EventHandler, $4
+		bnot
+		ret
+
diff --git a/Script/Script60081.txt b/Script/Script60081.txt
new file mode 100644
index 0000000..da02047
--- /dev/null
+++ b/Script/Script60081.txt
@@ -0,0 +1,618 @@
+Polygon::new:
+		link	$1
+		pushi	$5b		; 91, '[', points
+		push1
+		pushi	$8d		; 141, new
+		push0
+		class	IntArray
+		send	$4
+		bnot
+		push
+		pushi	$16e		; 366, dynamic
+		push1
+		push1
+		pushi	$8d		; 141, new
+		push0
+		super	Obj, $4
+		bnot
+		sat	temp[$0]
+		send	$c
+		bnot
+		pToa	points
+		bnt	code_0083
+		pushi	$d3		; 211, copy
+		push1
+		pushSelf
+		lat	temp[$0]
+		send	$6
+		bnot
+code_0083:	lat	temp[$0]
+		ret
+
+Polygon::init:
+		link	$2
+		lsp	param[$0]
+		ldi	$2
+		div
+		aTop	size
+		pushi	$d0		; 208, with
+		push1
+		lsp	param[$1]
+		&rest	$2
+		class	IntArray
+		send	$6
+		bnot
+		aTop	points
+		ldi	$1
+		aTop	dynamic
+		ret
+
+Polygon::dispose:
+		pToa	pDispose
+		not
+		bnt	code_00b1
+		push1
+		lofsa	string_0028	; "Polygon being disposed without being tagged for disposal."
+		push
+		callk	kernel_132, $2
+		bnot
+code_00b1:	pToa	dynamic
+		bnt	code_00c2
+		pToa	points
+		bnt	code_00c2
+		pushi	$95		; 149, dispose
+		push0
+		pToa	points
+		send	$4
+		bnot
+code_00c2:	pushi	$95		; 149, dispose
+		push0
+		super	Obj, $4
+		bnot
+		ret
+
+Polygon::onMe:
+		pushi	$3		; z
+		lsp	param[$1]
+		lsp	param[$2]
+		pushSelf
+		callk	kernel_101, $6
+		bnot
+		ret
+
+Polygon::copy:
+		pushi	$d3		; 211, copy
+		push1
+		pushi	$5b		; 91, '[', points
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$6
+		bnot
+		pushi	$5a		; 90, 'Z', size
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	size
+		ret
+
+Polygon::scale:
+		link	$5
+		pToa	size
+		sat	temp[$0]
+		ldi	$0
+		sat	temp[$3]
+		pushi	$4e		; 78, 'N', width
+		lap	param[$1]
+		mul
+		push
+		ldi	$64		; 100, 'd', moveDone
+		div
+		sat	temp[$2]
+		pushi	$8d		; 141, new
+		push0
+		class	LongInt
+		send	$4
+		bnot
+		sat	temp[$4]
+		ldi	$0
+		sat	temp[$1]
+code_0118:	lst	temp[$1]
+		lat	temp[$0]
+		lt?
+		bnt	code_01a5
+		pushi	$b5		; 181, set
+		push1
+		lst	temp[$2]
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$113		; 275, mul
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$3]
+		pToa	points
+		send	$6
+		bnot
+		push
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$115		; 277, div
+		push1
+		pushi	$64		; 100, 'd', moveDone
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$3]
+		pushi	$10d		; 269, lowWord
+		push0
+		lat	temp[$4]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$8
+		bnot
+		+at	temp[$3]
+		pushi	$b5		; 181, set
+		push1
+		lst	temp[$2]
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$113		; 275, mul
+		push1
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$3]
+		pToa	points
+		send	$6
+		bnot
+		push
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$115		; 277, div
+		push1
+		pushi	$64		; 100, 'd', moveDone
+		lat	temp[$4]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$3]
+		pushi	$10d		; 269, lowWord
+		push0
+		lat	temp[$4]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$8
+		bnot
+		+at	temp[$1]
+		+at	temp[$3]
+		jmp	code_0118
+
+code_01a5:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$4]
+		send	$4
+		bnot
+		ret
+
+Polygon::moveBy:
+		link	$3
+		pToa	size
+		sat	temp[$0]
+		ldi	$0
+		sat	temp[$2]
+		ldi	$0
+		sat	temp[$1]
+code_01bd:	lst	temp[$1]
+		lat	temp[$0]
+		lt?
+		bnt	code_01fc
+		pushi	$4b		; 75, 'K', at
+		push2
+		lst	temp[$2]
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$2]
+		pToa	points
+		send	$6
+		bnot
+		push
+		lap	param[$1]
+		add
+		push
+		pToa	points
+		send	$8
+		bnot
+		+at	temp[$2]
+		pushi	$4b		; 75, 'K', at
+		push2
+		push
+		pushi	$4b		; 75, 'K', at
+		push1
+		push
+		pToa	points
+		send	$6
+		bnot
+		push
+		lap	param[$2]
+		add
+		push
+		pToa	points
+		send	$8
+		bnot
+		+at	temp[$1]
+		+at	temp[$2]
+		jmp	code_01bd
+
+code_01fc:	ret
+
+Polygon::display:
+		link	$2
+		pTos	size
+		ldi	$2
+		mul
+		sat	temp[$0]
+		ldi	$0
+		sat	temp[$1]
+code_020a:	lst	temp[$1]
+		lat	temp[$0]
+		lt?
+		bnt	code_021a
+		lst	temp[$1]
+		ldi	$2
+		add
+		sat	temp[$1]
+		jmp	code_020a
+
+code_021a:	ret
+
+Polygon::clipTo:
+		link	$c
+		pToa	size
+		sat	temp[$0]
+		pushi	$8d		; 141, new
+		push0
+		class	Rect
+		send	$4
+		bnot
+		sat	temp[$9]
+		pushi	$d3		; 211, copy
+		push1
+		lsp	param[$1]
+		send	$6
+		bnot
+		pushi	$8d		; 141, new
+		push0
+		class	Line
+		send	$4
+		bnot
+		sat	temp[$5]
+		pushi	$4b		; 75, 'K', at
+		push1
+		push0
+		pToa	points
+		send	$6
+		bnot
+		sat	temp[$1]
+		pushi	$4b		; 75, 'K', at
+		push1
+		push1
+		pToa	points
+		send	$6
+		bnot
+		sat	temp[$2]
+		lat	temp[$1]
+		sat	temp[$3]
+		lat	temp[$2]
+		sat	temp[$4]
+		ldi	$2
+		sat	temp[$a]
+		ldi	$1
+		sat	temp[$8]
+code_0266:	lst	temp[$8]
+		lat	temp[$0]
+		lt?
+		bnt	code_0339
+		pushi	$94		; 148, init
+		pushi	$4		; scaleX
+		lst	temp[$1]
+		lst	temp[$2]
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$a]
+		pToa	points
+		send	$6
+		bnot
+		sat	temp[$6]
+		push
+		pushi	$4b		; 75, 'K', at
+		push1
+		lst	temp[$a]
+		ldi	$1
+		add
+		push
+		pToa	points
+		send	$6
+		bnot
+		sat	temp[$7]
+		push
+		lat	temp[$5]
+		send	$c
+		bnot
+		pushi	$16b		; 363, clip
+		push1
+		lst	temp[$9]
+		lat	temp[$5]
+		send	$6
+		bnot
+		bnt	code_02e2
+		pushi	$4b		; 75, 'K', at
+		pushi	$5		; scaleY
+		lst	temp[$a]
+		ldi	$2
+		sub
+		push
+		pushi	$167		; 359, pX1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$168		; 360, pY1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$169		; 361, pX2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$16a		; 362, pY2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$e
+		bnot
+		jmp	code_0325
+
+code_02e2:	pushi	$16c		; 364, basicClip
+		push1
+		lst	temp[$9]
+		lat	temp[$5]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		pushi	$5		; scaleY
+		lst	temp[$a]
+		ldi	$2
+		sub
+		push
+		pushi	$167		; 359, pX1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$168		; 360, pY1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$169		; 361, pX2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$16a		; 362, pY2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$e
+		bnot
+code_0325:	lat	temp[$6]
+		sat	temp[$1]
+		lat	temp[$7]
+		sat	temp[$2]
+		lst	temp[$a]
+		ldi	$2
+		add
+		sat	temp[$a]
+		+at	temp[$8]
+		jmp	code_0266
+
+code_0339:	pushi	$94		; 148, init
+		pushi	$4		; scaleX
+		lst	temp[$1]
+		lst	temp[$2]
+		lst	temp[$3]
+		lst	temp[$4]
+		lat	temp[$5]
+		send	$c
+		bnot
+		pushi	$16b		; 363, clip
+		push1
+		lst	temp[$9]
+		lat	temp[$5]
+		send	$6
+		bnot
+		bnt	code_0393
+		pushi	$4b		; 75, 'K', at
+		pushi	$5		; scaleY
+		lst	temp[$a]
+		ldi	$2
+		sub
+		push
+		pushi	$167		; 359, pX1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$168		; 360, pY1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$169		; 361, pX2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$16a		; 362, pY2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$e
+		bnot
+		jmp	code_03d6
+
+code_0393:	pushi	$16c		; 364, basicClip
+		push1
+		lst	temp[$9]
+		lat	temp[$5]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		pushi	$5		; scaleY
+		lst	temp[$a]
+		ldi	$2
+		sub
+		push
+		pushi	$167		; 359, pX1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$168		; 360, pY1
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$169		; 361, pX2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pushi	$16a		; 362, pY2
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$e
+		bnot
+code_03d6:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$9]
+		send	$4
+		bnot
+		ldi	$0
+		ret
+
+Polygon::fromRect:
+		pToa	points
+		not
+		bnt	code_03fb
+		pushi	$8d		; 141, new
+		push0
+		class	IntArray
+		send	$4
+		bnot
+		aTop	points
+code_03fb:	pushi	$4b		; 75, 'K', at
+		pushi	$9		; inLeft
+		push0
+		pushi	$87		; 135, left
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$88		; 136, right
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$88		; 136, right
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$8a		; 138, bottom
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$87		; 135, left
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pushi	$8a		; 138, bottom
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pToa	points
+		send	$16
+		bnot
+		ldi	$4		; scaleX
+		aTop	size
+		ret
+
diff --git a/Script/Script60082.txt b/Script/Script60082.txt
new file mode 100644
index 0000000..b3ae029
--- /dev/null
+++ b/Script/Script60082.txt
@@ -0,0 +1,343 @@
+PolyPath::init:
+		link	$22
+		lap	param[$0]
+		bnt	code_0138
+		lap	param[$1]
+		aTop	client
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_0131
+		lsp	param[$0]
+		ldi	$6		; maxScale
+		ge?
+		bnt	code_007c
+		lap	param[$6]
+		aTop	obstacles
+		jmp	code_008c
+
+code_007c:	pToa	obstacles
+		not
+		bnt	code_008c
+		pushi	$16d		; 365, obstacles
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		aTop	obstacles
+code_008c:	pToa	points
+		bnt	code_0097
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_0097:	push0
+		push0
+		pToa	client
+		send	$4
+		bnot
+		sat	temp[$20]
+		pushi	$88		; 136, right
+		push0
+		send	$4
+		bnot
+		push
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$20]
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$1e]
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$20]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		lat	temp[$20]
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$1f]
+		pushi	$9		; inLeft
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		lap	param[$2]
+		aTop	finalX
+		push
+		lap	param[$3]
+		aTop	finalY
+		push
+		pTos	obstacles
+		lst	temp[$1e]
+		lst	temp[$1f]
+		lsp	param[$0]
+		ldi	$5		; scaleY
+		ge?
+		bnt	code_00ff
+		lap	param[$5]
+		jmp	code_0101
+
+code_00ff:	ldi	$2
+code_0101:	push
+		lsg	global[$24]
+		callk	kernel_100, $12
+		bnot
+		sat	temp[$21]
+		pushi	$d3		; 211, copy
+		push1
+		push
+		pushi	$8d		; 141, new
+		push0
+		class	IntArray
+		send	$4
+		bnot
+		aTop	points
+		send	$6
+		bnot
+		push2
+		pushi	$4		; scaleX
+		lst	temp[$21]
+		callk	kernel_91, $4
+		bnot
+		lsp	param[$0]
+		ldi	$3		; z
+		gt?
+		bnt	code_0131
+		lap	param[$4]
+		aTop	caller
+code_0131:	pushi	$157		; 343, setTarget
+		push0
+		self	$4
+		bnot
+code_0138:	pushi	$94		; 148, init
+		push0
+		super	Motion, $4
+		bnot
+		ret
+
+PolyPath::dispose:
+		pToa	points
+		bnt	code_014c
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_014c:	ldi	$0
+		aTop	points
+		pushi	$95		; 149, dispose
+		push0
+		super	Motion, $4
+		bnot
+		ret
+
+PolyPath::setTarget:
+		link	$7
+		pushi	$4b		; 75, 'K', at
+		push1
+		pTos	value
+		pToa	points
+		send	$6
+		bnot
+		push
+		ldi	$7777		; 30583
+		ne?
+		bnt	code_0250
+		pushi	$4b		; 75, 'K', at
+		push1
+		pTos	value
+		pToa	points
+		send	$6
+		bnot
+		aTop	x
+		pushi	$4b		; 75, 'K', at
+		push1
+		ipToa	value
+		push
+		pToa	points
+		send	$6
+		bnot
+		aTop	y
+		ipToa	value
+		push0
+		push0
+		pToa	client
+		send	$4
+		bnot
+		sat	temp[$6]
+		pushi	$88		; 136, right
+		push0
+		send	$4
+		bnot
+		push
+		pushi	$87		; 135, left
+		push0
+		lat	temp[$6]
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$4]
+		pushi	$8a		; 138, bottom
+		push0
+		lat	temp[$6]
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		lat	temp[$6]
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$5]
+		lag	global[$2e]
+		bnt	code_0250
+		pushi	$5a		; 90, 'Z', size
+		push0
+		send	$4
+		bnot
+		bnt	code_0250
+		pushi	$8d		; 141, new
+		push0
+		class	IntArray
+		send	$4
+		bnot
+		sat	temp[$0]
+		pushi	$d3		; 211, copy
+		push1
+		pushi	$9		; inLeft
+		push1
+		push0
+		pToa	client
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		pToa	client
+		send	$4
+		bnot
+		push
+		pTos	x
+		pTos	y
+		lsg	global[$2e]
+		lst	temp[$4]
+		lst	temp[$5]
+		push0
+		lsg	global[$24]
+		callk	kernel_100, $12
+		bnot
+		push
+		lat	temp[$0]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		push1
+		push2
+		lat	temp[$0]
+		send	$6
+		bnot
+		sat	temp[$1]
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$3		; z
+		lat	temp[$0]
+		send	$6
+		bnot
+		sat	temp[$2]
+		pTos	x
+		lat	temp[$1]
+		ne?
+		bt	code_022c
+		pTos	y
+		lat	temp[$2]
+		ne?
+code_022c:	bnt	code_0247
+		lat	temp[$1]
+		aTop	x
+		lat	temp[$2]
+		aTop	y
+		pushi	$4b		; 75, 'K', at
+		push2
+		pTos	value
+		ldi	$2
+		add
+		push
+		pushi	$7777		; 30583
+		pToa	points
+		send	$8
+		bnot
+code_0247:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$0]
+		send	$4
+		bnot
+code_0250:	ret
+
+PolyPath::moveDone:
+		pushi	$4b		; 75, 'K', at
+		push1
+		pTos	value
+		pToa	points
+		send	$6
+		bnot
+		push
+		ldi	$7777		; 30583
+		eq?
+		bnt	code_026b
+		pushi	$64		; 100, 'd', moveDone
+		push0
+		super	Motion, $4
+		bnot
+		jmp	code_0297
+
+code_026b:	push1
+		pTos	client
+		calle	export60000_0, $2
+		bnot
+		bnt	code_028c
+		pushi	$99		; 153, respondsTo
+		push1
+		pushi	$64		; 100, 'd', moveDone
+		pToa	client
+		send	$6
+		bnot
+		bnt	code_028c
+		pushi	$64		; 100, 'd', moveDone
+		push0
+		pToa	client
+		send	$4
+		bnot
+code_028c:	pushi	$157		; 343, setTarget
+		push0
+		pushi	$94		; 148, init
+		push0
+		self	$8
+		bnot
+code_0297:	ret
+