6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 17:29:50 +00:00
Code Issues Projects Releases Wiki Activity

Added get_tv for several platforms

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1709 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2002-12-03 22:19:21 +00:00
parent 6ad3b3078f
commit df956f4628
11 changed files with 132 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
include/cbm.h
View File

@ -108,6 +108,24 @@ extern unsigned char _filetype; /* Default 'u' */
/*****************************************************************************/
/* Machine info */
/*****************************************************************************/
#if defined(__C16__) || defined(__C64__) || defined(__C128__) || defined(__PLUS4__)
#define TV_NTSC 0
#define TV_PAL 1
unsigned char __fastcall__ get_tv (void);
/* Return the video mode the machine is using */
#endif
/*****************************************************************************/
/* CBM kernal functions */
/*****************************************************************************/

1
libsrc/c128/Makefile
View File

@ -31,6 +31,7 @@ OBJS = _scrsize.o \
crt0.o \
color.o \
cputc.o \
get_tv.o \
kbhit.o \
kernal.o \
mouse.o \

1
libsrc/c128/c128.inc
View File

@ -24,6 +24,7 @@ CRAM_PTR = $E2 ; Pointer to current char in color RAM
CHARCOLOR = $F1
FKEY_COUNT = $D1 ; Characters for function key
PALFLAG = $A03 ; $FF=PAL, $00=NTSC
INIT_STATUS = $A04 ; Flag: Reset/NMI Status
FKEY_LEN = $1000 ; Function key lengths
FKEY_TEXT = $100A ; Function key texts

28
libsrc/c128/get_tv.s Normal file
View File

@ -0,0 +1,28 @@
;
; Ullrich von Bassewitz, 2002-12-03
;
; unsigned char __fastcall__ get_tv (void);
; /* Return the video mode the machine is using */
;
.export _get_tv
.include "c128.inc"
;--------------------------------------------------------------------------
; _get_tv
.proc _get_tv
ldx #$01 ; Assume PAL
lda PALFLAG
bne pal
dex ; NTSC
pal: txa
ldx #0
rts
.endproc

1
libsrc/c16/Makefile
View File

@ -19,6 +19,7 @@ OBJS = _scrsize.o \
conio.o \
cputc.o \
crt0.o \
get_tv.o \
kbhit.o \
kernal.o \
randomize.o \

28
libsrc/c16/get_tv.s Normal file
View File

@ -0,0 +1,28 @@
;
; Ullrich von Bassewitz, 2002-12-03
;
; unsigned char __fastcall__ get_tv (void);
; /* Return the video mode the machine is using */
;
.export _get_tv
.include "../plus4/plus4.inc"
;--------------------------------------------------------------------------
; _get_tv
.proc _get_tv
ldx #$01 ; Assume PAL
bit TED_MULTI1 ; Test bit 6
bvc pal
dex ; NTSC
pal: txa
ldx #0
rts
.endproc

1
libsrc/c64/Makefile
View File

@ -32,6 +32,7 @@ OBJS = _scrsize.o \
color.o \
conio.o \
cputc.o \
get_tv.o \
kbhit.o \
kernal.o \
mouse.o \

24
libsrc/c64/get_tv.s Normal file
View File

@ -0,0 +1,24 @@
;
; Ullrich von Bassewitz, 2002-12-03
;
; unsigned char __fastcall__ get_tv (void);
; /* Return the video mode the machine is using */
;
.export _get_tv
.include "c64.inc"
;--------------------------------------------------------------------------
; _get_tv
.proc _get_tv
lda PALFLAG
ldx #0
rts
.endproc

1
libsrc/plus4/Makefile
View File

@ -19,6 +19,7 @@ OBJS = _scrsize.o \
conio.o \
cputc.o \
crt0.o \
get_tv.o \
kacptr.o \
kbasin.o \
kbhit.o \

28
libsrc/plus4/get_tv.s Normal file
View File

@ -0,0 +1,28 @@
;
; Ullrich von Bassewitz, 2002-12-03
;
; unsigned char __fastcall__ get_tv (void);
; /* Return the video mode the machine is using */
;
.export _get_tv
.include "plus4.inc"
;--------------------------------------------------------------------------
; _get_tv
.proc _get_tv
ldx #$01 ; Assume PAL
bit TED_MULTI1 ; Test bit 6
bvc pal
dex ; NTSC
pal: txa
ldx #0
rts
.endproc

1
libsrc/plus4/plus4.inc
View File

@ -50,6 +50,7 @@ TED_T2LO = $FF02
TED_T2HI = $FF03
TED_T3LO = $FF04
TED_T4HI = $FF05
TED_MULTI1 = $FF07
TED_KBD = $FF08
TED_CURSHI = $FF0C
TED_CURSLO = $FF0D