00000000: 3B 20 53 4F 55 4E 44 0D 20 44 45 46 20 53 4F 55 |; SOUND. DEF SOU|
00000010: 4E 44 20 53 59 54 4D 50 20 2C 20 53 59 53 4E 50 |ND SYTMP , SYSNP|
00000020: 25 20 2C 20 53 59 53 4E 54 20 2C 20 53 59 53 4E |% , SYSNT , SYSN|
00000030: 41 44 20 2C 20 53 59 53 4E 53 52 0D 20 20 4C 44 |AD , SYSNSR. LD|
00000040: 59 20 53 59 54 4D 50 0D 20 20 4C 45 54 20 53 59 |Y SYTMP. LET SY|
00000050: 50 4E 54 20 3D 20 53 59 53 4E 4C 4F 43 2C 59 0D |PNT = SYSNLOC,Y.|
00000060: 20 20 4C 45 54 20 53 59 50 4E 54 2B 31 20 3D 20 | LET SYPNT+1 = |
00000070: 24 44 34 0D 20 20 4C 44 59 20 23 30 20 3A 20 4C |$D4. LDY #0 : L|
00000080: 45 54 20 28 53 59 50 4E 54 29 2C 59 20 3D 20 53 |ET (SYPNT),Y = S|
00000090: 59 53 4E 50 0D 20 20 49 4E 59 20 3A 20 4C 45 54 |YSNP. INY : LET|
000000A0: 20 28 53 59 50 4E 54 29 2C 59 20 3D 20 53 59 53 | (SYPNT),Y = SYS|
000000B0: 4E 50 2B 31 0D 20 20 4C 44 59 20 23 35 20 3A 20 |NP+1. LDY #5 : |
000000C0: 4C 45 54 20 28 53 59 50 4E 54 29 2C 59 20 3D 20 |LET (SYPNT),Y = |
000000D0: 53 59 53 4E 41 44 0D 20 20 49 4E 59 20 3A 20 4C |SYSNAD. INY : L|
000000E0: 45 54 20 28 53 59 50 4E 54 29 2C 59 20 3D 20 53 |ET (SYPNT),Y = S|
000000F0: 59 53 4E 53 52 0D 20 20 4C 44 59 20 53 59 53 4E |YSNSR. LDY SYSN|
00000100: 54 20 3A 20 4C 44 58 20 53 59 54 4D 50 0D 20 20 |T : LDX SYTMP. |
00000110: 4C 45 54 20 53 59 53 4E 54 54 2C 59 20 2D 3E 20 |LET SYSNTT,Y -> |
00000120: 53 59 53 4E 54 4D 50 2C 58 20 3A 20 4C 44 59 20 |SYSNTMP,X : LDY |
00000130: 23 34 0D 20 20 4C 45 54 20 2D 3E 20 28 53 59 50 |#4. LET -> (SYP|
00000140: 4E 54 29 2C 59 20 4F 52 20 31 20 2D 3E 20 28 53 |NT),Y OR 1 -> (S|
00000150: 59 50 4E 54 29 2C 59 0D 20 20 52 45 54 55 52 4E |YPNT),Y. RETURN|
00000160: 0D 20 20 44 49 4D 20 53 59 53 4E 50 25 20 2C 20 |. DIM SYSNP% , |
00000170: 53 59 53 4E 54 20 2C 20 53 59 53 4E 41 44 0D 20 |SYSNT , SYSNAD. |
00000180: 20 44 49 4D 20 53 59 53 4E 53 52 20 2C 20 53 59 | DIM SYSNSR , SY|
00000190: 53 4E 54 4D 50 28 33 29 0D 53 59 53 4E 4C 4F 43 |SNTMP(3).SYSNLOC|
000001A0: 20 44 41 54 41 20 30 20 2C 20 37 20 2C 20 24 45 | DATA 0 , 7 , $E|
000001B0: 0D 53 59 53 4E 54 54 20 44 41 54 41 20 24 31 30 |.SYSNTT DATA $10|
000001C0: 20 2C 20 24 32 30 20 2C 20 24 34 30 20 2C 20 24 | , $20 , $40 , $|
000001D0: 38 30 0D 20 45 4E 44 44 45 46 20 53 4F 55 4E 44 |80. ENDDEF SOUND|
000001E0: 0D 3B 0D 20 44 45 46 20 52 45 4C 45 41 53 45 20 |.;. DEF RELEASE |
000001F0: 53 59 54 4D 50 0D 20 20 4C 44 59 20 53 59 54 4D |SYTMP. LDY SYTM|
00000200: 50 20 3A 20 4C 44 58 20 53 59 53 4E 4C 4F 43 2C |P : LDX SYSNLOC,|
00000210: 59 0D 20 20 4C 44 41 20 53 59 53 4E 54 4D 50 2C |Y. LDA SYSNTMP,|
00000220: 59 20 3A 20 53 54 41 20 24 44 34 30 34 2C 58 0D |Y : STA $D404,X.|
00000230: 20 20 52 45 54 55 52 4E 0D 20 45 4E 44 44 45 46 | RETURN. ENDDEF|
00000240: 20 52 45 4C 45 41 53 45 0D 3B 0D 56 4F 4C 55 4D | RELEASE.;.VOLUM|
00000250: 45 3D 24 44 34 31 38 0D 00 00 00 FF |E=$D418..... |
; SOUND. DEF SOUND SYTMP , SYSNP% , SYSN
T , SYSNAD , SYSNSR. LDY SYTMP. LET SY
PNT = SYSNLOC,Y. LET SYPNT+1 = $D4. LD
Y #0 : LET (SYPNT),Y = SYSNP. INY : LET
(SYPNT),Y = SYSNP+1. LDY #5 : LET (SYP
NT),Y = SYSNAD. INY : LET (SYPNT),Y = S
YSNSR. LDY SYSNT : LDX SYTMP. LET SYSN
TT,Y -> SYSNTMP,X : LDY #4. LET -> (SYP
NT),Y OR 1 -> (SYPNT),Y. RETURN. DIM S
YSNP% , SYSNT , SYSNAD. DIM SYSNSR , SY
SNTMP(3).SYSNLOC DATA 0 , 7 , $E.SYSNTT
DATA $10 , $20 , $40 , $80. ENDDEF SOUND
.;. DEF RELEASE SYTMP. LDY SYTMP : LDX
SYSNLOC,Y. LDA SYSNTMP,Y : STA $D404,X.
RETURN. ENDDEF RELEASE.;.VOLUME=$D418.
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL