prog8/examples/test.p8

%import textio

main {

;   $1F9C0 - $1F9FF 	PSG registers

    sub start() {
        txt.print("tone")

        uword freq = 1181
        cx16.vpoke(1, $f9c0, lsb(freq))
        cx16.vpoke(1, $f9c1, msb(freq))
        cx16.vpoke(1, $f9c2, %11111111)     ; volume
        cx16.vpoke(1, $f9c3, %11000000)     ; triangle waveform
    }
}
added memory() function for memory slab allocations 2020-12-27 01:22:18 +00:00			`%import textio`
fixed diskio directory block sizes 2020-12-08 00:02:38 +00:00
optimized setting word values into array if index is fixed number 2020-12-08 21:54:20 +00:00			`main {`
cx16 registers should come first in subroutine arg list 2020-12-21 23:59:07 +00:00
added 'align_word' and 'align_page' block options to control block start address alignment in the assembler 2021-02-21 00:24:44 +00:00			`; $1F9C0 - $1F9FF PSG registers`

clearer description of memory() 2021-01-13 21:32:17 +00:00			`sub start() {`
added cx16 rasterbars example 2021-02-22 00:44:07 +00:00			`txt.print("tone")`
don't remove empty when choice from the list of choices! 2021-02-21 14:10:40 +00:00
added cx16 rasterbars example 2021-02-22 00:44:07 +00:00			`uword freq = 1181`
			`cx16.vpoke(1, $f9c0, lsb(freq))`
			`cx16.vpoke(1, $f9c1, msb(freq))`
			`cx16.vpoke(1, $f9c2, %11111111) ; volume`
			`cx16.vpoke(1, $f9c3, %11000000) ; triangle waveform`
changed system irq/rasterirq setting routines 2021-02-21 21:17:28 +00:00			`}`
			`}`