Sound für Hypra-Basic

Mit den neuen Befehlen zur SID-Programmierung entfallen all die komplizierten und umständlichen POKEs zur Tonerzeugung. Dazu gibt es noch zwei neue Utilities, einen FIND-Befehl und eine LIST-Hilfe.

Nun wird Hypra-Basic, das Listing des Monats aus der Ausgabe 4/86, um Sound-Befehle erweitert. Der SID des C 64 läßt sich durch sie bereits effektvoll steuern. Doch für Hypra-Basic soll das nicht genug sein. Auch dem »Sound-Monitor« (Listing des Monats aus Ausgabe 10/86) ähnliche Effekte müßten möglich sein. Deshalb hier noch einmal die Aufforderung an die Profis, auf diesem Gebiet tätig zu werden.

(Th. Blon/A. Sydow/B. Korus/T. Schlabach/og)

Listing 1. Modulnummer 41
Anzahl der Befehle: 1
SETSID 49152-49173,0
Funktion: Setzt die Sound-Register des SID zurück.
Syntax: SETSID

PROGRAMM : 40ERW .ASS     C000 C016
-----------------------------------
C000 : A0 18 A9 00 99 E7 02 88   09
C008 : 10 FA A0 18 B9 E7 02 99   D7
C010 : 00 D4 88 10 F7 60         49

Listing 1. »SETSID«

Listing 2. Modulnummer: 42
Anzahl der Befehle: 2
1) VOL 49152 bis 49159,0
Funktion: Einstellen der Lautstärke für alle drei
Register von 0 bis 15.
Syntax: VOL la
Beispiel: VOL 15
(maximale Lautstärke)
2) SOUND 49160 bis 49200,0
Funktion: Festlegung der Tonfrequenz pa des in nr
angegebenen Registers.
Syntax: SOUND nr,pa
Beispiel: SOUND 1,2228

PROGRAMM : 41ERW .ASS     C000 C031
-----------------------------------
C000 : 20 9E B7 8A 8D 18 D4 60   5C
C008 : 20 9E B7 A9 00 CA 86 F7   FB
C010 : A2 07 18 65 F7 CA D0 FA   F8
C018 : 85 F7 20 FD AE 20 8A AD   D2
C020 : 20 F7 B7 A4 F7 A5 14 99   EE
C028 : 00 D4 C8 A5 15 99 00 D4   41
C030 : 60                        22

Listing 2. »VOL« und »SOUND«

Listing 3. Modulnummer: 43
Anzahl der Befehle: 1
1) HUELLK 49152 bis 49224,0
Funktion: Einstellen der Hüllkurve.
Syntax: HUELLK nr,at,de,su,re
nr = Generatornummer
at = Anschlag (Attack)
de = Abschwellen (Decay)
su = Halten (Sustain)
re = Ausklingen (Release)
at,de,su,re dürfen Werte von 0 bis 15 annehmen
Beispiel: HUELLK 1,1,9,4,4

PROGRAMM : 42ERW .ASS     C000 C068
-----------------------------------
C000 : 20 9E B7 A9 00 CA 86 F7   F3
C008 : A2 07 18 65 F7 CA D0 FA   F0
C010 : 18 69 05 85 F7 20 FD AE   A5
C018 : 20 8A AD 20 F7 B7 A9 00   D1
C020 : A2 10 18 65 14 CA D0 FB   50
C028 : 85 F8 20 FD AE 20 8A AD   63
C030 : 20 F7 B7 A5 F8 18 65 14   FC
C038 : A6 F7 9D 00 D4 E6 F7 20   E6
C040 : FD AE 20 8A AD 20 F7 B7   19
C048 : A9 00 A2 10 18 65 14 CA   2F
C050 : D0 FB 85 F8 20 FD AE 20   8B
C058 : 8A AD 20 F7 B7 A5 F8 18   7D
C060 : 65 14 A6 F7 9D 00 D4 60   66

Listing 3. »HUELLK«

Listing 4. Modulnummer: 44
Anzahl der Befehle: 1
1) WAVE 49152-49277,0
Funktion: Einstellen der Wellenform, Synchronisation und
Ringmodulation.
Syntax: WAVE nr,ea,sy,ri,x
nr=     Generaturnummer
ea=     Ton ein(1)/aus(0)
sy=     Synchronisation ein(1)/aus(0)
ri=     Ringmodulation ein(1)/aus(0)
x=      Wellenform:
        0=Dreieck
        1=Sägezahn
        2=Rechteck (Puls)
        3=Rauschen
Beispiel: WAVE 1,1,0,0,1

