move samples that only work for a specific target into subdirs named the same as the target
This commit is contained in:
56
samples/atari2600/hello.c
Normal file
56
samples/atari2600/hello.c
Normal file
@@ -0,0 +1,56 @@
|
||||
/*****************************************************************************/
|
||||
/* */
|
||||
/* Atari VCS 2600 sample C program */
|
||||
/* */
|
||||
/* Florent Flament (contact@florentflament.com), 2017 */
|
||||
/* */
|
||||
/*****************************************************************************/
|
||||
|
||||
#include <atari2600.h>
|
||||
|
||||
// PAL Timings
|
||||
// Roughly computed based on Stella Programmer's guide (Steve Wright)
|
||||
// scanlines count per section.
|
||||
#define VBLANK_TIM64 51 // 45 lines * 76 cycles/line / 64 cycles/tick
|
||||
#define KERNAL_T1024 17 // 228 lines * 76 cycles/line / 1024 cycles/tick
|
||||
#define OVERSCAN_TIM64 42 // 36 lines * 76 cycles/line / 64 cycles/tick
|
||||
|
||||
// Testing memory zones
|
||||
const unsigned char rodata_v[] = "Hello!";
|
||||
unsigned char data_v = 0x77;
|
||||
unsigned char bss_v;
|
||||
|
||||
void main(void) {
|
||||
unsigned char color = 0x79; // Stack variable
|
||||
bss_v = 0x88; // Testing BSS variable
|
||||
|
||||
for/*ever*/(;;) {
|
||||
// Vertical Sync signal
|
||||
TIA.vsync = 0x02;
|
||||
TIA.wsync = 0x00;
|
||||
TIA.wsync = 0x00;
|
||||
TIA.wsync = 0x00;
|
||||
TIA.vsync = 0x00;
|
||||
|
||||
// Vertical Blank timer setting
|
||||
RIOT.tim64t = VBLANK_TIM64;
|
||||
|
||||
// Doing frame computation during blank
|
||||
TIA.colubk = color++; // Update color
|
||||
|
||||
// Wait for end of Vertical Blank
|
||||
while (RIOT.timint == 0) {}
|
||||
TIA.wsync = 0x00;
|
||||
TIA.vblank = 0x00; // Turn on beam
|
||||
|
||||
// Display frame
|
||||
RIOT.t1024t = KERNAL_T1024;
|
||||
while (RIOT.timint == 0) {}
|
||||
TIA.wsync = 0x00;
|
||||
TIA.vblank = 0x02; // Turn off beam
|
||||
|
||||
// Overscan
|
||||
RIOT.tim64t = OVERSCAN_TIM64;
|
||||
while (RIOT.timint == 0) {}
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user