�4:�=&4000
�constants
	 �prt
(
 �data
2 �scrn1
7"�"Source uses ";�P-�" Bytes"''
8(�"Object uses ";base%-start%" Bytes"
<�
F:
P � �constants
Zstart%=�+1
_base%=start%
dtemp=&70
n�
x:
� � �prt
� � pass=0 � 3 � 3
�
 P%=base%
� [OPT pass
�.prt
� PLA:STAtemp:PLA:STAtemp+1
� LDY#0:BEQprt2
�.prt1:LDA(temp),Y:CMP#&FF
� BEQprt3:JSR&FFE3
�.prt2:INCtemp:BNEprt1
� INCtemp+1:BNEprt1
�	.prt3
� LDAtemp+1:PHA:LDAtemp:PHA

 RTS

:

]:�

" base%=P%+1

, �

6:

@:

J � �data

T� pass=0�3�3

^P%=base%:[OPT pass

h
.scrn1

rJSR prt

|.cls:EQUB12

�.rev:EQUD&81110011

�.wdw:EQUD&2702001C:EQUB0

�.cls:EQUB12

�.tab:EQUW&081F:EQUB1

�!EQUS"E.U.G. Program ver. 1.0"

�.std:EQUD&80110111

�.wdwoff:EQUB26

�.tab:EQUD&FF0F001F

�RTS

�]:�

�base%=P%+1

��
�

00000000  0d 00 0a 0e eb 34 3a d3  3d 26 34 30 30 30 0d 00  |.....4:.=&4000..|
00000010  14 0e f2 63 6f 6e 73 74  61 6e 74 73 0d 00 1e 09  |...constants....|
00000020  20 f2 70 72 74 0d 00 28  0a 20 f2 64 61 74 61 0d  | .prt..(. .data.|
00000030  00 32 0b 20 d6 73 63 72  6e 31 0d 00 37 22 f1 22  |.2. .scrn1..7"."|
00000040  53 6f 75 72 63 65 20 75  73 65 73 20 22 3b b8 50  |Source uses ";.P|
00000050  2d 90 22 20 42 79 74 65  73 22 27 27 0d 00 38 28  |-." Bytes"''..8(|
00000060  f1 22 4f 62 6a 65 63 74  20 75 73 65 73 20 22 3b  |."Object uses ";|
00000070  62 61 73 65 25 2d 73 74  61 72 74 25 22 20 42 79  |base%-start%" By|
00000080  74 65 73 22 0d 00 3c 05  e0 0d 00 46 05 3a 0d 00  |tes"..<....F.:..|
00000090  50 11 20 dd 20 f2 63 6f  6e 73 74 61 6e 74 73 0d  |P. . .constants.|
000000a0  00 5a 0e 73 74 61 72 74  25 3d 93 2b 31 0d 00 5f  |.Z.start%=.+1.._|
000000b0  10 62 61 73 65 25 3d 73  74 61 72 74 25 0d 00 64  |.base%=start%..d|
000000c0  0c 74 65 6d 70 3d 26 37  30 0d 00 6e 05 e1 0d 00  |.temp=&70..n....|
000000d0  78 05 3a 0d 00 82 0b 20  dd 20 f2 70 72 74 0d 00  |x.:.... . .prt..|
000000e0  8c 15 20 e3 20 70 61 73  73 3d 30 20 b8 20 33 20  |.. . pass=0 . 3 |
000000f0  88 20 33 0d 00 96 0d 20  50 25 3d 62 61 73 65 25  |. 3.... P%=base%|
00000100  0d 00 a0 0e 20 5b 4f 50  54 20 70 61 73 73 0d 00  |.... [OPT pass..|
00000110  aa 08 2e 70 72 74 0d 00  b4 1e 20 50 4c 41 3a 53  |...prt.... PLA:S|
00000120  54 41 74 65 6d 70 3a 50  4c 41 3a 53 54 41 74 65  |TAtemp:PLA:STAte|
00000130  6d 70 2b 31 0d 00 be 12  20 4c 44 59 23 30 3a 42  |mp+1.... LDY#0:B|
00000140  45 51 70 72 74 32 0d 00  c8 1d 2e 70 72 74 31 3a  |EQprt2.....prt1:|
00000150  4c 44 41 28 74 65 6d 70  29 2c 59 3a 43 4d 50 23  |LDA(temp),Y:CMP#|
00000160  26 46 46 0d 00 d2 15 20  42 45 51 70 72 74 33 3a  |&FF.... BEQprt3:|
00000170  4a 53 52 26 46 46 45 33  0d 00 dc 19 2e 70 72 74  |JSR&FFE3.....prt|
00000180  32 3a 49 4e 43 74 65 6d  70 3a 42 4e 45 70 72 74  |2:INCtemp:BNEprt|
00000190  31 0d 00 e6 16 20 49 4e  43 74 65 6d 70 2b 31 3a  |1.... INCtemp+1:|
000001a0  42 4e 45 70 72 74 31 0d  00 f0 09 2e 70 72 74 33  |BNEprt1.....prt3|
000001b0  0d 00 fa 1e 20 4c 44 41  74 65 6d 70 2b 31 3a 50  |.... LDAtemp+1:P|
000001c0  48 41 3a 4c 44 41 74 65  6d 70 3a 50 48 41 0d 01  |HA:LDAtemp:PHA..|
000001d0  04 08 20 52 54 53 0d 01  0e 05 3a 0d 01 18 07 5d  |.. RTS....:....]|
000001e0  3a ed 0d 01 22 0f 20 62  61 73 65 25 3d 50 25 2b  |:...". base%=P%+|
000001f0  31 0d 01 2c 06 20 e1 0d  01 36 05 3a 0d 01 40 05  |1..,. ...6.:..@.|
00000200  3a 0d 01 4a 0c 20 dd 20  f2 64 61 74 61 0d 01 54  |:..J. . .data..T|
00000210  10 e3 20 70 61 73 73 3d  30 b8 33 88 33 0d 01 5e  |.. pass=0.3.3..^|
00000220  16 50 25 3d 62 61 73 65  25 3a 5b 4f 50 54 20 70  |.P%=base%:[OPT p|
00000230  61 73 73 0d 01 68 0a 2e  73 63 72 6e 31 0d 01 72  |ass..h..scrn1..r|
00000240  0b 4a 53 52 20 70 72 74  0d 01 7c 0f 2e 63 6c 73  |.JSR prt..|..cls|
00000250  3a 45 51 55 42 31 32 0d  01 86 16 2e 72 65 76 3a  |:EQUB12.....rev:|
00000260  45 51 55 44 26 38 31 31  31 30 30 31 31 0d 01 90  |EQUD&81110011...|
00000270  1c 2e 77 64 77 3a 45 51  55 44 26 32 37 30 32 30  |..wdw:EQUD&27020|
00000280  30 31 43 3a 45 51 55 42  30 0d 01 9a 0f 2e 63 6c  |01C:EQUB0.....cl|
00000290  73 3a 45 51 55 42 31 32  0d 01 a4 18 2e 74 61 62  |s:EQUB12.....tab|
000002a0  3a 45 51 55 57 26 30 38  31 46 3a 45 51 55 42 31  |:EQUW&081F:EQUB1|
000002b0  0d 01 ae 21 45 51 55 53  22 45 2e 55 2e 47 2e 20  |...!EQUS"E.U.G. |
000002c0  50 72 6f 67 72 61 6d 20  76 65 72 2e 20 31 2e 30  |Program ver. 1.0|
000002d0  22 0d 01 b8 16 2e 73 74  64 3a 45 51 55 44 26 38  |".....std:EQUD&8|
000002e0  30 31 31 30 31 31 31 0d  01 c2 12 2e 77 64 77 6f  |0110111.....wdwo|
000002f0  66 66 3a 45 51 55 42 32  36 0d 01 cc 16 2e 74 61  |ff:EQUB26.....ta|
00000300  62 3a 45 51 55 44 26 46  46 30 46 30 30 31 46 0d  |b:EQUD&FF0F001F.|
00000310  01 d6 07 52 54 53 0d 01  e0 07 5d 3a ed 0d 01 ea  |...RTS....]:....|
00000320  0e 62 61 73 65 25 3d 50  25 2b 31 0d 01 f4 05 e1  |.base%=P%+1.....|
00000330  0d ff                                             |..|
00000332