PROGRAMM : 43ERW .ASS     C000 C07E
-----------------------------------
C000 : 20 9E B7 A9 00 CA 86 F7   F3
C008 : A2 07 18 65 F7 CA D0 FA   F0
C010 : 18 69 04 85 F7 20 FD AE   64
C018 : 20 9E B7 86 F8 20 FD AE   2C
C020 : 20 9E B7 E0 00 F0 07 A9   90
C028 : 02 18 65 F8 85 F8 20 FD   4B
C030 : AE 20 9E B7 E0 00 F0 07   6D
C038 : A9 04 18 65 F8 85 F8 20   76
C040 : FD AE 20 9E B7 A4 F7 E0   B2
C048 : 00 D0 09 A9 10 18 65 F8   71
C050 : 99 00 D4 60 E0 01 D0 09   96
C058 : A9 20 18 65 F8 99 00 D4   CA
C060 : 60 E0 02 D0 09 A9 40 18   DA
C068 : 65 F8 99 00 D4 60 E0 03   8A
C070 : D0 09 A9 80 18 65 F8 99   03
C078 : 00 D4 60 4C 08 AF         A1

Listing 4. »WAVE«

Listing 5. Modulnummer: 45
Anzahl der Befehle: 1
1) PULS 49152 bis 49195,0
Funktion: Bestimmung des Tastverhältnisses bei der
Rechteckspannung.
Syntax: PULS nr,x
nr= Generatornummer
x= Tastverhältnis, darf Werte von 0 bis 4095 annehmen.
Beispiel: PULS 1,2453

PROGRAMM : 44ERW .ASS     C000 C02C
-----------------------------------
C000 : 20 9E B7 A9 00 CA 86 F7   F3
C008 : A2 07 18 65 F7 CA D0 FA   F0
C010 : 18 69 02 85 F7 20 FD AE   E4
C018 : 20 8A AD 20 F7 B7 A5 14   E9
C020 : A6 F7 9D 00 D4 E8 A5 15   7E
C028 : 9D 00 D4 60               71

Listing 5. »PULS«

Listing 6. Modulnummer: 46
Anzahl der Befehle: 2
1) FRQ 49152 bis 49164,0
Funktion: Festlegung der Filterfrequenz.
Syntax: FRQ x
(x von 0 bis 2047)
Beispiel: FRQ 1200
2) FILTER 49165 bis 49255,0
Funktion: Einstellen der Resonanz und Einschalten der
Stimmen.
Syntax: FILTER re,st1,st2,st3,ex
re= Resonanz (0 bis 15)
st= Stimmen (0 aus/1 ein)
ex= Extern (0 aus/1 ein)
Beispiel: FILTER 15,1,0,1,0

PROGRAMM : 45ERW .ASS     C000 C068
-----------------------------------
C000 : 20 8A AD 20 F7 B7 8C 15   6E
C008 : D4 8D 16 D4 60 20 9E B7   B4
C010 : 86 F7 A9 00 A2 10 18 65   D2
C018 : F7 CA D0 FA 85 F7 20 FD   9C
C020 : AE 20 9E B7 E0 00 F0 07   5D
C028 : A9 01 18 65 F7 85 F7 20   D0
C030 : FD AE 20 9E B7 E0 00 F0   C5
C038 : 07 A9 02 18 65 F7 85 F7   B4
C040 : 20 FD AE 20 9E B7 E0 00   3A
C048 : F0 07 A9 04 18 65 F7 85   3E
C050 : F7 20 FD AE 20 9E B7 E0   44
C058 : 00 F0 07 A9 08 18 65 F7   8E
C060 : 85 F7 A5 F7 8D 17 D4 60   EF

Listing 6. »FRQ«

Listing 7. Modulnummer: 47
Anzahl der Befehle: 1
1) FMOD 49152 bis 49213,0
Funktion: Festlegen der Lautstärke und der Filterart.
Syntax: FMOD la,ho,ba,ti
la= Lautstärke (0 bis 15)
ho= Hochpaß (1 ein/0 aus)
ba= Bandpaß (1 ein/0 aus)
ti= Tiefpaß (1 ein/0 aus)
Beispiel: FMOD 15,1,0,1

PROGRAMM : 46ERW .ASS     C000 C03E
-----------------------------------
C000 : 20 9E B7 86 F7 20 FD AE   04
C008 : 20 9E B7 E0 00 F0 07 A9   78
C010 : 40 18 65 F7 85 F7 20 FD   49
C018 : AE 20 9E B7 E0 00 F0 07   55
C020 : A9 20 18 65 F7 85 F7 20   58
C028 : FD AE 20 9E B7 E0 00 F0   BD
C030 : 07 A9 10 18 65 F7 85 F7   2F
C038 : A5 F7 8D 18 D4 60         24

