cc65/libsrc/gamate/conio.s

        .include        "gamate.inc"
        .include        "extzp.inc"

        .import         colors
        .importzp       ptr1, tmp1

        .constructor    initconio

        .macpack        longbranch

        .segment        "ONCE"
initconio:
        lda     #0
        sta     LCD_XPOS
        sta     LCD_YPOS
        sta     RVS

        lda     #LCD_MODE_INC_Y
        sta     LCD_MODE

        lda     #COLOR_BLACK
        sta     CHARCOLOR
        lda     #COLOR_WHITE
        sta     BGCOLOR
        rts

        .segment        "RODATA"

        .export         fontdata
fontdata:
        .include        "vga.inc"
conio and most other stuff working now 2015-11-29 01:14:59 +01:00			`.include "gamate.inc"`
			`.include "extzp.inc"`

			`.import colors`
			`.importzp ptr1, tmp1`

			`.constructor initconio`

			`.macpack longbranch`

Renamed INITBSS to INIT and INIT to ONCE. The way we want to use the INITBSS segment - and especially the fact that it won't have the type bss on all ROM based targets - means that the name INITBSS is misleading. After all INIT is the best name from my perspective as it serves several purposes and therefore needs a rather generic name. Unfortunately this means that the current INIT segment needs to be renamed too. Looking for a short (ideally 4 letter) name I came up with ONCE as it contains all code (and data) accessed only once during initialization. 2016-03-06 21:26:22 +01:00			`.segment "ONCE"`
conio and most other stuff working now 2015-11-29 01:14:59 +01:00			`initconio:`
			`lda #0`
			`sta LCD_XPOS`
			`sta LCD_YPOS`
Fix Gamate RVS 2019-10-03 18:47:10 +02:00			`sta RVS`
conio and most other stuff working now 2015-11-29 01:14:59 +01:00
			`lda #LCD_MODE_INC_Y`
			`sta LCD_MODE`

			`lda #COLOR_BLACK`
			`sta CHARCOLOR`
			`lda #COLOR_WHITE`
			`sta BGCOLOR`
			`rts`

			`.segment "RODATA"`

			`.export fontdata`
			`fontdata:`
			`.include "vga.inc"`