Filety on-line & 64NET :: Magazyn o scenie komputera Commodore 64 ::

;PROCEDURA SAMPLUJACA DZWIEKI ;DO PAMIECI KOMPUTERA ;ORAZ ODTWARZAJACA JE NA PRZERWANIACH *= $0810 JMP READ JMP WRITE ;--------------------------------------- START = $1000 KONIEC = $FF00 SPEED = $90 ;--------------------------------------- STRLOW = $FA STRHIGH = STRLOW+1 END = STRHIGH+1 SPD = END+1 PAMIEC = SPD+1 ;--------------------------------------- WRITE SEI ;WYLACZENIE PRZERWAN LDA #$7F STA $DD0D LDA #>START ;ADRES STARTOWY LDX #>KONIEC ;KONCOWY LDY #SPEED ;PREDKOSC STA STRHIGH STX END STY SPD LDX #$00 STX STRLOW JSR VOLUME ;GLOSNY SID LDX #$07 JSR VOLUME LDX #$0E JSR VOLUME LDY #$00 ;PORT NA WEJSCIE STY $DD03 JSR TIMER LOOP1 LDA $DD0D ;CZEKA NA TIMER AND #$01 BEQ *-5 LDA $DD01 ;ODCZYT PROBKI LSR A LSR A LSR A LSR A STA $D418 ;WYSLANIE DO SID STA $D020 LDA $DC01 ;CZY BYL STOP BPL STOP LDA $DC01 ;CZY SPACJA AND #$10 BNE LOOP1 ;NACISNIETO SPACJE START ZAPISU STY $D011 ;WYLACZENIE VIC DALEJ LDA $DD0D ;CZEKA NA TIMER AND #$01 BEQ *-5 LDA $DD01 ;POBRANIE PROBKI AND #$F0 ;STARSZY NIBBLE STA PAMIEC LSR A LSR A LSR A LSR A STA $D418 STA $D020 LDA $DC01 ;CZY BYL STOP BPL STOP LDA $DD0D ;CZEKA NA TIMER AND #$01 BEQ *-5 LDA $DD01 LSR A LSR A LSR A LSR A STA $D418 STA $D020 ORA PAMIEC INC $01 ;ZMIANA BANKU RAM STA (STRLOW),Y DEC $01 INY ;ZWIEKSZ ADRES BNE DALEJ INC STRHIGH LDA STRHIGH ;CZY END CMP END BNE DALEJ STOP LDA #$1B ;WLACZA EKRAN STA $D011 CLI ;I PRZERWANIA RTS ;--------------------------------------- READ SEI ;WYLACZENIE IRQ LDA #$7F STA $DD0D LDA #>START ;ADRES STARTOWY LDX #>KONIEC ;KONCOWY LDY #SPEED ;PREDKOSC STA STRHIGH STX END STY SPD LDX #$00 STX STRLOW JSR VOLUME ;GLOSNY SID LDX #$07 JSR VOLUME LDX #$0E JSR VOLUME JSR TIMER STY $DD03 LDA $0318 ;ZAPAMIETANIE LDX $0319 ;WEKTORA NMI STA NMILOW STX NMIHIGH LDA #NMI STA $0318 STX $0319 LDA #$81 ;ZEZWALA NA NMI STA $DD0D CLI RTS NMI PHA TYA PHA LDY #$00 LDA PAMIEC BNE NMI1 INC $01 LDA (STRLOW),Y ;ZM. BANKU RAM DEC $01 LSR A LSR A LSR A LSR A STA $D418 STA $D020 LDA $DC01 ;CZY BYL STOP BPL STOPNMI STA PAMIEC EXITNMI PLA ;WYJSCIE Z NMI TAY PLA BIT $DD0D RTI NMI1 INC $01 ;ZM. BANKU RAM LDA (STRLOW),Y DEC $01 STY PAMIEC AND #$0F STA $D418 STA $D020 INC STRLOW ;ZWIEKSZ ADRES BNE EXITNMI INC STRHIGH LDA STRHIGH ;CZY END CMP END BNE EXITNMI STOPNMI LDA NMILOW ;STARY WEKTOR LDX NMIHIGH STA $0318 STX $0319 LDA #$01 ;WYL PRZERWAN STA $DD0D BNE EXITNMI ;--------------------------------------- VOLUME LDA #$00 STA $D405,X LDA #$FF STA $D402,X STA $D403,X LDA #$F0 STA $D406,X LDA #$41 STA $D404,X RTS ;--------------------------------------- TIMER LDA #$00 ;USTAW TIMER STA $DD05 LDA SPD STA $DD04 LDA #$01 STA $DD0E LDA $DD0D RTS ;--------------------------------------- NMILOW .BYTE $00 NMIHIGH .BYTE $00 ;---------------------------------------

Rezystory R1, R6 : 220Ohm R2 : 10kOhm R3 : 150kOhm R4 : 33kOhm R5 : 3,9kOhm R7, R8 : 100kOhm P1 : 10kOhm Kondensatory C1, C2 : 2,2uF C3 : 47pF C4 : 100nF C5 : 470nF C6 : 220nF Półprzewodniki T1 : BC238 US1 : ADC0804 Różne Złącze USER

Nie słyszałem o scalonych przetwornikach, które miałyby mniej niż 8 bitów, mógłbyś podać jakieś przykłady i napisać coś o doświadczeniach z nimi? Czemu te 4-ro bitowe miałyby być lepsze niż 8-io bitowe (w trybie 4-ech bitów)?
Myślę, że szumy i tak są niesłyszalne, ponieważ szum akustyczny jest najczęściej wycinany przez zbyt małą częstotliwość próbkowania (typowy przypadek), ale dość wyraźnie daje się we znaki chrobot, czyli gdy jest zbyt mała rozdzielczość próbki oraz występujące błędy kwantyzacji.
Te uśrednianie, jak dla mnie to bardziej ciekawostka, niż coś innowacyjnego. Jestem ciekawy do jakiego maksymalnego próbkowania można się posunąć, kiedy uśredniamy sampl? Rozumiem, że dzieje się to w realtime?
Samplowanie na Pc jest dobrym pomysłem, jeśli nie masz samplera do C64, ale moje odczucia są takie, że jeden materiał lepiej brzmi, gdy jest zrobiony na Pc, inny bardziej podoba mi się, gdy zrobi się go na C64. Na pewno edytory na Pc dają spore możliwości edycyjne, tylko, że późniejsze konwertowanie sampla do 4-ch bitów, większość tych zalet niweczy. Można spróbować jeszcze popracować nad dynamiką sampla, to daje czasem pewne wyjście z problemu. Któryś sampl zrobiłem tą techniką (na którymś kompo był puszczany), żebym tylko pamiętał, który to był :-)