Listing 7. »FMOD«

Listing 8. Modulnummer: 48
Anzahl der Befehle: 1
1) FIND 49152 bis 49419,0
Listet alle Zeilen in denen sich der angegebene String
befindet.
Beispiel: FIND PRINT

PROGRAMM : 47ERW .ASS     C000 C10B
-----------------------------------
C000 : 20 79 00 C9 00 D0 03 4C   41
C008 : 08 AF A2 00 C9 2C F0 13   78
C010 : 9D 00 02 20 73 00 C9 00   90
C018 : F0 09 C9 2C F0 05 E8 E0   21
C020 : 0A D0 ED E8 A9 00 9D 00   3C
C028 : 02 20 9B A6 A5 2B 85 7A   B5
C030 : A5 2C 85 7B A9 01 85 FB   6D
C038 : 20 79 00 85 5F 4C 43 C0   AC
C040 : 20 73 00 20 73 00 A2 00   E0
C048 : 20 73 00 C9 00 D0 02 C6   77
C050 : FB 85 14 20 73 00 C9 00   75
C058 : D0 04 C5 FB F0 3A 85 15   3C
C060 : 20 73 00 C9 00 F0 D9 DD   1E
C068 : 00 02 D0 27 E8 BD 00 02   03
C070 : D0 EE A9 0D 20 D2 FF A5   A7
C078 : 7A 48 A5 7B 48 20 13 A6   0E
C080 : 20 99 C0 68 85 7B 68 85   8B
C088 : 7A 20 73 00 C9 00 F0 B0   B1
C090 : 4C 89 C0 A2 00 4C 60 C0   8B
C098 : 60 A0 01 84 0F B1 5F F0   F7
C0A0 : 40 20 2C A8 C8 B1 5F AA   FD
C0A8 : C8 B1 5F C5 15 D0 04 E4   8B
C0B0 : 14 F0 02 B0 2C 84 49 20   1F
C0B8 : CD BD A9 20 A4 49 29 7F   0A
C0C0 : 20 47 AB C9 22 D0 06 A5   B4
C0C8 : 0F 49 FF 85 0F C8 F0 11   49
C0D0 : B1 5F D0 0E A8 B1 5F AA   12
C0D8 : C8 B1 5F 86 5F 85 60 D0   67
C0E0 : B8 60 10 DC C9 FF F0 D8   7A
C0E8 : 24 0F 30 D4 38 E9 7F AA   61
C0F0 : 84 49 A0 FF CA F0 08 C8   27
C0F8 : B9 9E A0 10 FA 30 F5 C8   C5
C100 : B9 9E A0 30 B7 20 47 AB   27
C108 : D0 F5 60                  60

Listing 8. »FIND«

Listing 9. Modulnummer: 49
Anzahl der Befehle: 1
1) KEY 49152 bis 49402,143
Diese Routine arbeitet mit dem Kassettenpuffer. Dorthin
wird der Tastaturabfrage-Vektor umgestellt. Jede Funk-
tionstaste wird vierfach (normal, <SHIFT>,<CBM>,<CTRL>) mit
je maximal 35 Zeichen belegt. Diese werden ab $CDBE ge-
speichert.
Beispiel: KEY3,30,14,"Poke53281,0:Poke53280,0",13
 Der erste Parameter gibt die Funktionstastennummer
(<CBM>:9-12,<SHIFT>:13-16) an, der Text in Anführungszei-
chen wird direkt ausgegeben, die Zahlen sind CHR$-Codes.
Die Funktionstastenabfrage wird eingeschaltet, das heißt
beim Drücken der <F3>-Taste erscheint ein schwarzer Bild-
schirm, grüne Zeichen und der Klein-Großschrift-Modus
wird eingeschaltet.
Beispiel: KEY
 Die Funktionstastenbelegung wird im Anführungszeichen-
modus angezeigt. <RETURN> wird mit dem Pfeil nach links ge-
kennzeichnet. Die Funktionstastenabfrage wird einge-
schaltet.
Beispiel: KEY3,0
Die Belegung der <F3>-Taste wird gelöscht.
Beispiel: KEY0
Die Funktionstastenabfrage wird abgeschaltet.

