diff --git a/Script/Script60032.txt b/Script/Script60032.txt
new file mode 100644
index 0000000..33a46fe
--- /dev/null
+++ b/Script/Script60032.txt
@@ -0,0 +1,545 @@
+View::init:
+		link	$1
+		pTos	signal
+		ldi	$f7		; 247, cat
+		and
+		aTop	signal
+		pushi	$94		; 148, init
+		push0
+		&rest	$1
+		super	Feature, $4
+		bnot
+		pTos	view
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_00fc
+		pTos	signal
+		ldi	$20		; 32, ' ', name
+		and
+		bnt	code_00fc
+		push2
+		pushi	$80		; 128, lastKey
+		pTos	view
+		callk	kernel_5, $4
+		bnot
+		bnt	code_00fc
+		pushi	$19c		; 412, doBaseRect
+		push0
+		self	$4
+		bnot
+code_00fc:	pToa	plane
+		bnt	code_010d
+		pTos	view
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_010d
+		push1
+		pushSelf
+		callk	kernel_20, $2
+		bnot
+code_010d:	ret
+
+View::dispose:
+		link	$1
+		ldi	$0
+		aTop	clut
+		pushi	$95		; 149, dispose
+		push0
+		super	Feature, $4
+		bnot
+		ret
+
+View::doit:
+		pTos	signal
+		ldi	$8000		; -32768
+		and
+		bnt	code_0138
+		pushi	$7		; priority
+		pushSelf
+		pTos	view
+		pTos	loop
+		pTos	cel
+		pTos	x
+		pTos	y
+		pTos	z
+		callk	kernel_26, $e
+		bnot
+code_0138:	pTos	-info-
+		ldi	$8		; fixPriority
+		and
+		bnt	code_0155
+		pushi	$17c		; 380, isNotHidden
+		push0
+		self	$4
+		bnot
+		bnt	code_0155
+		push1
+		pushSelf
+		callk	kernel_32, $2
+		bnot
+		pTos	-info-
+		ldi	$f7		; 247, cat
+		and
+		aTop	-info-
+code_0155:	ret
+
+View::posn:
+		lsp	param[$0]
+		ldi	$1
+		ge?
+		bnt	code_0177
+		lap	param[$1]
+		aTop	x
+		lsp	param[$0]
+		ldi	$2
+		ge?
+		bnt	code_0177
+		lap	param[$2]
+		aTop	y
+		lsp	param[$0]
+		ldi	$3		; z
+		ge?
+		bnt	code_0177
+		lap	param[$3]
+		aTop	z
+code_0177:	pTos	-info-
+		ldi	$8		; fixPriority
+		or
+		aTop	-info-
+		pTos	signal
+		ldi	$20		; 32, ' ', name
+		and
+		bnt	code_018c
+		pushi	$19c		; 412, doBaseRect
+		push0
+		self	$4
+		bnot
+code_018c:	ret
+
+View::setLoop:
+		lsp	param[$0]
+		ldi	$0
+		eq?
+		bnt	code_019e
+		pTos	signal
+		ldi	$800		; 2048, BAD SELECTOR
+		or
+		aTop	signal
+		jmp	code_01d0
+
+code_019e:	lsp	param[$1]
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_01af
+		pTos	signal
+		ldi	$f7ff		; -2049
+		and
+		aTop	signal
+		jmp	code_01d0
+
+code_01af:	lap	param[$1]
+		aTop	loop
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_01d0
+		lap	param[$2]
+		bnt	code_01c8
+		pTos	signal
+		ldi	$800		; 2048, BAD SELECTOR
+		or
+		aTop	signal
+		jmp	code_01d0
+
+code_01c8:	pTos	signal
+		ldi	$f7ff		; -2049
+		and
+		aTop	signal
+code_01d0:	ret
+
+View::setCel:
+		lap	param[$1]
+		aTop	cel
+		ret
+
+View::ignoreActors:
+		push0
+		lap	param[$0]
+		eq?
+		bt	code_01de
+		lap	param[$1]
+code_01de:	bnt	code_01ea
+		pTos	signal
+		ldi	$4000		; 16384
+		or
+		aTop	signal
+		jmp	code_01f2
+
+code_01ea:	pTos	signal
+		ldi	$bfff		; -16385
+		and
+		aTop	signal
+code_01f2:	ret
+
+View::lastLoop:
+		push1
+		pushSelf
+		callk	kernel_21, $2
+		bnot
+		push
+		ldi	$1
+		sub
+		ret
+
+View::lastCel:
+		push1
+		pushSelf
+		callk	kernel_22, $2
+		bnot
+		push
+		ldi	$1
+		sub
+		ret
+
+View::motionCue:
+		ret
+
+View::checkDetail:
+		ret
+
+View::onMe:
+		link	$2
+		lsp	param[$0]
+		ldi	$1
+		eq?
+		bnt	code_0228
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$0]
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$1]
+		jmp	code_0230
+
+code_0228:	lap	param[$1]
+		sat	temp[$0]
+		lap	param[$2]
+		sat	temp[$1]
+code_0230:	pTos	signal
+		ldi	$8		; fixPriority
+		and
+		bnt	code_023b
+		ldi	$0
+		jmp	code_0260
+
+code_023b:	pToa	onMeCheck
+		not
+		bnt	code_0254
+		pushi	$4		; scaleX
+		lst	temp[$0]
+		lst	temp[$1]
+		pushSelf
+		pTos	signal
+		ldi	$1000		; 4096, -objID-
+		and
+		push
+		callk	kernel_23, $8
+		bnot
+		jmp	code_0260
+
+code_0254:	pushi	$eb		; 235, onMe
+		push2
+		lst	temp[$0]
+		lst	temp[$1]
+		super	Feature, $8
+		bnot
+code_0260:	ret
+
+View::setScale:
+		link	$6
+		lap	param[$0]
+		not
+		bnt	code_0279
+		pTos	scaleSignal
+		ldi	$1
+		or
+		aTop	scaleSignal
+		pTos	scaleSignal
+		ldi	$fd		; 253, strip
+		and
+		aTop	scaleSignal
+		jmp	code_037b
+
+code_0279:	lsp	param[$0]
+		ldi	$5		; scaleY
+		eq?
+		bnt	code_02b9
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$5]
+		pTos	scaleSignal
+		ldi	$1
+		or
+		aTop	scaleSignal
+		pTos	scaleSignal
+		ldi	$fd		; 253, strip
+		and
+		aTop	scaleSignal
+		pushi	$94		; 148, init
+		pushi	$5		; scaleY
+		pushSelf
+		lsp	param[$2]
+		lsp	param[$3]
+		lsp	param[$4]
+		lsp	param[$5]
+		lat	temp[$5]
+		send	$e
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		lat	temp[$5]
+		send	$4
+		bnot
+		jmp	code_037b
+
+code_02b9:	lsp	param[$0]
+		ldi	$2
+		eq?
+		bnt	code_031a
+		pushi	$3		; z
+		pTos	view
+		pTos	loop
+		pTos	cel
+		callk	kernel_28, $6
+		bnot
+		sat	temp[$3]
+		pushi	$3		; z
+		pTos	view
+		pTos	loop
+		pTos	cel
+		callk	kernel_29, $6
+		bnot
+		sat	temp[$4]
+		lsp	param[$1]
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_02e7
+		lat	temp[$3]
+		sap	param[$1]
+code_02e7:	lsp	param[$2]
+		ldi	$ff		; 255, asInteger
+		eq?
+		bnt	code_02f2
+		lat	temp[$4]
+		sap	param[$2]
+code_02f2:	lsp	param[$1]
+		ldi	$80		; 128, lastKey
+		mul
+		push
+		lat	temp[$3]
+		div
+		aTop	scaleX
+		lsp	param[$2]
+		ldi	$80		; 128, lastKey
+		mul
+		push
+		lat	temp[$4]
+		div
+		aTop	scaleY
+		pTos	scaleSignal
+		ldi	$1
+		or
+		aTop	scaleSignal
+		push1
+		pushSelf
+		callk	kernel_32, $2
+		bnot
+		jmp	code_037b
+
+code_031a:	lap	param[$1]
+		not
+		bnt	code_0328
+		pTos	scaleSignal
+		ldi	$fc		; 252, getToken
+		and
+		aTop	scaleSignal
+		jmp	code_037b
+
+code_0328:	lsp	param[$1]
+		pushi	$6c		; 108, 'l', vanishingY
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		lt?
+		bnt	code_0345
+		push2
+		lofsa	string_007c	; "<%s setScale:> y value less than vanishingY"
+		push
+		pTos	name
+		calle	export60029_1, $4
+		bnot
+		jmp	code_037b
+
+code_0345:	lsp	param[$1]
+		pushi	$6c		; 108, 'l', vanishingY
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		sub
+		sat	temp[$0]
+		pushi	$be		; 190, seconds
+		lap	param[$1]
+		sub
+		sat	temp[$1]
+		push
+		ldi	$64		; 100, 'd', moveDone
+		mul
+		push
+		lat	temp[$0]
+		div
+		push
+		ldi	$64		; 100, 'd', moveDone
+		add
+		sat	temp[$2]
+		pTos	scaleSignal
+		ldi	$3		; z
+		or
+		aTop	scaleSignal
+		lst	temp[$2]
+		ldi	$80		; 128, lastKey
+		mul
+		push
+		ldi	$64		; 100, 'd', moveDone
+		div
+		aTop	maxScale
+code_037b:	ret
+
+View::setMagnifier:
+		pTos	signal
+		ldi	$8		; fixPriority
+		and
+		not
+		bnt	code_03a5
+		pToa	magnifier
+		bnt	code_038f
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_038f:	lap	param[$0]
+		bnt	code_03a5
+		lap	param[$1]
+		bnt	code_03a5
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		lap	param[$1]
+		aTop	magnifier
+		send	$6
+		bnot
+code_03a5:	ret
+
+View::celRect:
+		pushi	$e7		; 231, celRect
+		pushi	$6		; maxScale
+		pTos	view
+		pTos	loop
+		pTos	cel
+		pTos	x
+		pTos	y
+		pTos	z
+		lap	param[$1]
+		send	$10
+		bnot
+		ret
+
+View::doBaseRect:
+		pToa	baseSetter
+		bnt	code_03cb
+		pushi	$45		; 69, 'E', doit
+		push1
+		pushSelf
+		send	$6
+		bnot
+		jmp	code_03d1
+
+code_03cb:	push1
+		pushSelf
+		callk	kernel_94, $2
+		bnot
+code_03d1:	ret
+
+View::setSignal:
+		link	$1
+		lsp	param[$0]
+		ldi	$1
+		gt?
+		bnt	code_03df
+		lap	param[$2]
+		jmp	code_03e1
+
+code_03df:	ldi	$1
+code_03e1:	sat	temp[$0]
+		bnt	code_03ee
+		pTos	signal
+		lap	param[$1]
+		or
+		aTop	signal
+		jmp	code_03f6
+
+code_03ee:	pTos	signal
+		lap	param[$1]
+		bnot
+		and
+		aTop	signal
+code_03f6:	ret
+
+View::dragDoit:
+		push1
+		pushSelf
+		callk	kernel_20, $2
+		bnot
+		pushi	$dc		; 220, posn
+		push2
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pTos	x
+		pToa	left
+		sub
+		add
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		pTos	y
+		pToa	top
+		sub
+		add
+		push
+		self	$8
+		bnot
+		push1
+		pushSelf
+		callk	kernel_32, $2
+		bnot
+		ret
+
diff --git a/Script/Script60033.txt b/Script/Script60033.txt
new file mode 100644
index 0000000..e5cbf4f
--- /dev/null
+++ b/Script/Script60033.txt
@@ -0,0 +1,212 @@
+Prop::dispose:
+		pushi	$c9		; 201, setScript
+		push1
+		push0
+		pushi	$105		; 261, setCycle
+		push1
+		push0
+		self	$c
+		bnot
+		pToa	timer
+		bnt	code_00c8
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_00c8:	pToa	scaler
+		bnt	code_00d7
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	scaler
+code_00d7:	pushi	$95		; 149, dispose
+		push0
+		super	View, $4
+		bnot
+		ret
+
+Prop::doit:
+		link	$1
+		pToa	script
+		bnt	code_00ec
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_00ec:	pTos	signal
+		ldi	$1
+		and
+		bnt	code_0107
+		pToa	cycler
+		bnt	code_00fd
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_00fd:	pToa	scaler
+		bnt	code_0107
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_0107:	pushi	$45		; 69, 'E', doit
+		push0
+		super	View, $4
+		bnot
+		ret
+
+Prop::handleEvent:
+		pushi	$c8		; 200, handleEvent
+		push1
+		lsp	param[$1]
+		&rest	$2
+		super	View, $6
+		bnot
+		pushi	$50		; 80, 'P', claimed
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		ret
+
+Prop::setCycle:
+		pToa	cycler
+		bnt	code_012f
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_012f:	lap	param[$1]
+		bnt	code_015e
+		pushi	$1007		; 4103, -info-
+		push0
+		send	$4
+		bnot
+		push
+		ldi	$8000		; -32768
+		and
+		bnt	code_014c
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		jmp	code_014e
+
+code_014c:	lap	param[$1]
+code_014e:	aTop	cycler
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		pToa	cycler
+		send	$6
+		bnot
+		jmp	code_0162
+
+code_015e:	ldi	$0
+		aTop	cycler
+code_0162:	ret
+
+Prop::setLoop:
+		link	$1
+		pToa	loop
+		sat	temp[$0]
+		pushi	$195		; 405, setLoop
+		push0
+		&rest	$1
+		super	View, $4
+		bnot
+		pToa	cycler
+		bnt	code_018f
+		lst	temp[$0]
+		pToa	loop
+		ne?
+		bnt	code_018f
+		pushi	$15e		; 350, clientLastCel
+		push1
+		pushi	$161		; 353, lastCel
+		push0
+		self	$4
+		bnot
+		push
+		pToa	cycler
+		send	$6
+		bnot
+code_018f:	ret
+
+Prop::cue:
+		pToa	script
+		bnt	code_019b
+		pushi	$c7		; 199, cue
+		push0
+		send	$4
+		bnot
+code_019b:	ret
+
+Prop::setScript:
+		pToa	script
+		bnt	code_01a7
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_01a7:	lap	param[$1]
+		bnt	code_01b5
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		send	$6
+		bnot
+code_01b5:	ret
+
+Prop::motionCue:
+		pToa	cycler
+		bnt	code_01cc
+		pushi	$154		; 340, completed
+		push0
+		send	$4
+		bnot
+		bnt	code_01cc
+		pushi	$159		; 345, motionCue
+		push0
+		pToa	cycler
+		send	$4
+		bnot
+code_01cc:	ret
+
+Prop::checkDetail:
+		pToa	detailLevel
+		not
+		bnt	code_01d4
+		jmp	code_01fb
+
+code_01d4:	lap	param[$0]
+		bnt	code_01dc
+		lap	param[$1]
+		jmp	code_01e5
+
+code_01dc:	pushi	$19e		; 414, detailLevel
+		push0
+		lag	global[$2]
+		send	$4
+		bnot
+code_01e5:	push
+		pToa	detailLevel
+		lt?
+		bnt	code_01f4
+		pTos	signal
+		ldi	$fe		; 254, strIndex
+		and
+		aTop	signal
+		jmp	code_01fb
+
+code_01f4:	pTos	signal
+		ldi	$1
+		or
+		aTop	signal
+code_01fb:	ret
+
diff --git a/Script/Script60034.txt b/Script/Script60034.txt
new file mode 100644
index 0000000..60e381a
--- /dev/null
+++ b/Script/Script60034.txt
@@ -0,0 +1,1206 @@
+Act::init:
+		pushi	$94		; 148, init
+		push0
+		&rest	$1
+		super	Prop, $4
+		bnot
+		pToa	x
+		aTop	xLast
+		pToa	y
+		aTop	yLast
+		ret
+
+Act::dispose:
+		pTos	mover
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_0120
+		pushi	$15c		; 348, setMotion
+		push1
+		push0
+		self	$6
+		bnot
+code_0120:	pushi	$1a4		; 420, setAvoider
+		push1
+		push0
+		self	$6
+		bnot
+		pToa	baseSetter
+		bnt	code_0137
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	baseSetter
+code_0137:	pToa	looper
+		bnt	code_0146
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	looper
+code_0146:	pToa	viewer
+		bnt	code_0155
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	viewer
+code_0155:	pToa	blocks
+		bnt	code_0164
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	blocks
+code_0164:	pToa	code
+		bnt	code_0173
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	code
+code_0173:	pushi	$95		; 149, dispose
+		push0
+		super	Prop, $4
+		bnot
+		ret
+
+Act::doit:
+		link	$4
+		pToa	script
+		bnt	code_0188
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_0188:	pTos	signal
+		ldi	$1
+		and
+		bnt	code_0275
+		pToa	mover
+		bnt	code_019a
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_019a:	pToa	cycler
+		bnt	code_01a4
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_01a4:	pTos	-info-
+		ldi	$8		; fixPriority
+		and
+		bnt	code_0275
+		pTos	cel
+		ldi	$0
+		lt?
+		bnt	code_01b7
+		ldi	$0
+		aTop	cel
+code_01b7:	pTos	scaleSignal
+		ldi	$1
+		and
+		bnt	code_0240
+		pToa	scaleX
+		sat	temp[$3]
+		pToa	scaler
+		bnt	code_01cd
+		pushi	$45		; 69, 'E', doit
+		push0
+		send	$4
+		bnot
+code_01cd:	pushi	$17c		; 380, isNotHidden
+		push0
+		self	$4
+		bnot
+		bnt	code_01dd
+		pushi	$1ad		; 429, update
+		push0
+		self	$4
+		bnot
+code_01dd:	ldi	$0
+		bnt	code_0250
+		pTos	scaleSignal
+		ldi	$4		; scaleX
+		and
+		not
+		bnt	code_0250
+		pTos	scaleX
+		lat	temp[$3]
+		ne?
+		bnt	code_0250
+		pTos	origStep
+		ldi	$8		; fixPriority
+		shr
+		push
+		pToa	scaleX
+		mul
+		push
+		ldi	$80		; 128, lastKey
+		div
+		sat	temp[$2]
+		bnt	code_0205
+		jmp	code_0207
+
+code_0205:	ldi	$1
+code_0207:	sat	temp[$0]
+		pTos	origStep
+		ldi	$ff		; 255, asInteger
+		and
+		push
+		pToa	scaleY
+		mul
+		push
+		ldi	$80		; 128, lastKey
+		div
+		sat	temp[$2]
+		bnt	code_021e
+		jmp	code_0220
+
+code_021e:	ldi	$1
+code_0220:	sat	temp[$1]
+		lst	temp[$0]
+		pToa	xStep
+		ne?
+		bt	code_022e
+		lst	temp[$1]
+		pToa	yStep
+		ne?
+code_022e:	bnt	code_0250
+		pushi	$1a9		; 425, setStep
+		pushi	$3		; z
+		lst	temp[$0]
+		lst	temp[$1]
+		push1
+		self	$a
+		bnot
+		jmp	code_0250
+
+code_0240:	pushi	$17c		; 380, isNotHidden
+		push0
+		self	$4
+		bnot
+		bnt	code_0250
+		pushi	$1ad		; 429, update
+		push0
+		self	$4
+		bnot
+code_0250:	pTos	signal
+		ldi	$20		; 32, ' ', name
+		and
+		not
+		bnt	code_025a
+		jmp	code_026d
+
+code_025a:	pToa	baseSetter
+		bnt	code_0267
+		pushi	$45		; 69, 'E', doit
+		push1
+		pushSelf
+		send	$6
+		bnot
+		jmp	code_026d
+
+code_0267:	push1
+		pushSelf
+		callk	kernel_94, $2
+		bnot
+code_026d:	pToa	x
+		aTop	xLast
+		pToa	y
+		aTop	yLast
+code_0275:	ret
+
+Act::posn:
+		pushi	$dc		; 220, posn
+		push2
+		lsp	param[$1]
+		lsp	param[$2]
+		&rest	$3		; z
+		super	Prop, $8
+		bnot
+		lap	param[$1]
+		aTop	xLast
+		lap	param[$2]
+		aTop	yLast
+		ret
+
+Act::setMotion:
+		pToa	mover
+		bnt	code_02a0
+		push
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_02a0
+		pushi	$95		; 149, dispose
+		push0
+		pToa	mover
+		send	$4
+		bnot
+code_02a0:	lap	param[$1]
+		bnt	code_02ca
+		pushi	$96		; 150, isClass
+		push0
+		send	$4
+		bnot
+		bnt	code_02b8
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		jmp	code_02ba
+
+code_02b8:	lap	param[$1]
+code_02ba:	aTop	mover
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		pToa	mover
+		send	$6
+		bnot
+		jmp	code_02ce
+
+code_02ca:	ldi	$0
+		aTop	mover
+code_02ce:	ret
+
+Act::setAvoider:
+		pToa	avoider
+		bnt	code_02da
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+code_02da:	lap	param[$1]
+		bnt	code_02f7
+		pushi	$1007		; 4103, -info-
+		push0
+		send	$4
+		bnot
+		push
+		ldi	$8000		; -32768
+		and
+		bnt	code_02f7
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		jmp	code_02f9
+
+code_02f7:	lap	param[$1]
+code_02f9:	aTop	avoider
+		pToa	avoider
+		bnt	code_0309
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		send	$6
+		bnot
+code_0309:	ret
+
+Act::isStopped:
+		pToa	mover
+		not
+		bt	code_0329
+		pTos	x
+		pushi	$155		; 341, xLast
+		push0
+		pToa	mover
+		send	$4
+		bnot
+		eq?
+		bnt	code_0329
+		pTos	y
+		pushi	$151		; 337, yLast
+		push0
+		pToa	mover
+		send	$4
+		bnot
+		eq?
+code_0329:	ret
+
+Act::isBlocked:
+		pTos	signal
+		ldi	$400		; 1024, pEndurance
+		and
+		ret
+
+Act::ignoreHorizon:
+		lap	param[$0]
+		not
+		bt	code_0338
+		lap	param[$1]
+code_0338:	bnt	code_0344
+		pTos	signal
+		ldi	$2000		; 8192
+		or
+		aTop	signal
+		jmp	code_034c
+
+code_0344:	pTos	signal
+		ldi	$dfff		; -8193
+		and
+		aTop	signal
+code_034c:	ret
+
+Act::observeBlocks:
+		pToa	blocks
+		not
+		bnt	code_035d
+		pushi	$8d		; 141, new
+		push0
+		class	Set
+		send	$4
+		bnot
+		aTop	blocks
+code_035d:	pushi	$9f		; 159, add
+		push0
+		&rest	$1
+		pToa	blocks
+		send	$4
+		bnot
+		ret
+
+Act::ignoreBlocks:
+		pToa	blocks
+		bnt	code_038d
+		pushi	$58		; 88, 'X', delete
+		push0
+		&rest	$1
+		send	$4
+		bnot
+		pushi	$a4		; 164, isEmpty
+		push0
+		pToa	blocks
+		send	$4
+		bnot
+		bnt	code_038d
+		pushi	$95		; 149, dispose
+		push0
+		pToa	blocks
+		send	$4
+		bnot
+		ldi	$0
+		aTop	blocks
+code_038d:	ret
+
+Act::distanceTo:
+		pushi	$5		; scaleY
+		pTos	x
+		pTos	y
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		lsg	global[$3f]
+		callk	kernel_64, $a
+		bnot
+		ret
+
+Act::cantBeHere:
+		link	$1
+		ldi	$0
+		ret
+
+		pTos	signal
+		ldi	$20		; 32, ' ', name
+		and
+		not
+		bnt	code_03ba
+		jmp	code_03cd
+
+code_03ba:	pToa	baseSetter
+		bnt	code_03c7
+		pushi	$45		; 69, 'E', doit
+		push1
+		pushSelf
+		send	$6
+		bnot
+		jmp	code_03cd
+
+code_03c7:	push1
+		pushSelf
+		callk	kernel_94, $2
+		bnot
+code_03cd:	push2
+		pushSelf
+		pushi	$24		; 36, '$', elements
+		push0
+		pushi	$f2		; 242, pCast
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		send	$4
+		bnot
+		push
+		callk	kernel_96, $4
+		bnot
+		bnt	code_03e7
+		jmp	code_0417
+
+code_03e7:	pTos	signal
+		ldi	$2000		; 8192
+		and
+		not
+		bnt	code_0404
+		lag	global[$3]
+		bnt	code_0404
+		pTos	y
+		pushi	$1ae		; 430, horizon
+		push0
+		send	$4
+		bnot
+		lt?
+		bnt	code_0404
+		ldi	$ff		; 255, asInteger
+		jmp	code_0417
+
+code_0404:	pToa	blocks
+		bnt	code_0417
+		pushi	$a2		; 162, allTrue
+		push2
+		pushi	$45		; 69, 'E', doit
+		pushSelf
+		send	$8
+		bnot
+		not
+		bnt	code_0417
+		ldi	$fe		; 254, strIndex
+code_0417:	sat	temp[$0]
+		ret
+
+Act::inRect:
+		lsp	param[$0]
+		ldi	$1
+		eq?
+		bnt	code_0430
+		pushi	$a3		; 163, contains
+		push2
+		pTos	x
+		pTos	y
+		lap	param[$1]
+		send	$8
+		bnot
+		jmp	code_044a
+
+code_0430:	lsp	param[$1]
+		pToa	x
+		le?
+		bnt	code_044a
+		pTos	x
+		lap	param[$3]
+		lt?
+		bnt	code_044a
+		lsp	param[$2]
+		pToa	y
+		le?
+		bnt	code_044a
+		pTos	y
+		lap	param[$4]
+		lt?
+code_044a:	ret
+
+Act::setStep:
+		link	$2
+		pTos	origStep
+		ldi	$8		; fixPriority
+		shr
+		sat	temp[$0]
+		pTos	origStep
+		ldi	$ff		; 255, asInteger
+		and
+		sat	temp[$1]
+		lsp	param[$0]
+		ldi	$1
+		ge?
+		bnt	code_046e
+		lsp	param[$1]
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_046e
+		lap	param[$1]
+		sat	temp[$0]
+code_046e:	lsp	param[$0]
+		ldi	$2
+		ge?
+		bnt	code_0480
+		lsp	param[$2]
+		ldi	$ff		; 255, asInteger
+		ne?
+		bnt	code_0480
+		lap	param[$2]
+		sat	temp[$1]
+code_0480:	lsp	param[$0]
+		ldi	$3		; z
+		lt?
+		bt	code_048a
+		lap	param[$3]
+		not
+code_048a:	bnt	code_0497
+		lst	temp[$0]
+		ldi	$8		; fixPriority
+		shl
+		push
+		lat	temp[$1]
+		add
+		aTop	origStep
+code_0497:	lat	temp[$0]
+		aTop	xStep
+		lat	temp[$1]
+		aTop	yStep
+		pToa	mover
+		bnt	code_04c8
+		pushi	$98		; 152, isMemberOf
+		push1
+		class	MoveTo
+		push
+		pToa	mover
+		send	$6
+		bnot
+		bt	code_04bd
+		pushi	$98		; 152, isMemberOf
+		push1
+		class	PolyPath
+		push
+		pToa	mover
+		send	$6
+		bnot
+code_04bd:	bnt	code_04c8
+		pushi	$94		; 148, init
+		push0
+		pToa	mover
+		send	$4
+		bnot
+code_04c8:	ret
+
+Act::setDirection:
+		link	$c
+		pushi	$6c		; 108, 'l', vanishingY
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		sat	temp[$1]
+		push
+		ldi	$8ad0		; -30000
+		eq?
+		bnt	code_04e0
+		pToa	x
+		jmp	code_04e8
+
+code_04e0:	pushi	$6b		; 107, 'k', vanishingX
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+code_04e8:	sat	temp[$0]
+		pTos	xStep
+		ldi	$0
+		eq?
+		bnt	code_04f9
+		pTos	yStep
+		ldi	$0
+		eq?
+		bnt	code_04f9
+		ret
+
+code_04f9:	pushi	$7d00		; 32000
+		push2
+		pTos	xStep
+		pTos	yStep
+		calle	export60025_3, $4
+		bnot
+		div
+		sat	temp[$5]
+		lsp	param[$1]
+		dup
+		ldi	$0
+		eq?
+		bnt	code_051f
+		pushi	$15c		; 348, setMotion
+		push1
+		push0
+		self	$6
+		bnot
+		ret
+
+		jmp	code_05b9
+
+code_051f:	dup
+		ldi	$1
+		eq?
+		bnt	code_0536
+		lst	temp[$0]
+		pToa	x
+		sub
+		sat	temp[$2]
+		lst	temp[$1]
+		pToa	y
+		sub
+		sat	temp[$3]
+		jmp	code_05b9
+
+code_0536:	dup
+		ldi	$5		; scaleY
+		eq?
+		bnt	code_054d
+		pTos	x
+		lat	temp[$0]
+		sub
+		sat	temp[$2]
+		pTos	y
+		lat	temp[$1]
+		sub
+		sat	temp[$3]
+		jmp	code_05b9
+
+code_054d:	dup
+		ldi	$3		; z
+		eq?
+		bnt	code_055e
+		lat	temp[$5]
+		sat	temp[$2]
+		ldi	$0
+		sat	temp[$3]
+		jmp	code_05b9
+
+code_055e:	dup
+		ldi	$7		; priority
+		eq?
+		bnt	code_0570
+		lat	temp[$5]
+		neg
+		sat	temp[$2]
+		ldi	$0
+		sat	temp[$3]
+		jmp	code_05b9
+
+code_0570:	pushi	$b4		; 180, end
+		pushi	$4		; scaleX
+		pTos	x
+		pTos	y
+		lst	temp[$0]
+		lst	temp[$1]
+		callk	kernel_63, $8
+		bnot
+		sat	temp[$4]
+		lt?
+		bnt	code_058e
+		lst	temp[$4]
+		ldi	$168		; 360, pY1
+		sub
+		sat	temp[$4]
+code_058e:	lst	temp[$4]
+		ldi	$5a		; 90, 'Z', size
+		add
+		push
+		ldi	$2
+		div
+		push
+		pushi	$2d		; 45, '-', cursor
+		lsp	param[$1]
+		ldi	$2
+		sub
+		mul
+		add
+		sat	temp[$4]
+		push2
+		push
+		pushi	$64		; 100, 'd', moveDone
+		callk	kernel_66, $4
+		bnot
+		sat	temp[$2]
+		push2
+		lst	temp[$4]
+		pushi	$64		; 100, 'd', moveDone
+		callk	kernel_67, $4
+		bnot
+		neg
+		sat	temp[$3]
+code_05b9:	toss
+		lst	temp[$5]
+		ldi	$5		; scaleY
+		div
+		sat	temp[$5]
+code_05c1:	push1
+		lst	temp[$3]
+		callk	kernel_61, $2
+		bnot
+		push
+		lat	temp[$5]
+		lt?
+		bnt	code_05eb
+		push1
+		lst	temp[$2]
+		callk	kernel_61, $2
+		bnot
+		push
+		lat	temp[$5]
+		lt?
+		bnt	code_05eb
+		lst	temp[$2]
+		ldi	$5		; scaleY
+		mul
+		sat	temp[$2]
+		lst	temp[$3]
+		ldi	$5		; scaleY
+		mul
+		sat	temp[$3]
+		jmp	code_05c1
+
+code_05eb:	pushi	$16d		; 365, obstacles
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		sat	temp[$7]
+		bnt	code_06f9
+		lag	global[$4b]
+		bnt	code_06f9
+		pushi	$8d		; 141, new
+		push0
+		class	IntArray
+		send	$4
+		bnot
+		sat	temp[$6]
+		pushi	$88		; 136, right
+		push0
+		pToa	plane
+		send	$4
+		bnot
+		push
+		pushi	$87		; 135, left
+		push0
+		pToa	plane
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$a]
+		pushi	$8a		; 138, bottom
+		push0
+		pToa	plane
+		send	$4
+		bnot
+		push
+		pushi	$89		; 137, top
+		push0
+		pToa	plane
+		send	$4
+		bnot
+		sub
+		push
+		ldi	$1
+		add
+		sat	temp[$b]
+		pushi	$d3		; 211, copy
+		push1
+		pushi	$8		; fixPriority
+		pTos	x
+		pTos	y
+		pTos	x
+		lat	temp[$2]
+		add
+		push
+		pTos	y
+		lat	temp[$3]
+		add
+		push
+		lst	temp[$7]
+		lst	temp[$a]
+		lst	temp[$b]
+		push0
+		callk	kernel_100, $10
+		bnot
+		push
+		lat	temp[$6]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		push1
+		push2
+		lat	temp[$6]
+		send	$6
+		bnot
+		sat	temp[$8]
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$3		; z
+		lat	temp[$6]
+		send	$6
+		bnot
+		sat	temp[$9]
+		lst	temp[$8]
+		pToa	x
+		sub
+		sat	temp[$2]
+		lst	temp[$9]
+		pToa	y
+		sub
+		sat	temp[$3]
+		lag	global[$2e]
+		bnt	code_06f0
+		pushi	$d3		; 211, copy
+		push1
+		pushi	$8		; fixPriority
+		pTos	x
+		pTos	y
+		lst	temp[$8]
+		lst	temp[$9]
+		push
+		lst	temp[$a]
+		lst	temp[$b]
+		push0
+		callk	kernel_100, $10
+		bnot
+		push
+		lat	temp[$6]
+		send	$6
+		bnot
+		pushi	$4b		; 75, 'K', at
+		push1
+		push2
+		lat	temp[$6]
+		send	$6
+		bnot
+		push
+		pTos	x
+		lat	temp[$2]
+		add
+		ne?
+		bt	code_06cf
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$3		; z
+		lat	temp[$6]
+		send	$6
+		bnot
+		push
+		pTos	y
+		lat	temp[$3]
+		add
+		ne?
+code_06cf:	bnt	code_06f0
+		pushi	$4b		; 75, 'K', at
+		push1
+		push2
+		lat	temp[$6]
+		send	$6
+		bnot
+		push
+		pToa	x
+		sub
+		sat	temp[$2]
+		pushi	$4b		; 75, 'K', at
+		push1
+		pushi	$3		; z
+		lat	temp[$6]
+		send	$6
+		bnot
+		push
+		pToa	y
+		sub
+		sat	temp[$3]
+code_06f0:	pushi	$95		; 149, dispose
+		push0
+		lat	temp[$6]
+		send	$4
+		bnot
+code_06f9:	ret
+
+Act::motionCue:
+		pToa	mover
+		bnt	code_0710
+		pushi	$154		; 340, completed
+		push0
+		send	$4
+		bnot
+		bnt	code_0710
+		pushi	$159		; 345, motionCue
+		push0
+		pToa	mover
+		send	$4
+		bnot
+code_0710:	pushi	$159		; 345, motionCue
+		push0
+		super	Prop, $4
+		bnot
+		ret
+
+Act::setLooper:
+		link	$1
+		pToa	looper
+		bnt	code_072a
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	looper
+code_072a:	lap	param[$0]
+		bnt	code_075f
+		lap	param[$1]
+		bnt	code_075f
+		pushi	$1007		; 4103, -info-
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$8000		; -32768
+		and
+		bnt	code_074f
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		jmp	code_0751
+
+code_074f:	lap	param[$1]
+code_0751:	sat	temp[$0]
+		pushi	$94		; 148, init
+		push1
+		pushSelf
+		&rest	$2
+		aTop	looper
+		send	$6
+		bnot
+code_075f:	ret
+
+Act::checkDetail:
+		pToa	detailLevel
+		not
+		bnt	code_0768
+		jmp	code_078f
+
+code_0768:	lap	param[$0]
+		bnt	code_0770
+		lap	param[$1]
+		jmp	code_0779
+
+code_0770:	pushi	$19e		; 414, detailLevel
+		push0
+		lag	global[$2]
+		send	$4
+		bnot
+code_0779:	push
+		pToa	detailLevel
+		lt?
+		bnt	code_0788
+		pTos	signal
+		ldi	$fe		; 254, strIndex
+		and
+		aTop	signal
+		jmp	code_078f
+
+code_0788:	pTos	signal
+		ldi	$1
+		or
+		aTop	signal
+code_078f:	ret
+
+Act::setSpeed:
+		lap	param[$0]
+		bnt	code_079a
+		lap	param[$1]
+		aTop	cycleSpeed
+		aTop	moveSpeed
+code_079a:	pToa	moveSpeed
+		ret
+
+Act::setHeading:
+		lap	param[$0]
+		bnt	code_07a5
+		lap	param[$1]
+		aTop	heading
+code_07a5:	pToa	looper
+		bnt	code_07c3
+		pushi	$45		; 69, 'E', doit
+		pushi	$3		; z
+		pushSelf
+		pTos	heading
+		lsp	param[$0]
+		ldi	$2
+		ge?
+		bnt	code_07ba
+		lap	param[$2]
+code_07ba:	push
+		pToa	looper
+		send	$a
+		bnot
+		jmp	code_07f6
+
+code_07c3:	push2
+		pushSelf
+		pTos	heading
+		callk	kernel_95, $4
+		bnot
+		lsp	param[$0]
+		ldi	$2
+		ge?
+		bnt	code_07e1
+		lap	param[$2]
+		bnt	code_07e1
+		pushi	$c7		; 199, cue
+		push0
+		&rest	$3		; z
+		lap	param[$2]
+		send	$4
+		bnot
+code_07e1:	pToa	cycler
+		bnt	code_07f6
+		pushi	$15e		; 350, clientLastCel
+		push1
+		pushi	$161		; 353, lastCel
+		push0
+		self	$4
+		bnot
+		push
+		pToa	cycler
+		send	$6
+		bnot
+code_07f6:	pToa	heading
+		ret
+
+Act::setScale:
+		pToa	scaler
+		bnt	code_0808
+		pushi	$95		; 149, dispose
+		push0
+		send	$4
+		bnot
+		ldi	$0
+		aTop	scaler
+code_0808:	lsp	param[$0]
+		dup
+		ldi	$0
+		eq?
+		bnt	code_081b
+		pushi	$19a		; 410, setScale
+		push0
+		super	Prop, $4
+		bnot
+		jmp	code_08ab
+
+code_081b:	dup
+		ldi	$1
+		eq?
+		bnt	code_082e
+		pushi	$19a		; 410, setScale
+		push1
+		lsp	param[$1]
+		super	Prop, $6
+		bnot
+		jmp	code_08ab
+
+code_082e:	dup
+		ldi	$2
+		eq?
+		bnt	code_086a
+		pushi	$8d		; 141, new
+		push0
+		pushi	$144		; 324, scaler
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		send	$4
+		bnot
+		aTop	scaler
+		pushi	$6a		; 106, 'j', scaleSignal
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	scaleSignal
+		pushi	$6		; maxScale
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		aTop	maxScale
+		pushi	$36		; 54, '6', client
+		push1
+		pushSelf
+		pushi	$45		; 69, 'E', doit
+		push0
+		pToa	scaler
+		send	$a
+		bnot
+		jmp	code_08ab
+
+code_086a:	pushi	$1007		; 4103, -info-
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$8000		; -32768
+		and
+		bnt	code_0885
+		pushi	$8d		; 141, new
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		jmp	code_0887
+
+code_0885:	lap	param[$1]
+code_0887:	aTop	scaler
+		pTos	scaleSignal
+		ldi	$1
+		or
+		aTop	scaleSignal
+		pTos	scaleSignal
+		ldi	$fd		; 253, strip
+		and
+		aTop	scaleSignal
+		pushi	$94		; 148, init
+		pushi	$5		; scaleY
+		pushSelf
+		lsp	param[$2]
+		lsp	param[$3]
+		lsp	param[$4]
+		lsp	param[$5]
+		pToa	scaler
+		send	$e
+		bnot
+code_08ab:	toss
+		ret
+
+Act::update:
+		pushi	$17c		; 380, isNotHidden
+		push0
+		self	$4
+		bnot
+		bnt	code_08bc
+		push1
+		pushSelf
+		callk	kernel_32, $2
+		bnot
+code_08bc:	ret
+
diff --git a/Script/Script60035.txt b/Script/Script60035.txt
new file mode 100644
index 0000000..058836b
--- /dev/null
+++ b/Script/Script60035.txt
@@ -0,0 +1,192 @@
+Ego::init:
+		pushi	$94		; 148, init
+		push0
+		super	Act, $4
+		bnot
+		pToa	cycler
+		not
+		bnt	code_00cb
+		pushi	$105		; 261, setCycle
+		push1
+		class	Walk
+		push
+		self	$6
+		bnot
+code_00cb:	pTos	state
+		ldi	$1
+		or
+		aTop	state
+		pushi	$9f		; 159, add
+		push1
+		pushSelf
+		lag	global[$29]
+		send	$6
+		bnot
+		ret
+
+Ego::dispose:
+		pushi	$58		; 88, 'X', delete
+		push1
+		pushSelf
+		lag	global[$29]
+		send	$6
+		bnot
+		pushi	$95		; 149, dispose
+		push0
+		super	Act, $4
+		bnot
+		ret
+
+Ego::doit:
+		pushi	$45		; 69, 'E', doit
+		push0
+		super	Act, $4
+		bnot
+		pTos	x
+		ldi	$0
+		le?
+		bnt	code_0101
+		ldi	$4		; scaleX
+		jmp	code_012d
+
+code_0101:	pTos	y
+		pushi	$1ae		; 430, horizon
+		push0
+		lag	global[$3]
+		send	$4
+		bnot
+		le?
+		bnt	code_0113
+		ldi	$1
+		jmp	code_012d
+
+code_0113:	pTos	x
+		ldi	$13f		; 319, putString
+		ge?
+		bnt	code_011f
+		ldi	$2
+		jmp	code_012d
+
+code_011f:	pTos	y
+		ldi	$bd		; 189, cycles
+		ge?
+		bnt	code_012b
+		ldi	$3		; z
+		jmp	code_012d
+
+code_012b:	ldi	$0
+code_012d:	aTop	edgeHit
+		ret
+
+Ego::handleEvent:
+		link	$1
+		pushi	$c8		; 200, handleEvent
+		push1
+		lsp	param[$1]
+		super	Act, $6
+		bnot
+		bnt	code_0143
+		ldi	$0
+		jmp	code_01dd
+
+code_0143:	pushi	$2b		; 43, '+', type
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$4000		; 16384
+		and
+		bnt	code_0193
+		pushi	$2b		; 43, '+', type
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$1000		; 4096, -objID-
+		and
+		bnt	code_01dd
+		pushi	$15c		; 348, setMotion
+		pushi	$3		; z
+		class	MoveTo
+		push
+		push1
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		push2
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		self	$a
+		bnot
+		pushi	$1b0		; 432, prevDir
+		push1
+		push0
+		lag	global[$e]
+		send	$6
+		bnot
+		pushi	$50		; 80, 'P', claimed
+		push1
+		push1
+		lap	param[$1]
+		send	$6
+		bnot
+		jmp	code_01dd
+
+code_0193:	pushi	$2b		; 43, '+', type
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		push
+		ldi	$10		; 16, cel
+		and
+		bnt	code_01dd
+		pushi	$31		; 49, '1', message
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		sat	temp[$0]
+		push
+		pushi	$1b0		; 432, prevDir
+		push0
+		lag	global[$e]
+		send	$4
+		bnot
+		eq?
+		bnt	code_01c0
+		pToa	mover
+		bnt	code_01c0
+		ldi	$0
+		sat	temp[$0]
+code_01c0:	pushi	$1b0		; 432, prevDir
+		push1
+		lst	temp[$0]
+		lag	global[$e]
+		send	$6
+		bnot
+		pushi	$1aa		; 426, setDirection
+		push1
+		lst	temp[$0]
+		self	$6
+		bnot
+		pushi	$50		; 80, 'P', claimed
+		push1
+		push1
+		lap	param[$1]
+		send	$6
+		bnot
+code_01dd:	pushi	$50		; 80, 'P', claimed
+		push0
+		lap	param[$1]
+		send	$4
+		bnot
+		ret
+
diff --git a/Script/Script60036.txt b/Script/Script60036.txt
new file mode 100644
index 0000000..e1db557
--- /dev/null
+++ b/Script/Script60036.txt
@@ -0,0 +1,147 @@
+Scaler::init:
+		lap	param[$0]
+		bnt	code_0054
+		lap	param[$1]
+		aTop	client
+		lap	param[$2]
+		aTop	frontSize
+		lap	param[$3]
+		aTop	backSize
+		lap	param[$4]
+		aTop	frontY
+		lap	param[$5]
+		aTop	backY
+code_0054:	pTos	frontSize
+		pToa	backSize
+		sub
+		aTop	slopeNum
+		pTos	frontY
+		pToa	backY
+		sub
+		aTop	slopeDen
+		not
+		bnt	code_0074
+		push1
+		lofsa	string_0030	; "<Scaler> frontY cannot be equal to backY"
+		push
+		calle	export60029_0, $2
+		bnot
+		ldi	$0
+		ret
+
+code_0074:	pTos	backSize
+		pTos	slopeNum
+		pToa	backY
+		mul
+		push
+		pToa	slopeDen
+		div
+		sub
+		aTop	const
+		pushi	$45		; 69, 'E', doit
+		push0
+		self	$4
+		bnot
+		ret
+
+Scaler::doit:
+		link	$5
+		push2
+		push0
+		pToa	client
+		send	$4
+		bnot
+		sat	temp[$0]
+		lap	param[$0]
+		bnt	code_009a
+		lap	param[$1]
+code_009a:	bt	code_00a1
+		lst	temp[$0]
+		pToa	yLast
+		ne?
+code_00a1:	bnt	code_012f
+		lst	temp[$0]
+		pToa	backY
+		lt?
+		bnt	code_00b1
+		pToa	backSize
+		sat	temp[$1]
+		jmp	code_00cd
+
+code_00b1:	lst	temp[$0]
+		pToa	frontY
+		gt?
+		bnt	code_00be
+		pToa	frontSize
+		sat	temp[$1]
+		jmp	code_00cd
+
+code_00be:	pTos	slopeNum
+		lat	temp[$0]
+		mul
+		push
+		pToa	slopeDen
+		div
+		push
+		pToa	const
+		add
+		sat	temp[$1]
+code_00cd:	lat	temp[$0]
+		aTop	yLast
+		lst	temp[$1]
+		pushi	$152		; 338, xScaleAdj
+		push0
+		pToa	client
+		send	$4
+		bnot
+		mul
+		push
+		ldi	$64		; 100, 'd', moveDone
+		div
+		sat	temp[$2]
+		lst	temp[$1]
+		pushi	$153		; 339, yScaleAdj
+		push0
+		pToa	client
+		send	$4
+		bnot
+		mul
+		push
+		ldi	$64		; 100, 'd', moveDone
+		div
+		sat	temp[$3]
+		pushi	$4		; scaleX
+		push1
+		push2
+		push1
+		lst	temp[$2]
+		calle	export60025_3, $4
+		bnot
+		push
+		pushi	$5		; scaleY
+		push1
+		push2
+		push1
+		lst	temp[$3]
+		calle	export60025_3, $4
+		bnot
+		push
+		pToa	client
+		send	$c
+		bnot
+		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_012f:	ret
+