cc65/libsrc/pce/clrscr.s


                .include "pce.inc"

                .export _clrscr
_clrscr:

                st0     #VDC_MAWR
                st1     #<$0000
                st2     #>$0000

                st0     #VDC_VWR
                ldy     #$40
rowloop:        ldx     #$80
colloop:        lda #' '
                staio VDC_DATA_LO
                lda #$02
                staio VDC_DATA_HI

                dex
                bne     colloop
                dey
                bne     rowloop

                rts
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00
more cleanup, joystick works again 2015-07-12 12:27:24 +00:00			`.include "pce.inc"`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00
added compiler/assembler target, lib compiles 2014-11-29 14:35:20 +00:00			`.export _clrscr`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00			`_clrscr:`

added compiler/assembler target, lib compiles 2014-11-29 14:35:20 +00:00			`st0 #VDC_MAWR`
			`st1 #<$0000`
			`st2 #>$0000`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00
added compiler/assembler target, lib compiles 2014-11-29 14:35:20 +00:00			`st0 #VDC_VWR`
			`ldy #$40`
			`rowloop: ldx #$80`
			`colloop: lda #' '`
			`staio VDC_DATA_LO`
			`lda #$02`
			`staio VDC_DATA_HI`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00
added compiler/assembler target, lib compiles 2014-11-29 14:35:20 +00:00			`dex`
			`bne colloop`
			`dey`
			`bne rowloop`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00
added compiler/assembler target, lib compiles 2014-11-29 14:35:20 +00:00			`rts`
initial import, completely untested, does not compile yet 2014-11-29 13:18:48 +00:00