PROGRAMM : 48ERW .ASS     C000 C179
-----------------------------------
C000 : 20 79 00 D0 0C A9 0D 20   79
C008 : D2 FF 20 96 C0 60 4C 08   05
C010 : AF 20 7E C0 20 9E B7 E0   1F
C018 : 00 D0 0B A9 48 8D 8F 02   AC
C020 : A9 EB 8D 90 02 60 E0 11   FD
C028 : B0 E4 CA 8A 0A AA BD A6   88
C030 : 03 85 FB E8 BD A6 03 85   3A
C038 : FC A0 00 20 79 00 F0 39   56
C040 : C9 2C D0 CA 20 73 00 C9   DE
C048 : 22 D0 1F 20 73 00 C9 3A   71
C050 : F0 0E C9 00 F0 23 C9 22   4D
C058 : D0 06 20 73 00 4C 3B C0   73
C060 : 91 FB C8 C0 24 D0 E4 4C   2E
C068 : 79 C0 98 48 20 9E B7 68   17
C070 : A8 8A 91 FB C8 C0 24 D0   06
C078 : C2 A9 00 91 FB 60 A2 00   8E
C080 : BD EB C0 9D 3C 03 E8 E0   58
C088 : 8E D0 F5 A9 3C 8D 8F 02   A3
C090 : A9 03 8D 90 02 60 20 7E   D1
C098 : C0 A2 00 8A 48 48 E8 A9   B8
C0A0 : 00 20 CD BD A9 2E 20 D2   0E
C0A8 : FF A9 01 85 D4 68 0A AA   7B
C0B0 : BD A6 03 85 FB BD A7 03   84
C0B8 : 85 FC A0 00 A9 36 85 01   48
C0C0 : B1 FB F0 11 C9 0D D0 02   19
C0C8 : A9 5F 20 D2 FF C8 C0 23   13
C0D0 : F0 03 4C C0 C0 A9 0D 20   3B
C0D8 : D2 FF A9 37 85 01 68 AA   52
C0E0 : E8 E0 10 D0 B6 A9 91 20   96
C0E8 : D2 FF 60 A5 9D F0 0E A5   6B
C0F0 : CB A2 00 DD C6 03 F0 08   20
C0F8 : E8 E0 04 D0 F6 4C 48 EB   36
C100 : C5 C5 F0 F9 85 C5 8A AE   31
C108 : 8D 02 D0 04 0A 4C 7C 03   46
C110 : E0 01 D0 0A 18 69 01 0A   CB
C118 : 38 E9 01 4C 7C 03 E0 03   78
C120 : D0 06 18 69 08 4C 7C 03   01
C128 : 18 69 0C 0A AA BD A6 03   72
C130 : 85 FB BD A7 03 85 FC A0   A9
C138 : 00 B1 FB F0 13 C9 0D D0   83
C140 : 07 8D 77 02 A9 01 85 C6   72
C148 : 20 D2 FF C8 C0 25 D0 E9   36
C150 : A5 C5 4C 48 EB BE CD E2   A6
C158 : CD 06 CE 2A CE 4E CE 72   A1
C160 : CE 96 CE BA CE DE CE 02   A7
C168 : CF 26 CF 4A CF 6E CF 92   5C
C170 : CF B6 CF DA CF 04 05 06   27
C178 : 03                        F7

Listing 9. »KEY«

Listing 10. Modulnummer: 40
Anzahl der Befehle: 2
1) PAGE 49152 bis 49211,0
Syntax: PAGEx,y,z
Legt Arbeitsbereich (Page) x von Zeile y bis Zeile z fest
Beispiel: Page 2, 100, 200
2) L 49212 bis 49251,0
Syntax: Lx
Listet Page x
Beispiel: L2

PROGRAMM : 49ERW .ASS     C000 C064
-----------------------------------
C000 : 20 9E B7 E0 0A 90 05 A2   F8
C008 : 0E 20 37 A4 8A 0A 0A 48   3A
C010 : 20 FD AE 20 8A AD 20 F7   65
C018 : B7 68 48 AA A5 14 9D BC   56
C020 : 02 A5 15 9D BD 02 20 FD   56
C028 : AE 20 8A AD 20 F7 B7 68   B0
C030 : AA A5 14 9D BE 02 A5 15   22
C038 : 9D BF 02 60 20 44 E5 20   3D
C040 : 9E B7 8A 0A 0A 48 AA BD   A7
C048 : BC 02 85 14 BD BD 02 85   C6
C050 : 15 20 13 A6 68 AA BD BE   5F
C058 : 02 85 14 BD BF 02 85 15   26
C060 : 20 C9 A6 60               B2

Listing 10. »PAGE«