6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-15 17:30:06 +00:00
Code Issues Projects Releases Wiki Activity

test program for get_ostype() function

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@163 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cpg 2000-07-17 00:35:12 +00:00
parent badf78999f
commit 3f043c5d92
1 changed files with 44 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
testcode/lib/atari/ostype.c Normal file
View File

@ -0,0 +1,44 @@
/*
* testprogram for get_ostype() function
*
* 17-Jul-2000, cpg@aladdin.de
*/
#include <stdio.h>
#include <atari.h>
int main(void)
{
unsigned int t;
unsigned char palntsc;
unsigned char *rev;
unsigned char minor;
unsigned char c;
t = get_ostype(); /* get computer type */
palntsc = (t & AT_OS_PALNTSC) >> 3;
minor = (t & AT_OS_TYPE_MINOR) >> 5;
if (palntsc != AT_OS_PAL) palntsc = 0; /* 1 - PAL; 0 - NTSC */
switch(t & AT_OS_TYPE_MAIN) {
case AT_OS_UNKNOWN:
default:
printf("unknown system type !!\n");
break;
case AT_OS_400800:
if (minor == 1) rev = "A";
else rev = "B";
printf("it's a 400/800, %s, Rev. %s\n",palntsc ? "PAL" : "NTSC",rev);
break;
case AT_OS_1200XL:
if (minor == 1) rev = "10";
else rev = "11";
printf("it's a 1200XL, %s, Rev. %s\n",palntsc ? "PAL" : "NTSC",rev);
break;
case AT_OS_XLXE:
printf("is'a a XL/XE, %s, Rev. %d\n",palntsc ? "PAL" : "NTSC",minor);
break;
}
printf("hit <RETURN> to continure...\n");
c = getchar();
}