*TTXON
	*HOFF
�
(�"Which page ? "page
2�
<*HON
F	*BBC1
P�"TPAGE "+�(page)+"S0001"
Z
�print
dP%=&7000+83
n.�P%=P%-1:�(?P% � 127)=�"/" � P%=&7000 + 42
x� P%=&7000 + 42 � �
�T%=0
�P%=P%+1
�Z%=(?P% � 127) - 48
�2� Z%>=0 � Z%<=9 � T%=T%*10 + Z%:P%=P%+1:� �tV@
�� T%=1 �
��Q%=2 � T%
��"TPAGE "+�(page)
�
�print
��
��
���print
��
�*TRANSFER 7000

*DISPLAY 7000

�2

�Y%=0 � 24

"G%=0

,�X%=0 � 39

6B%=?(&7C00+X%+Y%*40) � 127

@� B%>15 � B%<32 � G%=1

J� B%<16 � G%=0

T%� B%<32 � B%=127 � G%=1 � B%=�" "

^
� 1,B%

h�

r�1,10,1,13

|�

�� 1,10,1,13,1,10,1,13

��3

��
�

00000000  0d 00 0a 0a 2a 54 54 58  4f 4e 0d 00 14 09 2a 48  |....*TTXON....*H|
00000010  4f 46 46 0d 00 1e 05 db  0d 00 28 18 e8 22 57 68  |OFF.......(.."Wh|
00000020  69 63 68 20 70 61 67 65  20 3f 20 22 70 61 67 65  |ich page ? "page|
00000030  0d 00 32 05 db 0d 00 3c  08 2a 48 4f 4e 0d 00 46  |..2....<.*HON..F|
00000040  09 2a 42 42 43 31 0d 00  50 1d ff 22 54 50 41 47  |.*BBC1..P.."TPAG|
00000050  45 20 22 2b c3 28 70 61  67 65 29 2b 22 53 30 30  |E "+.(page)+"S00|
00000060  30 31 22 0d 00 5a 0a f2  70 72 69 6e 74 0d 00 64  |01"..Z..print..d|
00000070  0f 50 25 3d 26 37 30 30  30 2b 38 33 0d 00 6e 2e  |.P%=&7000+83..n.|
00000080  f5 50 25 3d 50 25 2d 31  3a fd 28 3f 50 25 20 80  |.P%=P%-1:.(?P% .|
00000090  20 31 32 37 29 3d 97 22  2f 22 20 84 20 50 25 3d  | 127)=."/" . P%=|
000000a0  26 37 30 30 30 20 2b 20  34 32 0d 00 78 17 e7 20  |&7000 + 42..x.. |
000000b0  50 25 3d 26 37 30 30 30  20 2b 20 34 32 20 8c 20  |P%=&7000 + 42 . |
000000c0  e0 0d 00 82 08 54 25 3d  30 0d 00 8c 0b 50 25 3d  |.....T%=0....P%=|
000000d0  50 25 2b 31 0d 00 96 17  5a 25 3d 28 3f 50 25 20  |P%+1....Z%=(?P% |
000000e0  80 20 31 32 37 29 20 2d  20 34 38 0d 00 a0 32 e7  |. 127) - 48...2.|
000000f0  20 5a 25 3e 3d 30 20 80  20 5a 25 3c 3d 39 20 8c  | Z%>=0 . Z%<=9 .|
00000100  20 54 25 3d 54 25 2a 31  30 20 2b 20 5a 25 3a 50  | T%=T%*10 + Z%:P|
00000110  25 3d 50 25 2b 31 3a e5  20 8d 74 56 40 0d 00 aa  |%=P%+1:. .tV@...|
00000120  0c e7 20 54 25 3d 31 20  e0 0d 00 b4 0e e3 51 25  |.. T%=1 ......Q%|
00000130  3d 32 20 b8 20 54 25 0d  00 be 15 ff 22 54 50 41  |=2 . T%....."TPA|
00000140  47 45 20 22 2b c3 28 70  61 67 65 29 0d 00 c8 0a  |GE "+.(page)....|
00000150  f2 70 72 69 6e 74 0d 00  d2 05 ed 0d 00 dc 05 e0  |.print..........|
00000160  0d 00 e6 0b dd f2 70 72  69 6e 74 0d 00 f0 05 db  |......print.....|
00000170  0d 00 fa 12 2a 54 52 41  4e 53 46 45 52 20 37 30  |....*TRANSFER 70|
00000180  30 30 0d 01 04 11 2a 44  49 53 50 4c 41 59 20 37  |00....*DISPLAY 7|
00000190  30 30 30 0d 01 0e 06 ef  32 0d 01 18 0e e3 59 25  |000.....2.....Y%|
000001a0  3d 30 20 b8 20 32 34 0d  01 22 08 47 25 3d 30 0d  |=0 . 24..".G%=0.|
000001b0  01 2c 0e e3 58 25 3d 30  20 b8 20 33 39 0d 01 36  |.,..X%=0 . 39..6|
000001c0  1e 42 25 3d 3f 28 26 37  43 30 30 2b 58 25 2b 59  |.B%=?(&7C00+X%+Y|
000001d0  25 2a 34 30 29 20 80 20  31 32 37 0d 01 40 1a e7  |%*40) . 127..@..|
000001e0  20 42 25 3e 31 35 20 80  20 42 25 3c 33 32 20 8c  | B%>15 . B%<32 .|
000001f0  20 47 25 3d 31 0d 01 4a  12 e7 20 42 25 3c 31 36  | G%=1..J.. B%<16|
00000200  20 8c 20 47 25 3d 30 0d  01 54 25 e7 20 42 25 3c  | . G%=0..T%. B%<|
00000210  33 32 20 84 20 42 25 3d  31 32 37 20 84 20 47 25  |32 . B%=127 . G%|
00000220  3d 31 20 8c 20 42 25 3d  97 22 20 22 0d 01 5e 0a  |=1 . B%=." "..^.|
00000230  ef 20 31 2c 42 25 0d 01  68 05 ed 0d 01 72 0e ef  |. 1,B%..h....r..|
00000240  31 2c 31 30 2c 31 2c 31  33 0d 01 7c 05 ed 0d 01  |1,10,1,13..|....|
00000250  86 19 ef 20 31 2c 31 30  2c 31 2c 31 33 2c 31 2c  |... 1,10,1,13,1,|
00000260  31 30 2c 31 2c 31 33 0d  01 90 06 ef 33 0d 01 9a  |10,1,13.....3...|
00000270  05 e1 0d ff                                       |....|
00000274