Values set in .ESCAPE routine
=============================

&46            = #&04
&35            = #&00
&0a08 -> &0a10 = #&00
&09c0 -> &09c3 = #&ff
&9c            = #&ff 
&57            = #&ff 
&69            = #&e8

Set all of the following to #&03

For #&2f -> #&18 = #&17 iterations

$0d18 -> 0d2f     
$0b10 -> 0b27
$0ba0
$0b40
$0be8
$0b70
$0c30
$0e80

Set all of the following to #&03

For #&0b iterations

$0b1b -> $0b10
$0ba0
$0b40
$0be8
$0b70
$0c30
$0e80

$000b = 04

in .ESC1:-

Set to #$ff
$63, $5d, $47, $6c, $53

Set to #&00
$75, $9e, $0d47

Copy $09ff,3 to $0c5f
Copy $09f6,3 to $0bcf

$85   = $09f6,3 - #&78 
$0c17 = #&03 IS JTINDEX
$86   = #&03