mirror of https://github.com/weiju/amiga-stuff
58 lines
1.7 KiB
C
58 lines
1.7 KiB
C
#include <hardware/custom.h>
|
|
#include <clib/exec_protos.h>
|
|
#include <stdio.h>
|
|
|
|
#include "common.h"
|
|
|
|
/*
|
|
* This is essentially the code for startup.asm from
|
|
* "Amiga Demo Coders Reference Manual" translated to C.
|
|
*
|
|
* This allows a program which operates directly on the hardware
|
|
* to play nice with the operating system and ensure a clean exit
|
|
* to Workbench.
|
|
* A great starting point to use as a template for demos and games.
|
|
*/
|
|
extern struct Custom custom;
|
|
char VERSION_STRING[] = "\0$VER: startup 1.0 (21.09.2016)\0";
|
|
|
|
static UWORD __chip coplist_pal[] = {
|
|
COP_MOVE(BPLCON0, BPLCON0_COMPOSITE_COLOR),
|
|
COP_MOVE(COLOR00, 0x000),
|
|
0x8107, 0xfffe, // wait for $8107,$fffe
|
|
COP_MOVE(COLOR00, 0xf00),
|
|
0xd607, 0xfffe, // wait for $d607,$fffe
|
|
COP_MOVE(COLOR00, 0xff0),
|
|
COP_WAIT_END,
|
|
COP_WAIT_END
|
|
};
|
|
static UWORD __chip coplist_ntsc[] = {
|
|
COP_MOVE(BPLCON0, BPLCON0_COMPOSITE_COLOR),
|
|
COP_MOVE(COLOR00, 0x000),
|
|
0x6e07, 0xfffe, // wait for $6e07,$fffe
|
|
COP_MOVE(COLOR00, 0xf00),
|
|
0xb007, 0xfffe, // wait for $b007,$fffe
|
|
COP_MOVE(COLOR00, 0xff0),
|
|
COP_WAIT_END,
|
|
COP_WAIT_END
|
|
};
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
struct Task *current_task = FindTask(NULL);
|
|
BYTE old_prio = SetTaskPri(current_task, TASK_PRIORITY);
|
|
BOOL is_pal = init_display();
|
|
|
|
custom.cop1lc = is_pal ? (ULONG) coplist_pal : (ULONG) coplist_ntsc;
|
|
|
|
// strobe the COPJMP1 register to make sure the system is using
|
|
// copper list 1 (I found out that leaving this out can lead to
|
|
// strange effects on an emulated 4000 system)
|
|
custom.copjmp1 = 1;
|
|
|
|
waitmouse();
|
|
|
|
reset_display();
|
|
return 0;
|
|
}
|