[CSDb] - User Forums - Looping "woooawoooawoooa"-sound from old intros?

You are not logged in

CSDb User Forums

Forums > C64 Coding > Looping "woooawoooawoooa"-sound from old intros?

2012-06-17 16:51

Shadow

Registered: Apr 2002
Posts: 264

Looping "woooawoooawoooa"-sound from old intros?

Yeah, that cryptic description is the best I could do.
So what I'm looking for is the code (which I'm guessing is just a couple of lda/sta to the correct SID-registers) to get that looping, electronic sound "woaawooawooa" that some old intros used instead of music.
I tried fiddling around with the SID-regs to try and recreate it, but no success.
Or if anyone can just remember a intro that uses it, then I guess it would be trivial to just look at the code.

2012-06-17 16:51

Mason

Registered: Dec 2001
Posts: 389

I cant rememeber a intro using it, but you can find it in ECA Paker

2012-06-17 17:00

Conrad
Account closed

Registered: Nov 2006
Posts: 604

http://intros.c64.org/inc_download.php?iid=134 ?

There loads of different tones used in different intros, but my bet that this is the one similar?

2012-06-17 18:31

Mr. SID

Registered: Jan 2003
Posts: 216

Try this:

			lda #$1f
			sta $d418
			sta $d405
			sta $d40c
			sta $d413
			
			lda #$ff
			sta $d406
			sta $d40d
			sta $d414
			
			lda #$51
			sta $d404
			lda #$21
			sta $d40b
			lda #$15
			sta $d412
			
			lda #$04
			sta $d401
			sta $d408
			sta $d40f
			
			ldx #$14
			stx $d400
			
			ldx #$19
			stx $d407
			
			ldx #$0f
			stx $d40e

			lda #$00
			sta $d415
			lda #$04
			sta $d416
			lda #$ff
			sta $d417

2012-06-17 18:33

Burglar

Registered: Dec 2004
Posts: 575

last part of The Final Edge

2012-06-17 18:37

Shadow

Registered: Apr 2002
Posts: 264

Thanks all, yeah, I guess there are variations on this (different frequencies, filters etc. I guess?)
The code Mr.SID posted produces more or less exactly the sound I was thinking of - nice job from the vague description! :)

2012-06-17 19:26

Total Chaos

Registered: Mar 2006
Posts: 58

This is the way I do it (as in Nervous Twitch f.ex.)

setsound:
		ldx #$1f
sndloop:
		lda sndtab,x
		sta $d400,x
		dex
		bpl sndloop
		rts
//----------------------------------------------------------
sndtab:
		.byte $30, $04, $00, $00, $21, $0f, $fa, $28
		.byte $04, $00, $00, $21, $0f, $fa, $18, $02
		.byte $00, $00, $21, $0f, $fa, $00, $00, $ff
		.byte $3f, $6d, $00, $00, $00, $00, $00, $02
//----------------------------------------------------------

2012-06-17 20:02

Shadow

Registered: Apr 2002
Posts: 264

I just found the following sequence ($d400 and forward) in an intro produces exactly the sound I remembered:

.byte $30,$04,$00,$00,$21,$0f,$fa,$28
.byte $04,$00,$00,$21,$0f,$fa,$18,$02
.byte $00,$00,$21,$0f,$fa,$00,$10,$ff
.byte $3f

Seems like it's pretty much the same as yours Total Chaos, with a few bytes exception.

-edit- scratch that, it is exactly the same except your snippet just had some extra bytes included and ONE single bit set in d416 that differs

2012-06-18 15:53

Cruzer

Registered: Dec 2001
Posts: 732

Used to do these kinds of sounds in Basic back in the days to have some sound for the demo effects I was trying to code, without using "rastertime". :)

It's one of the only programs I have typed in from a computer mag. They called it something like "a space sound that doesn't use any CPU resources at all", and that sounded a little too interesting.

After switching to machine code I've always had this option in the back of my mind as a last resort if I was completely out of cycles. This hasn't happened yet, but I won't rule it out, especially if I could get a musician to integrate it as a part of a tune.

2012-06-18 17:26

Sander

Registered: Jan 2002
Posts: 447

Quote:

especially if I could get a musician to integrate it as a part of a tune.

This calls for a compo! Least cpu, least memory.

2012-06-18 17:43

Total Chaos

Registered: Mar 2006
Posts: 58

I actually started to code a player based on the routine above.
I never finished it but it should be able to play chords with a few lda/sta :)

Come on Cruzer, make me one ;)

Refresh

Subscribe to this thread: