: Programm 102: MSX Grafik und Soundd: Copyright 1985 DATA BECKER & Rainer Lerss( ,,,,:2 : AZ: A$(),A()< F ŀP :: ( x) nԀZ ,,:d: Abspeicherung von SOUND-Parametern j/n#n "SOUND in DATA (J/ ) ";F$ix F$"" "Name :";F$:TT:F$"a:"F$".snd": F$ AS #o: Alle Soundparameter in die Ursprungslage versetzen N  Á N,ˁ NՁ ,: Bildschirmaufbau  ) "Soundeditor"  ) "==========="&W );:A$()"Tonhhe fein Kanal 1:": A$() );:A$()"Tonhhe grob Kanal 1:": A$() );:A$()"Tonhhe fein Kanal 2:": A$() );:A$()"Tonhhe grob Kanal 2:": A$() );:A$()"Tonhhe fein Kanal 3:": A$()L );:A$()"Tonhhe grob Kanal 3:": A$()R", );:A$( )"Kanal 1: 0/1=T/2=R:": A$( )6 );:A$( )"Kanal 2: 0/1=T/2=R:": A$( )@ );:A$( )"Kanal 3: 0/1=T/2=R:": A$( )JT );:A$()"Lautstrke Kanal 1:": A$()M^ );:A$()"Lautstrke Kanal 2:": A$()~h );:A$()"Lautstrke Kanal 3:": A$()r|  );:A$()"Rauschperiode:": A$()愆 );:A$()"Hllkurvenperiode fein:": A$() );:A$()"Hllkurvenperiode grob:": A$()D );:A$()"Hllkurve:": A$()x TT : "Abspeicherung in DATA - Zeilen";: Wertzuweisung der Soundparameter auf dem Bildschirm… N ͅ N,Յ A݅ N N   N, A N N # N,+ A3& NC0 N N: N,VD A^N NĆX: Einbringen des Zeilencursors in die entsprechende Bildschirmzeile in Position 0چb ,,: ();Ňl: Warten auf Eingabe; die Eingabemglichkeit bezieht sich nur auf das Cursorsteuerfeld d.h. Pfeil nach oben bzw. Pfeil nach unten -> Cursorpositionierungv: Pfeil nach links bzw. Pfeil nach rechts -> Soundparameter +/- Spacetaste -> SOUND ESC -> AbspeicherungA$: A$"" : was ist zu tun, wenn ESC=Abspeichern der SOUND-Parameter angewhlt wird? (A$) TT TTTT :A1$(TT)" DATA"(A())","(A())","(A())","(A())","(A())","(A())","(A())","(AX) : A1$A1$","(A())","(A())","(A())","(A())","(A())","(A()) #,A1$DXS:,::A1$:d:,: XS,d A$" "  ,A():  (A$) (A$)  : (A$) (A$)   : Њ (A$)   (A$)  ) (A$)    A : A : S ,: " ";: A,: ();: ,]  (A$)    A : A : Ƌ  ,: " ";: A,: ();: ,Ћ   (A$) Z : Z * ,: " ";: ,nj4: Eingeben der Soundparameter + oder - in den 'SOUND'-Befehl; auerdem berprfung auf Erreichen der Grenzwerte sowie Kontrollieren der Bildschirmanzeige4>: Tonhhe Kanal 1 fein ====================H  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): R: Tonhhe Kanal 1 grob ====================W\  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): Ďf: Tonhhe Kanal 2 fein ====================p  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): z: Tonhhe Kanal 2 grob ====================珄  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): T: Tonhhe Kanal 3 fein ====================  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): : Tonhhe Kanal 3 grob ====================w  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): ⑶: Lautstrke Kanal 1 ==================E  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): : Lautstrke Kanal 2 ==================  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): ~: Lautstrke Kanal 3 ==================  (A()Z A()Z) A();:  : A()A()Z: A();:  ,A(): H: Rauschperiode =============  (A()Z A()Z) A();:  : A()A()Z: A();: ,A(): : Hllkurvenperiode fein ======================~  (A()Z A()Z) A();:  : A()A()Z: A();:  ,A(): : Hllkurvenperiode grob ======================Q$  (A()Z A()Z) A();:  : A()A()Z: A();:  ,A(): .: Hllkurve =========8  (A()Z A()Z) A();:  : A()A()Z: A();:  ,A(): B: Kanal 1: aus/Ton/Rau/beides ===========================ݗL  (A( )Z A( )Z) A( );:  : A( )A( )Z: A( );QV: Kanal 2: aus/Ton/Rau/beides ===========================`  (A( )Z A( )Z) A( );:  : A( )A( )Z: A( );j: Kanal 3: aus/Ton/Rau/beides ===========================it  (A( )Z A( )Z) A( );:  : A( )A( )Z: A( );~   : genaue Berechnung des 'SOUND'-Parameters 7AX A( ) AXAX : A( ) AXAX : A( ) AXAXQ A( ) AXAX : A( ) AXAX : A( ) AXAX A( ) AXAX : A( ) AXAX : A( ) AXAX AXAX ,AX : Unterprogramm fr Programmende mit CTRL STOP: ,, ,,,,: ::AXAX ,AX : Unterprogramm fr Programmende mit CTRL STOP: ,,