!� //////// PICTURE //////////
*FX20,0
*FX200,3

*TV255
�7
 ?&FE00=10:?&FE01=32
!#�31,0,9:�praven:�28,13,17,39,14
"
�drone
#*T.
(*LOAD"RPIC"3000
)�5
*?&FE00=10:?&FE01=32
2+�19,1,0,0,0,0,19,2,0,0,0,0,19,3,0,0,0,0
3�PIC
48�19,0,7,0,0,0,19,2,0,0,0,0,19,3,2,0,0,0,19,1,1,0,0,0
7�0
8�130
<
�drone
Z	*FX15
d�28,4,27,19,24
i*T.
j�=&1900
x�"CONTROL"
L	��PIC
QP%=&A00
V	[OPT2
`�LDA#0:TAY:STA&70:LDA#&58:STA&71:LDA#0:STA&72:LDA#&30:STA&73:.loop LDA(&72),Y:STA(&70),Y:INY:BNEloop:INC&71:INC&73:LDA&73:CMP#&4A:BNEloop:.loop1 LDA(&72),Y:STA(&70),Y:INY:CPY#&40:BNEloop1
eL.loop2 LDA#240:STA(&70),Y:INY:BNEloop2:INC&71:BPLloop2:LDA#13:STA&9E:RTS
j]
t	�&A00
~�
N ��drone �vol=0�-15�-5:�1,vol,0,1:�2,vol,1,1:�3,vol,0,1:�vol:�vol=-15�0:�1,vol,0,2:�2,vol,1,2:�3,vol,0,2:�vol:�D%=0�3500:�:�
u���praven
u�X�"�������������������굠굠�������������ྡ�����������";
u��
�

00000000  0d 00 0a 21 f4 20 2f 2f  2f 2f 2f 2f 2f 2f 20 50  |...!. //////// P|
00000010  49 43 54 55 52 45 20 2f  2f 2f 2f 2f 2f 2f 2f 2f  |ICTURE /////////|
00000020  2f 0d 00 14 0b 2a 46 58  32 30 2c 30 0d 00 19 0c  |/....*FX20,0....|
00000030  2a 46 58 32 30 30 2c 33  0d 00 1e 0a 2a 54 56 32  |*FX200,3....*TV2|
00000040  35 35 0d 00 1f 06 eb 37  0d 00 20 17 3f 26 46 45  |55.....7.. .?&FE|
00000050  30 30 3d 31 30 3a 3f 26  46 45 30 31 3d 33 32 0d  |00=10:?&FE01=32.|
00000060  00 21 23 ef 33 31 2c 30  2c 39 3a f2 70 72 61 76  |.!#.31,0,9:.prav|
00000070  65 6e 3a ef 32 38 2c 31  33 2c 31 37 2c 33 39 2c  |en:.28,13,17,39,|
00000080  31 34 0d 00 22 0a f2 64  72 6f 6e 65 0d 00 23 07  |14.."..drone..#.|
00000090  2a 54 2e 0d 00 28 13 2a  4c 4f 41 44 22 52 50 49  |*T...(.*LOAD"RPI|
000000a0  43 22 33 30 30 30 0d 00  29 06 eb 35 0d 00 2a 17  |C"3000..)..5..*.|
000000b0  3f 26 46 45 30 30 3d 31  30 3a 3f 26 46 45 30 31  |?&FE00=10:?&FE01|
000000c0  3d 33 32 0d 00 32 2b ef  31 39 2c 31 2c 30 2c 30  |=32..2+.19,1,0,0|
000000d0  2c 30 2c 30 2c 31 39 2c  32 2c 30 2c 30 2c 30 2c  |,0,0,19,2,0,0,0,|
000000e0  30 2c 31 39 2c 33 2c 30  2c 30 2c 30 2c 30 0d 00  |0,19,3,0,0,0,0..|
000000f0  33 08 f2 50 49 43 0d 00  34 38 ef 31 39 2c 30 2c  |3..PIC..48.19,0,|
00000100  37 2c 30 2c 30 2c 30 2c  31 39 2c 32 2c 30 2c 30  |7,0,0,0,19,2,0,0|
00000110  2c 30 2c 30 2c 31 39 2c  33 2c 32 2c 30 2c 30 2c  |,0,0,19,3,2,0,0,|
00000120  30 2c 31 39 2c 31 2c 31  2c 30 2c 30 2c 30 0d 00  |0,19,1,1,0,0,0..|
00000130  37 06 fb 30 0d 00 38 08  fb 31 33 30 0d 00 3c 0a  |7..0..8..130..<.|
00000140  f2 64 72 6f 6e 65 0d 00  5a 09 2a 46 58 31 35 0d  |.drone..Z.*FX15.|
00000150  00 64 12 ef 32 38 2c 34  2c 32 37 2c 31 39 2c 32  |.d..28,4,27,19,2|
00000160  34 0d 00 69 07 2a 54 2e  0d 00 6a 0b d0 3d 26 31  |4..i.*T...j..=&1|
00000170  39 30 30 0d 00 78 0e d7  22 43 4f 4e 54 52 4f 4c  |900..x.."CONTROL|
00000180  22 0d 04 4c 09 dd f2 50  49 43 0d 04 51 0b 50 25  |"..L...PIC..Q.P%|
00000190  3d 26 41 30 30 0d 04 56  09 5b 4f 50 54 32 0d 04  |=&A00..V.[OPT2..|
000001a0  60 be 4c 44 41 23 30 3a  54 41 59 3a 53 54 41 26  |`.LDA#0:TAY:STA&|
000001b0  37 30 3a 4c 44 41 23 26  35 38 3a 53 54 41 26 37  |70:LDA#&58:STA&7|
000001c0  31 3a 4c 44 41 23 30 3a  53 54 41 26 37 32 3a 4c  |1:LDA#0:STA&72:L|
000001d0  44 41 23 26 33 30 3a 53  54 41 26 37 33 3a 2e 6c  |DA#&30:STA&73:.l|
000001e0  6f 6f 70 20 4c 44 41 28  26 37 32 29 2c 59 3a 53  |oop LDA(&72),Y:S|
000001f0  54 41 28 26 37 30 29 2c  59 3a 49 4e 59 3a 42 4e  |TA(&70),Y:INY:BN|
00000200  45 6c 6f 6f 70 3a 49 4e  43 26 37 31 3a 49 4e 43  |Eloop:INC&71:INC|
00000210  26 37 33 3a 4c 44 41 26  37 33 3a 43 4d 50 23 26  |&73:LDA&73:CMP#&|
00000220  34 41 3a 42 4e 45 6c 6f  6f 70 3a 2e 6c 6f 6f 70  |4A:BNEloop:.loop|
00000230  31 20 4c 44 41 28 26 37  32 29 2c 59 3a 53 54 41  |1 LDA(&72),Y:STA|
00000240  28 26 37 30 29 2c 59 3a  49 4e 59 3a 43 50 59 23  |(&70),Y:INY:CPY#|
00000250  26 34 30 3a 42 4e 45 6c  6f 6f 70 31 0d 04 65 4c  |&40:BNEloop1..eL|
00000260  2e 6c 6f 6f 70 32 20 4c  44 41 23 32 34 30 3a 53  |.loop2 LDA#240:S|
00000270  54 41 28 26 37 30 29 2c  59 3a 49 4e 59 3a 42 4e  |TA(&70),Y:INY:BN|
00000280  45 6c 6f 6f 70 32 3a 49  4e 43 26 37 31 3a 42 50  |Eloop2:INC&71:BP|
00000290  4c 6c 6f 6f 70 32 3a 4c  44 41 23 31 33 3a 53 54  |Lloop2:LDA#13:ST|
000002a0  41 26 39 45 3a 52 54 53  0d 04 6a 05 5d 0d 04 74  |A&9E:RTS..j.]..t|
000002b0  09 d6 26 41 30 30 0d 04  7e 05 e1 0d 4e 20 7f dd  |..&A00..~...N ..|
000002c0  f2 64 72 6f 6e 65 20 e3  76 6f 6c 3d 30 b8 2d 31  |.drone .vol=0.-1|
000002d0  35 88 2d 35 3a d4 31 2c  76 6f 6c 2c 30 2c 31 3a  |5.-5:.1,vol,0,1:|
000002e0  d4 32 2c 76 6f 6c 2c 31  2c 31 3a d4 33 2c 76 6f  |.2,vol,1,1:.3,vo|
000002f0  6c 2c 30 2c 31 3a ed 76  6f 6c 3a e3 76 6f 6c 3d  |l,0,1:.vol:.vol=|
00000300  2d 31 35 b8 30 3a d4 31  2c 76 6f 6c 2c 30 2c 32  |-15.0:.1,vol,0,2|
00000310  3a d4 32 2c 76 6f 6c 2c  31 2c 32 3a d4 33 2c 76  |:.2,vol,1,2:.3,v|
00000320  6f 6c 2c 30 2c 32 3a ed  76 6f 6c 3a e3 44 25 3d  |ol,0,2:.vol:.D%=|
00000330  30 b8 33 35 30 30 3a ed  3a e1 0d 75 94 0c dd f2  |0.3500:.:..u....|
00000340  70 72 61 76 65 6e 0d 75  96 58 f1 22 95 9a a2 ff  |praven.u.X."....|
00000350  f3 f3 a4 a3 ff ab f4 ab  f4 a0 eb b5 ff f3 f3 a3  |................|
00000360  f8 a7 ff e0 be f9 f7 f3  ea f5 a6 ea b5 ea ea b5  |................|
00000370  a0 ea b5 a0 95 a0 a0 ff  b2 ed f0 ea f7 a3 a3 ed  |................|
00000380  b2 ed fa b5 ff f0 e0 be  a1 a0 ff a7 f0 f0 f0 ff  |................|
00000390  ea b7 e4 ea f5 fa ea f5  f8 ea f5 f8 22 3b 0d 75  |............";.u|
000003a0  9a 05 e1 0d ff                                    |.....|
000003a5