POKEY 16-bit channel 7800Basic example?

[+Karl G]

I was trying to combine two POKEY channels into one using pure tones, but I'm doing something wrong here. Can anyone see what am I doing wrong here, perchance?

 

    set tv ntsc
    displaymode 160A
    set pokeysupport on

    pokeybase[[PAUDCTL]]=$50
    psound 0, 0, 10, 8
    psound 1, 0, 10, 0


main
    for a = 0 to 255
        for b = 0 to 255
            pokeybase[[PAUDF0]]=b
            pokeybase[[PAUDF1]]=a
            drawscreen
        next
    next
    goto main

 

16bit.78b

[Synthpopalooza]

Yes ... I see the problem.

 

You should silence the first channel 0 and not 1, for this to work properly.

 

    psound 0, 0, 10, 0
    psound 1, 0, 10, 8

 

 

[+Karl G]

That worked! Thank you.  ?