E �         Rotating EUG                          by  Dominic Ford
 :
 � � � �Dd@
(6 �4:�23,1,0;0;0;0;:�=&3000:�ass:brk=�:*LO. TitData
20 �16,28)"E U G 3 0"�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 �"MENU"
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 30 20 f1 8a 31  36 2c 32 38 29 22 45 20  |..20 ..16,28)"E |
000000a0  55 20 47 20 33 20 30 22  8a 31 33 2c 33 30 29 22  |U G 3 0".13,30)"|
000000b0  50 72 65 73 73 20 20 3c  53 50 41 43 45 3e 22 3b  |Press  <SPACE>";|
000000c0  0d 00 3c 12 20 f5 3a e3  64 3d 30 b8 33 31 3a 54  |..<. .:.d=0.31:T|
000000d0  3d 91 0d 00 46 38 20 3f  26 37 30 3d 28 26 32 46  |=...F8 ?&70=(&2F|
000000e0  46 46 2b 34 38 2a 64 29  80 32 35 35 3a 3f 26 37  |FF+48*d).255:?&7|
000000f0  31 3d 28 26 32 46 46 46  2b 34 38 2a 64 29 20 81  |1=(&2FFF+48*d) .|
00000100  20 32 35 36 3a d6 63 6f  70 79 0d 00 50 25 20 f5  | 256:.copy..P% .|
00000110  20 fd 20 91 3e 54 2b 31  30 3a e7 20 a6 28 2d 39  | . .>T+10:. .(-9|
00000120  39 29 20 8c 20 64 3d 33  31 3a 62 72 6b 3d b9 0d  |9) . d=31:brk=..|
00000130  00 5a 0c 20 ed 3a fd 20  62 72 6b 0d 00 64 0c 20  |.Z. .:. brk..d. |
00000140  d7 22 4d 45 4e 55 22 0d  00 6e 06 20 3a 0d 00 78  |."MENU"..n. :..x|
00000150  0a 20 dd f2 61 73 73 0d  00 82 19 20 e3 70 61 73  |. ..ass.... .pas|
00000160  73 3d 30 b8 32 88 32 3a  50 25 3d 26 33 38 30 30  |s=0.2.2:P%=&3800|
00000170  0d 00 8c 0d 20 5b 4f 50  54 70 61 73 73 0d 00 96  |.... [OPTpass...|
00000180  28 20 2e 63 6f 70 79 20  4c 44 41 23 26 46 46 3a  |( .copy LDA#&FF:|
00000190  53 54 41 26 37 32 3a 4c  44 41 23 26 35 37 3a 53  |STA&72:LDA#&57:S|
000001a0  54 41 26 37 33 0d 00 a0  3e 20 2e 73 74 61 72 74  |TA&73...> .start|
000001b0  20 4c 44 59 23 34 38 3a  2e 63 6f 70 79 73 74 20  | LDY#48:.copyst |
000001c0  4c 44 41 28 26 37 30 29  2c 59 3a 53 54 41 28 26  |LDA(&70),Y:STA(&|
000001d0  37 32 29 2c 59 3a 44 45  59 3a 42 4e 45 63 6f 70  |72),Y:DEY:BNEcop|
000001e0  79 73 74 0d 00 aa 6c 20  4c 44 41 26 37 30 3a 43  |yst...l LDA&70:C|
000001f0  4c 43 3a 41 44 43 23 26  33 30 3a 53 54 41 26 37  |LC:ADC#&30:STA&7|
00000200  30 3a 4c 44 41 26 37 31  3a 41 44 43 23 30 3a 53  |0:LDA&71:ADC#0:S|
00000210  54 41 26 37 31 3a 43 4d  50 23 26 33 35 3a 42 4e  |TA&71:CMP#&35:BN|
00000220  45 72 65 6c 6f 6f 70 3a  4c 44 41 26 37 30 3a 43  |Ereloop:LDA&70:C|
00000230  4d 50 23 26 46 46 3a 42  4e 45 72 65 6c 6f 6f 70  |MP#&FF:BNEreloop|
00000240  3a 4c 44 41 23 26 32 46  3a 53 54 41 26 37 31 0d  |:LDA#&2F:STA&71.|
00000250  00 b4 4f 20 2e 72 65 6c  6f 6f 70 20 4c 44 41 26  |..O .reloop LDA&|
00000260  37 32 3a 43 4c 43 3a 41  44 43 23 26 36 30 3a 53  |72:CLC:ADC#&60:S|
00000270  54 41 26 37 32 3a 4c 44  41 26 37 33 3a 41 44 43  |TA&72:LDA&73:ADC|
00000280  23 30 3a 53 54 41 26 37  33 3a 43 4d 50 23 26 37  |#0:STA&73:CMP#&7|
00000290  38 3a 42 4e 45 73 74 61  72 74 3a 52 54 53 0d 00  |8:BNEstart:RTS..|
000002a0  be 09 5d 3a ed 3a e1 0d  ff                       |..]:.:...|
000002a9