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

Port plasma to the C128

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1437 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2002-10-03 19:19:25 +00:00
parent fc774b3006
commit 13f81d0377
2 changed files with 37 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
samples/README
View File

@ -30,7 +30,7 @@ Name: mousedemo
Description: Shows how to use the mouse.
Platforms: All systems with mouse and conio support:
Atari (untested), C64, C128 and CBM510
-----------------------------------------------------------------------------
Name: nachtm
Description: Plays "Eine kleine Nachtmusik" by Wolfgang Amadeus Mozart
@ -41,8 +41,8 @@ Platforms: All systems that have the Commodore SID (Sound Interface
-----------------------------------------------------------------------------
Name: plasma
Description: A fancy graphics demo written by groepaz/hitmen.
Platforms: The program needs a VIC but has not been ported to / tested
on the C128, so it does currently run on the CBM510 and C64.
Platforms: The program needs a VIC, so it runs on the following systems:
C64, C128, CBM510
-----------------------------------------------------------------------------
Name: sieve

45
samples/plasma.c
View File

@ -15,7 +15,7 @@
#if defined(__C64__)
#if defined(__C64__) || defined(__C128__)
# define SCREEN1 0xE000
# define SCREEN2 0xE400
# define CHARSET 0xE800
@ -113,7 +113,7 @@ static void doplasma (void)
c2B -= 3;
for (ii = 0; ii < 25; ++ii) {
/* Unrolling the following loop will give a speed increase of
* nearly 100% (~24fps), but it will also increase the code
* nearly 100% (~24fps), but it will also increase the code
* size a lot.
*/
for (i = 0; i < 40; ++i, ++scrn) {
@ -165,6 +165,14 @@ int main (void)
unsigned long fps;
unsigned fps10;
#if defined(__C64__)
unsigned char block;
#endif
#if defined(__C128__)
unsigned char block;
unsigned char initflag;
unsigned char graphflag;
#endif
clrscr ();
cprintf ("Making charset, mompls");
@ -176,9 +184,19 @@ int main (void)
text = textcolor (COLOR_BLACK);
clrscr ();
#if defined(__C64__)
#if defined(__C64__) || defined(__C128__)
/* Move the VIC 16K block */
outb (&CIA2.pra, 0x00);
block = inb (&CIA2.pra);
outb (&CIA2.pra, (block & 0xFC) | ((SCREEN1 >> 14) ^ 0x03));
#endif
#if defined(__C128__)
/* Save and change some flags, so that kernal/basic interupt handler will
* not interfere with our routine.
*/
initflag = *(unsigned char*) 0xA04;
*(unsigned char*) 0xA04 &= 0xFE;
graphflag = *(unsigned char*) 0xD8;
*(unsigned char*) 0xD8 = 0xFF;
#endif
/* Remember the VIC address register */
@ -187,17 +205,17 @@ int main (void)
/* Run the demo until a key was hit */
t = clock ();
while (!kbhit()) {
/* Build page 1, then make it visible */
/* Build page 1, then make it visible */
scrn = (unsigned char*)SCREEN1;
doplasma();
outb (&VIC.addr, PAGE1);
outb (&VIC.addr, PAGE1);
/* Build page 2, then make it visible */
/* Build page 2, then make it visible */
scrn = (unsigned char*)SCREEN2;
doplasma();
outb (&VIC.addr, PAGE2);
outb (&VIC.addr, PAGE2);
/* Count frames */
/* Count frames */
f += 2;
};
t = clock() - t;
@ -205,9 +223,14 @@ int main (void)
/* Switch back the VIC screen */
outb (&VIC.addr, v);
#if defined(__C64__)
#if defined(__C64__) || defined(__C128__)
/* Move back the VIC 16K block */
outb (&CIA2.pra, 0x03);
outb (&CIA2.pra, block);
#endif
#if defined(__C128__)
/* Restore the flags */
*(unsigned char*) 0xA04 = initflag;
*(unsigned char*) 0xD8 = graphflag;
#endif
/* Fetch the character from the keyboard buffer and discard it */