E �         Rotating EUG                          by  Dominic Ford
 :
 � � � �Dd@
(6 �4:�23,1,0;0;0;0;:�=&3000:�ass:brk=�:*LO. TitData
2/ �16,28)"Issue 30"�13,30)"Press  <SPACE>";
< �:�d=0�31:T=�
F8 ?&70=(&2FFF+48*d)�255:?&71=(&2FFF+48*d) � 256:�copy
P% � � �>T+10:� �(-99) � d=31:brk=�
Z �:� brk
d �
n :
x
 ��ass
� �pass=0�2�2:P%=&3800
�
 [OPTpass
�( .copy LDA#&FF:STA&72:LDA#&57:STA&73
�> .start LDY#48:.copyst LDA(&70),Y:STA(&72),Y:DEY:BNEcopyst
�l LDA&70:CLC:ADC#&30:STA&70:LDA&71:ADC#0:STA&71:CMP#&35:BNEreloop:LDA&70:CMP#&FF:BNEreloop:LDA#&2F:STA&71
�O .reloop LDA&72:CLC:ADC#&60:STA&72:LDA&73:ADC#0:STA&73:CMP#&78:BNEstart:RTS
�	]:�:�
�

00000000  0d 00 0a 45 20 f4 20 20  20 20 20 20 20 20 20 52  |...E .         R|
00000010  6f 74 61 74 69 6e 67 20  45 55 47 20 20 20 20 20  |otating EUG     |
00000020  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000030  20 20 20 20 20 62 79 20  20 44 6f 6d 69 6e 69 63  |     by  Dominic|
00000040  20 46 6f 72 64 0d 00 14  06 20 3a 0d 00 1e 0f 20  | Ford.... :.... |
00000050  ee 20 85 20 e5 20 8d 44  64 40 0d 00 28 36 20 eb  |. . . .Dd@..(6 .|
00000060  34 3a ef 32 33 2c 31 2c  30 3b 30 3b 30 3b 30 3b  |4:.23,1,0;0;0;0;|
00000070  3a d3 3d 26 33 30 30 30  3a f2 61 73 73 3a 62 72  |:.=&3000:.ass:br|
00000080  6b 3d a3 3a 2a 4c 4f 2e  20 54 69 74 44 61 74 61  |k=.:*LO. TitData|
00000090  0d 00 32 2f 20 f1 8a 31  36 2c 32 38 29 22 49 73  |..2/ ..16,28)"Is|
000000a0  73 75 65 20 33 30 22 8a  31 33 2c 33 30 29 22 50  |sue 30".13,30)"P|
000000b0  72 65 73 73 20 20 3c 53  50 41 43 45 3e 22 3b 0d  |ress  <SPACE>";.|
000000c0  00 3c 12 20 f5 3a e3 64  3d 30 b8 33 31 3a 54 3d  |.<. .:.d=0.31:T=|
000000d0  91 0d 00 46 38 20 3f 26  37 30 3d 28 26 32 46 46  |...F8 ?&70=(&2FF|
000000e0  46 2b 34 38 2a 64 29 80  32 35 35 3a 3f 26 37 31  |F+48*d).255:?&71|
000000f0  3d 28 26 32 46 46 46 2b  34 38 2a 64 29 20 81 20  |=(&2FFF+48*d) . |
00000100  32 35 36 3a d6 63 6f 70  79 0d 00 50 25 20 f5 20  |256:.copy..P% . |
00000110  fd 20 91 3e 54 2b 31 30  3a e7 20 a6 28 2d 39 39  |. .>T+10:. .(-99|
00000120  29 20 8c 20 64 3d 33 31  3a 62 72 6b 3d b9 0d 00  |) . d=31:brk=...|
00000130  5a 0c 20 ed 3a fd 20 62  72 6b 0d 00 64 06 20 e0  |Z. .:. brk..d. .|
00000140  0d 00 6e 06 20 3a 0d 00  78 0a 20 dd f2 61 73 73  |..n. :..x. ..ass|
00000150  0d 00 82 19 20 e3 70 61  73 73 3d 30 b8 32 88 32  |.... .pass=0.2.2|
00000160  3a 50 25 3d 26 33 38 30  30 0d 00 8c 0d 20 5b 4f  |:P%=&3800.... [O|
00000170  50 54 70 61 73 73 0d 00  96 28 20 2e 63 6f 70 79  |PTpass...( .copy|
00000180  20 4c 44 41 23 26 46 46  3a 53 54 41 26 37 32 3a  | LDA#&FF:STA&72:|
00000190  4c 44 41 23 26 35 37 3a  53 54 41 26 37 33 0d 00  |LDA#&57:STA&73..|
000001a0  a0 3e 20 2e 73 74 61 72  74 20 4c 44 59 23 34 38  |.> .start LDY#48|
000001b0  3a 2e 63 6f 70 79 73 74  20 4c 44 41 28 26 37 30  |:.copyst LDA(&70|
000001c0  29 2c 59 3a 53 54 41 28  26 37 32 29 2c 59 3a 44  |),Y:STA(&72),Y:D|
000001d0  45 59 3a 42 4e 45 63 6f  70 79 73 74 0d 00 aa 6c  |EY:BNEcopyst...l|
000001e0  20 4c 44 41 26 37 30 3a  43 4c 43 3a 41 44 43 23  | LDA&70:CLC:ADC#|
000001f0  26 33 30 3a 53 54 41 26  37 30 3a 4c 44 41 26 37  |&30:STA&70:LDA&7|
00000200  31 3a 41 44 43 23 30 3a  53 54 41 26 37 31 3a 43  |1:ADC#0:STA&71:C|
00000210  4d 50 23 26 33 35 3a 42  4e 45 72 65 6c 6f 6f 70  |MP#&35:BNEreloop|
00000220  3a 4c 44 41 26 37 30 3a  43 4d 50 23 26 46 46 3a  |:LDA&70:CMP#&FF:|
00000230  42 4e 45 72 65 6c 6f 6f  70 3a 4c 44 41 23 26 32  |BNEreloop:LDA#&2|
00000240  46 3a 53 54 41 26 37 31  0d 00 b4 4f 20 2e 72 65  |F:STA&71...O .re|
00000250  6c 6f 6f 70 20 4c 44 41  26 37 32 3a 43 4c 43 3a  |loop LDA&72:CLC:|
00000260  41 44 43 23 26 36 30 3a  53 54 41 26 37 32 3a 4c  |ADC#&60:STA&72:L|
00000270  44 41 26 37 33 3a 41 44  43 23 30 3a 53 54 41 26  |DA&73:ADC#0:STA&|
00000280  37 33 3a 43 4d 50 23 26  37 38 3a 42 4e 45 73 74  |73:CMP#&78:BNEst|
00000290  61 72 74 3a 52 54 53 0d  00 be 09 5d 3a ed 3a e1  |art:RTS....]:.:.|
000002a0  0d ff                                             |..|
000002a2