TOUCHSCREEN 'MUSIC FREQ=10 PLAY 0,1 PLAY 1,1 'PLAY 2,1 DO CLS 'IF TOUCH THEN STOP IF TOUCH THEN POKEW $FF4C,2*TOUCH.X^2 'POKEW $FF58,3*TOUCH.Y^2 END IF POKEW $FF40,FREQ ADD FREQ,1+FREQ*0.001 FOR I=0 TO 3 PRINT "FREQ:",PEEKW($FF40+I*12) PRINT "PEAK:",PEEK($FF43+I*12) V=PEEK($FF42+I*12) PRINT "V:",V MOD 4,"M:",V\4 MOD 2,"I:",V\6 MOD 1,"G:",V\7 MOD 1 PRINT "" NEXT I WAIT 1 LOOP #15:MUSIC 220061560DCF08001014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000000014AAAA00000000 0014AAAA000000003006302000EF0000 20404040801040400111404002124040 03134040041440400515404006164040 0717404008184040091940400A1A4040 0B1B40400C1C40400D1D40400E1E4040 0F9F4040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 4F0A0B4F0A0B510A0B00000B4A0A0B4C 0A0B4C0A1B480A1B4B0A1B4A0A1B480A 1B00001B480A1B00001B4A0A0B4A0A0B 4B0A0B00000B4B0A1B4A0A1B480A1B4A 0A1B4C0A1B4F0A0B510A0B4C0A0B4F0A 0B4A0A0B4B0A0B480A0B4A0A0B480A0B 4C0A004C0A004F0A00000000510A004C 0A004F0A004A0A004B0A00480A004A0A 004C0A004B0A004A0A00480A004A0A00 4B0A00000000480A004A0A004B0A004F 0A004A0A004B0A004A0A00480A004A0A 00000000480A000000004A0A00000000 4F0A004F0A00510A000000004A0A004C 0A004C0A00480A004B0A004A0A00480A 00000000480A000000004A0A004A0A00 4B0A000000004B0A004A0A00480A004A 0A004C0A004F0A00510A004C0A004F0A 004A0A004B0A00480A004A0A00480A00 4C0A004C0A004F0A00000000510A004C 0A004F0A004A0A004B0A00480A004A0A 004C0A004B0A004A0A00480A004A0A00 4B0A00000000480A004A0A004B0A004F 0A004A0A004B0A004A0A00480A004A0A 004A0A00480A00000000480A00000000 480A00000000430A00450A00480A0000 0000430A00450A00480A004A0A004C0A 004A0A004D0A004C0A004D0A004F0A00 480A00000000480A00000000430A0045 0A00480A00450A004D0A004C0A004A0A 00480A00430A00400A00410A00430A00 480A00000000430A00450A00480A0000 0000430A00450A00480A00480A004A0A 004C0A00480A00430A00450A00430A00 480A00480A00480A00470A00480A0043 0A00450A00480A004D0A004C0A004D0A 004F0A00480A00000000470A00000000 480A00000000430A00450A00480A0000 0000430A00450A00480A004A0A004C0A 004A0A004D0A004C0A004D0A004F0A00 480A00000000480A00000000430A0045 0A00480A00450A004D0A004C0A004A0A 00480A00430A00400A00410A00430A00 480A00000000430A00450A00480A0000 0000430A00450A00480A00480A004A0A 004C0A00480A00430A00450A00430A00 480A00480A00480A00470A00480A0043 0A00450A00480A004D0A004C0A004D0A 004F0A00480A00480A004A0A004A0A00 4F0A004F0A00510A000000004A0A004C 0A004C0A00480A004B0A004A0A00480A 00000000480A000000004A0A004A0A00 4B0A000000004B0A004A0A00480A004A 0A004C0A004F0A00510A004C0A004F0A 004A0A004B0A00480A004A0A00480A00 4C0A004C0A004F0A00000000510A004C 0A004F0A004A0A004B0A00480A004A0A 004C0A004B0A004A0A00480A004A0A00 4B0A00000000480A004A0A004B0A004F 0A004A0A004B0A004A0A00480A004A0A 00000000480A000000004A0A00000000 4F0A004F0A00510A000000004A0A004C 0A004C0A00480A004B0A004A0A00480A 00000000480A000000004A0A004A0A00 4B0A000000004B0A004A0A00480A004A 0A004C0A004F0A00510A004C0A004F0A 004A0A004B0A00480A004A0A00480A00 4C0A004C0A004F0A00000000510A004C 0A004F0A004A0A004B0A00480A004A0A 004C0A004B0A004A0A00480A004A0A00 4B0A00000000480A004A0A004B0A004F 0A004A0A004B0A004A0A00480A004A0A 004A0A00480A00000000480A00000000 480A00000000430A00450A00480A0000 0000430A00450A00480A004A0A004C0A 004A0A004D0A004C0A004D0A004F0A00 480A00000000480A00000000430A0045 0A00480A00450A004D0A004C0A004A0A 00480A00430A00400A00410A00430A00 480A00000000430A00450A00480A0000 0000430A00450A00480A00480A004A0A 004C0A00480A00430A00450A00430A00 480A00480A00480A00470A00480A0043 0A00450A00480A004D0A004C0A004D0A 004F0A00480A00000000470A00000000 480A00000000430A00450A00480A0000 0000430A00450A00480A004A0A004C0A 004A0A004D0A004C0A004D0A004F0A00 480A00000000480A00000000430A0045 0A00480A00450A004D0A004C0A004A0A 00480A00430A00400A00410A00430A00 480A00000000430A00450A00480A0000 0000430A00450A00480A00480A004A0A 004C0A00480A00430A00450A00430A00 480A00480A00480A00470A00480A0043 0A00450A00480A004D0A004C0A004D0A 004F0A00480A00480A004A0A004A0A00 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 35180035180041180041180037180037 18004318004318003418003418004018 00401800391800391800451800451800 3218003218003E18003E180037180037 18004318004318003018003018003C18 003C18003018003018003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 3518003518003918003918003C18003C 18004118004118003418003418003718 003718003C18003C1800401800401800 32180032180035180035180039180039 18003C18003C18003018003018003418 003418003718003718003C18003C1800 4C08004D08004F08004F080054080054 08004C08004D08004F08005408005608 00580800560800530800540800540800 4F08004F08004C08004D08004F08004F 08005408005608005608005308005408 00560800590800580800590800560800 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000