"#«ÂÒH¨M¨L¨ËL°L±L²KÃLKÐØÄNKÐNULÌÃFLAÇÁÂ@@@ PROGRAM 4›..THE SIMPLE SYNTHESIZER BY VERN L. MASTEL›..SET UP MATRIXES, OPEN KEYBOARD FOR INPUT›Y&€9@,9@,‚9@,E@@KO AY A$$MULTIVOICE ROUTINE LINES 20-40›b6ƒ-R:,!6„-Q:,06…-Q:@,?6†-Q:@,N6‡-F:Ad,b‡AUA™--IF NO KEY IS PRESSED TURN OFF THE SOUND›ƒ"@12S2@u2@ @ (X28ƒ,@„52@‚8ƒ,@…N2@€8ƒ,@†X @ 1PIANO MODE LINES 50 TO 75›26ƒ-R:,4&6‡-F:Ad,&‡AUA™6--IF NO KEY IS PRESSED TURN OFF THE SOUND›7;ƒ"@12; @P:22SAVE KEY IN LAST KEY PRESS, START DECAY LOOP›;RRCHECK DURING LOOP TO SEE IF A KEY IS STILL PRESSED AND IF IT IS THE SAME KEY›<p 6ˆ-ƒ&‰-@6@?28ƒ,@‰SŠ-@@0W Šf6ƒ-R:,lƒ"ˆp ‰EhhREAD KEYBOARD AGAIN. IF KEY IS STILL THE SAME AT THE END OF DECAY WAIT FOR A NEW KEY TO BE PRESSED›F 6‹-R:, ‹"ˆ@pJSTART SEQUENCE AGAIN›K 6ƒ-‹ @UOddCHORD ROUTINE. THIS IS THE SAME AS THE MULTIVOICE ROUTINE EXCEPT THE NOTE VALUES ARE DIFFERENT›Pb6ƒ-R:,!6„-Q:,06…-Q:@,?6†-Q:@,N6‡-F:Ad,b‡AUA™TJJWATCH OUT FOR TWO KEYS BEING PRESSED AT ONE TIME GIVING A ZERO VALUE›Uƒ"@€Y,,IF NO KEY IS PRESSED TURN OF THE SOUND›Zƒ"@12S2@u2@ @€dX2‚8ƒ,@„52@8ƒ,@…N2@€8ƒ,@†X @€Æ]]THROW AWAY THE FIRST ATARI KEYPRESS AND SET UP THE SCREEN FOR THE MENU LINES 200 TO 220›Ç)@ŒÈŽ +@'0@@@A0@@@L(@W(@x(@ SIMPLE SYNTHESIZERƒ(@Ž(@Ò’(@(@:(@MULTIPLE VOICES---±E(@f(@1ST OCTAVE CHORDS-²q(@’(@2ND OCTAVE CHORDS-³×q(@/(@PIANO OCTAVE 1----´P(@PIANO OCTAVE 2----µq(@PIANO OCTAVE 3----¶Û99MAKE SURE THE INPUT IS VALID AND PROCESS THE CHOICE›Üq(@(@:(@ SELECT MODE (±-¶)G)@e @I)!@TAq6Ž-åRRTURN OFF THE SCREEN AND LOAD THE CORRECT MATRIX VALUES FOR THE MODE SELECTED›æ3AY3 A0%@$+&@H,ð#6Ž-#A# Aú#6Ž-@#A# A#6Ž-@#A# A #A A #A  A " #A A+33DO CHORDS IF SELECTED OTHERWISE DO MULTIVOICE›,!Ž"@@€! @ óPPALL OF THE PITCH VALUES ARE STORED AS DATA STATEMENTS AND READ UPON DEMAND›ôH‰-@@"(68‰,-16‚8‰,-:6€8‰,-> ‰H Aþcc121,243,60,114,230,57,108,217,53,102,204,50,96,193,47,91,182,45,85,173,42,81,162,40,76,153,37›--72,144,35,68,136,33,64,128,31,60,121,29›XH‰-@@"(6‚8‰,-168‰,-:6€8‰,-> ‰H Abee243,193,162,230,182,153,217,173,144,204,162,136,193,153,128,182,144,121,173,136,114,162,128,108›l<<153,121,102,144,114,96,136,108,91,128,102,85,121,96,81›¼H‰-@@"(6‚8‰,-168‰,-:6€8‰,-> ‰H AÆ??121,96,81,114,91,76,108,85,72,102,81,68,96,76,64,91,72,60›ÐDD85,68,57,81,64,53,76,60,50,72,57,48,68,53,45,64,50,42,60,47,40› 2‰-@@"$68‰,-( ‰2 @P*99243,230,217,204,193,182,173,162,153,144,136,128,121›„2‰-@@"$68‰,-( ‰2 @PŽ00121,114,108,102,96,91,85,81,76,72,68,64,60›è2‰-@@"$68‰,-( ‰2 @Pò--60, 57,53,50,47,45,42,40,37,35,33,31,29›€D:MASTEL