� Make Zoom
� ��#A%:�$;" at line ";�:�
�S%=4�60�4
(3A%=�("<ARMovie$Dir>.Shapes.Zoom-Up.Box�N�"+�S%)
2�#A%,"ARMovie Shape 1"
<G�#A%,("A viewing box of the central ";�(S%/16000)"% of an ARMovie")
F�#A%,"640 512"
PS2%=S%�4*5
Z�Y%=64-S%�64+S%
ddestx%=80*4-S2%*4
ndesty%=(127-Y%)*4
x&q%=destx% � desty%<<12 � 2*S2%<<24
�.�#A%,q%:�#A%,q%>>8:�#A%,q%>>16:�#A%,q%>>24
��I%=80-S2%�80+S2%-1
�q%=Y%<<16 � I%
�.�#A%,q%:�#A%,q%>>8:�#A%,q%>>16:�#A%,q%>>24
��
��
��#A%
��
�*A%=�"<ARMovie$Dir>.Trajectory.Zoom-Up"
��#A%,"ARMovie Trajectory 1"
�5�#A%,"Zoom-up ARMovie from central 6�25% to 100%"
� �#A%,"12.5 steps per second"
��#A%,"15 shapes"

�scale%=4�60�4

#�#A%,("Zoom-Up.Box�N�"+�scale%)

�

"�#A%,"16 instances"

,�instance%=1�15

6�#A%,("0,0:"+�instance%)

@�

J�#A%,"0,0:0;100000"

T�#A%

^�
�

00000000  0d 00 0a 0f f4 20 4d 61  6b 65 20 5a 6f 6f 6d 0d  |..... Make Zoom.|
00000010  00 14 1f ee 20 85 d9 23  41 25 3a f1 f6 24 3b 22  |.... ..#A%:..$;"|
00000020  20 61 74 20 6c 69 6e 65  20 22 3b 9e 3a e0 0d 00  | at line ";.:...|
00000030  1e 0e e3 53 25 3d 34 b8  36 30 88 34 0d 00 28 33  |...S%=4.60.4..(3|
00000040  41 25 3d ae 28 22 3c 41  52 4d 6f 76 69 65 24 44  |A%=.("<ARMovie$D|
00000050  69 72 3e 2e 53 68 61 70  65 73 2e 5a 6f 6f 6d 2d  |ir>.Shapes.Zoom-|
00000060  55 70 2e 42 6f 78 a0 4e  ba 22 2b c3 53 25 29 0d  |Up.Box.N."+.S%).|
00000070  00 32 1a d5 23 41 25 2c  22 41 52 4d 6f 76 69 65  |.2..#A%,"ARMovie|
00000080  20 53 68 61 70 65 20 31  22 0d 00 3c 47 d5 23 41  | Shape 1"..<G.#A|
00000090  25 2c 28 22 41 20 76 69  65 77 69 6e 67 20 62 6f  |%,("A viewing bo|
000000a0  78 20 6f 66 20 74 68 65  20 63 65 6e 74 72 61 6c  |x of the central|
000000b0  20 22 3b c3 28 53 25 2f  31 36 30 30 30 29 22 25  | ";.(S%/16000)"%|
000000c0  20 6f 66 20 61 6e 20 41  52 4d 6f 76 69 65 22 29  | of an ARMovie")|
000000d0  0d 00 46 12 d5 23 41 25  2c 22 36 34 30 20 35 31  |..F..#A%,"640 51|
000000e0  32 22 0d 00 50 0e 53 32  25 3d 53 25 81 34 2a 35  |2"..P.S2%=S%.4*5|
000000f0  0d 00 5a 13 e3 59 25 3d  36 34 2d 53 25 b8 36 34  |..Z..Y%=64-S%.64|
00000100  2b 53 25 0d 00 64 15 64  65 73 74 78 25 3d 38 30  |+S%..d.destx%=80|
00000110  2a 34 2d 53 32 25 2a 34  0d 00 6e 15 64 65 73 74  |*4-S2%*4..n.dest|
00000120  79 25 3d 28 31 32 37 2d  59 25 29 2a 34 0d 00 78  |y%=(127-Y%)*4..x|
00000130  26 71 25 3d 64 65 73 74  78 25 20 84 20 64 65 73  |&q%=destx% . des|
00000140  74 79 25 3c 3c 31 32 20  84 20 32 2a 53 32 25 3c  |ty%<<12 . 2*S2%<|
00000150  3c 32 34 0d 00 82 2e d5  23 41 25 2c 71 25 3a d5  |<24.....#A%,q%:.|
00000160  23 41 25 2c 71 25 3e 3e  38 3a d5 23 41 25 2c 71  |#A%,q%>>8:.#A%,q|
00000170  25 3e 3e 31 36 3a d5 23  41 25 2c 71 25 3e 3e 32  |%>>16:.#A%,q%>>2|
00000180  34 0d 00 8c 17 e3 49 25  3d 38 30 2d 53 32 25 b8  |4.....I%=80-S2%.|
00000190  38 30 2b 53 32 25 2d 31  0d 00 96 12 71 25 3d 59  |80+S2%-1....q%=Y|
000001a0  25 3c 3c 31 36 20 84 20  49 25 0d 00 a0 2e d5 23  |%<<16 . I%.....#|
000001b0  41 25 2c 71 25 3a d5 23  41 25 2c 71 25 3e 3e 38  |A%,q%:.#A%,q%>>8|
000001c0  3a d5 23 41 25 2c 71 25  3e 3e 31 36 3a d5 23 41  |:.#A%,q%>>16:.#A|
000001d0  25 2c 71 25 3e 3e 32 34  0d 00 aa 05 ed 0d 00 b4  |%,q%>>24........|
000001e0  05 ed 0d 00 be 08 d9 23  41 25 0d 00 c8 05 ed 0d  |.......#A%......|
000001f0  00 d2 2a 41 25 3d ae 22  3c 41 52 4d 6f 76 69 65  |..*A%=."<ARMovie|
00000200  24 44 69 72 3e 2e 54 72  61 6a 65 63 74 6f 72 79  |$Dir>.Trajectory|
00000210  2e 5a 6f 6f 6d 2d 55 70  22 0d 00 dc 1f d5 23 41  |.Zoom-Up".....#A|
00000220  25 2c 22 41 52 4d 6f 76  69 65 20 54 72 61 6a 65  |%,"ARMovie Traje|
00000230  63 74 6f 72 79 20 31 22  0d 00 e6 35 d5 23 41 25  |ctory 1"...5.#A%|
00000240  2c 22 5a 6f 6f 6d 2d 75  70 20 41 52 4d 6f 76 69  |,"Zoom-up ARMovi|
00000250  65 20 66 72 6f 6d 20 63  65 6e 74 72 61 6c 20 36  |e from central 6|
00000260  b7 32 35 25 20 74 6f 20  31 30 30 25 22 0d 00 f0  |.25% to 100%"...|
00000270  20 d5 23 41 25 2c 22 31  32 2e 35 20 73 74 65 70  | .#A%,"12.5 step|
00000280  73 20 70 65 72 20 73 65  63 6f 6e 64 22 0d 00 fa  |s per second"...|
00000290  14 d5 23 41 25 2c 22 31  35 20 73 68 61 70 65 73  |..#A%,"15 shapes|
000002a0  22 0d 01 04 12 e3 73 63  61 6c 65 25 3d 34 b8 36  |".....scale%=4.6|
000002b0  30 88 34 0d 01 0e 23 d5  23 41 25 2c 28 22 5a 6f  |0.4...#.#A%,("Zo|
000002c0  6f 6d 2d 55 70 2e 42 6f  78 a0 4e ba 22 2b c3 73  |om-Up.Box.N."+.s|
000002d0  63 61 6c 65 25 29 0d 01  18 05 ed 0d 01 22 17 d5  |cale%)......."..|
000002e0  23 41 25 2c 22 31 36 20  69 6e 73 74 61 6e 63 65  |#A%,"16 instance|
000002f0  73 22 0d 01 2c 13 e3 69  6e 73 74 61 6e 63 65 25  |s"..,..instance%|
00000300  3d 31 b8 31 35 0d 01 36  1c d5 23 41 25 2c 28 22  |=1.15..6..#A%,("|
00000310  30 2c 30 3a 22 2b c3 69  6e 73 74 61 6e 63 65 25  |0,0:"+.instance%|
00000320  29 0d 01 40 05 ed 0d 01  4a 17 d5 23 41 25 2c 22  |)..@....J..#A%,"|
00000330  30 2c 30 3a 30 3b 31 30  30 30 30 30 22 0d 01 54  |0,0:0;100000"..T|
00000340  08 d9 23 41 25 0d 01 5e  05 e0 0d ff              |..#A%..^....|
0000034c