mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-31 06:11:29 +01:00
583 lines
13 KiB
ObjectPascal
583 lines
13 KiB
ObjectPascal
{
|
|
This file is part of the Free Pascal run time library.
|
|
Copyright (c) 2004 Karoly Balogh for Genesi S.a.r.l. <www.genesi.lu>
|
|
|
|
Hardware definitions unit for MorphOS/PowerPC
|
|
|
|
MorphOS port was done on a free Pegasos II/G4 machine
|
|
provided by Genesi S.a.r.l. <www.genesi.lu>
|
|
|
|
See the file COPYING.FPC, included in this distribution,
|
|
for details about the copyright.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
**********************************************************************}
|
|
|
|
{$PACKRECORDS 2}
|
|
unit hardware;
|
|
|
|
interface
|
|
|
|
uses exec;
|
|
|
|
|
|
|
|
{ * adkcon bit defines
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
const
|
|
ADKB_SETCLR = 15;
|
|
ADKB_PRECOMP1 = 14;
|
|
ADKB_PRECOMP0 = 13;
|
|
ADKB_MFMPREC = 12;
|
|
ADKB_UARTBRK = 11;
|
|
ADKB_WORDSYNC = 10;
|
|
ADKB_MSBSYNC = 9;
|
|
ADKB_FAST = 8;
|
|
ADKB_USE3PN = 7;
|
|
ADKB_USE2P3 = 6;
|
|
ADKB_USE1P2 = 5;
|
|
ADKB_USE0P1 = 4;
|
|
ADKB_USE3VN = 3;
|
|
ADKB_USE2V3 = 2;
|
|
ADKB_USE1V2 = 1;
|
|
ADKB_USE0V1 = 0;
|
|
|
|
const
|
|
ADKF_SETCLR = (1 Shl ADKB_SETCLR);
|
|
ADKF_PRECOMP1 = (1 Shl ADKB_PRECOMP1);
|
|
ADKF_PRECOMP0 = (1 Shl ADKB_PRECOMP0);
|
|
ADKF_MFMPREC = (1 Shl ADKB_MFMPREC);
|
|
ADKF_UARTBRK = (1 Shl ADKB_UARTBRK);
|
|
ADKF_WORDSYNC = (1 Shl ADKB_WORDSYNC);
|
|
ADKF_MSBSYNC = (1 Shl ADKB_MSBSYNC);
|
|
ADKF_FAST = (1 Shl ADKB_FAST);
|
|
ADKF_USE3PN = (1 Shl ADKB_USE3PN);
|
|
ADKF_USE2P3 = (1 Shl ADKB_USE2P3);
|
|
ADKF_USE1P2 = (1 Shl ADKB_USE1P2);
|
|
ADKF_USE0P1 = (1 Shl ADKB_USE0P1);
|
|
ADKF_USE3VN = (1 Shl ADKB_USE3VN);
|
|
ADKF_USE2V3 = (1 Shl ADKB_USE2V3);
|
|
ADKF_USE1V2 = (1 Shl ADKB_USE1V2);
|
|
ADKF_USE0V1 = (1 Shl ADKB_USE0V1);
|
|
|
|
const
|
|
ADKF_PRE000NS = 0;
|
|
ADKF_PRE140NS = (ADKF_PRECOMP0);
|
|
ADKF_PRE280NS = (ADKF_PRECOMP1);
|
|
ADKF_PRE560NS = (ADKF_PRECOMP0 or ADKF_PRECOMP1);
|
|
|
|
|
|
|
|
{ * blitter defines
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
const
|
|
HSIZEBITS = 6;
|
|
VSIZEBITS = (16 - HSIZEBITS);
|
|
HSIZEMASK = $3F;
|
|
VSIZEMASK = $3FF;
|
|
|
|
{$IFNDEF NO_BIG_BLITS}
|
|
MINBYTESPERROW = 128;
|
|
MAXBYTESPERROW = 4096;
|
|
{$ELSE}
|
|
MAXBYTESPERROW = 128;
|
|
{$ENDIF}
|
|
|
|
const
|
|
ABC = $80;
|
|
ABNC = $40;
|
|
ANBC = $20;
|
|
ANBNC = $10;
|
|
NABC = $8;
|
|
NABNC = $4;
|
|
NANBC = $2;
|
|
NANBNC = $1;
|
|
|
|
const
|
|
A_OR_B = (ABC or ANBC or NABC or ABNC or ANBNC or NABNC);
|
|
A_OR_C = (ABC or NABC or ABNC or ANBC or NANBC or ANBNC);
|
|
A_XOR_C = (NABC or ABNC or NANBC or ANBNC);
|
|
A_TO_D = (ABC or ANBC or ABNC or ANBNC);
|
|
|
|
const
|
|
BC0B_DEST = 8;
|
|
BC0B_SRCC = 9;
|
|
BC0B_SRCB = 10;
|
|
BC0B_SRCA = 11;
|
|
BC0F_DEST = (1 Shl BC0B_DEST);
|
|
BC0F_SRCC = (1 Shl BC0B_SRCC);
|
|
BC0F_SRCB = (1 Shl BC0B_SRCB);
|
|
BC0F_SRCA = (1 Shl BC0B_SRCA);
|
|
|
|
BC1F_DESC = 2;
|
|
|
|
DEST = BC0F_DEST;
|
|
SRCC = BC0F_SRCC;
|
|
SRCB = BC0F_SRCB;
|
|
SRCA = BC0F_SRCA;
|
|
|
|
ASHIFTSHIFT = 12;
|
|
BSHIFTSHIFT = 12;
|
|
|
|
const
|
|
LINEMODE = $1;
|
|
FILL_OR = $8;
|
|
FILL_XOR = $10;
|
|
FILL_CARRYIN = $4;
|
|
ONEDOT = $2;
|
|
OVFLAG = $20;
|
|
SIGNFLAG = $40;
|
|
BLITREVERSE = $2;
|
|
|
|
SUD = $10;
|
|
SUL = $8;
|
|
AUL = $4;
|
|
|
|
OCTANT8 = 24;
|
|
OCTANT7 = 4;
|
|
OCTANT6 = 12;
|
|
OCTANT5 = 28;
|
|
OCTANT4 = 20;
|
|
OCTANT3 = 8;
|
|
OCTANT2 = 0;
|
|
OCTANT1 = 16;
|
|
|
|
type
|
|
Pbltnode = ^Tbltnode;
|
|
Tbltnode = record
|
|
n : Pbltnode;
|
|
_function: Pointer;
|
|
stat : Byte;
|
|
blitsize : SmallInt;
|
|
beamsync : SmallInt;
|
|
cleanup : Pointer;
|
|
end;
|
|
|
|
const
|
|
CLEANUP = $40;
|
|
CLEANME = CLEANUP;
|
|
|
|
|
|
|
|
{ * byteswap routines
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
{$WARNING Byteswap macros not yet converted!}
|
|
|
|
|
|
|
|
{ * cia registers and bits
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
|
|
type
|
|
PCIA = ^TCIA;
|
|
TCIA = record
|
|
ciapra : Byte;
|
|
pad0 : Array[0..254] of Byte;
|
|
ciaprb : Byte;
|
|
pad1 : array[0..254] of Byte;
|
|
ciaddra : Byte;
|
|
pad2 : array[0..254] of Byte;
|
|
ciaddrb : Byte;
|
|
pad3 : array[0..254] of Byte;
|
|
ciatalo : Byte;
|
|
pad4 : array[0..254] of Byte;
|
|
ciatahi : Byte;
|
|
pad5 : array[0..254] of Byte;
|
|
ciatblo : Byte;
|
|
pad6 : array[0..254] of Byte;
|
|
ciatbhi : Byte;
|
|
pad7 : array[0..254] of Byte;
|
|
ciatodlow: Byte;
|
|
pad8 : array[0..254] of Byte;
|
|
ciatodmid: Byte;
|
|
pad9 : array[0..254] of Byte;
|
|
ciatodhi : Byte;
|
|
pad10 : array[0..254] of Byte;
|
|
unusedreg: Byte;
|
|
pad11 : array[0..254] of Byte;
|
|
ciasdr : Byte;
|
|
pad12 : array[0..254] of Byte;
|
|
ciaicr : Byte;
|
|
pad13 : array[0..254] of Byte;
|
|
ciacra : Byte;
|
|
pad14 : array[0..254] of Byte;
|
|
ciacrb : Byte;
|
|
end;
|
|
|
|
const
|
|
CIAICRB_TA = 0;
|
|
CIAICRB_TB = 1;
|
|
CIAICRB_ALRM = 2;
|
|
CIAICRB_SP = 3;
|
|
CIAICRB_FLG = 4;
|
|
CIAICRB_IR = 7;
|
|
CIAICRB_SETCLR = 7;
|
|
|
|
CIAICRF_TA = (1 Shl CIAICRB_TA);
|
|
CIAICRF_TB = (1 Shl CIAICRB_TB);
|
|
CIAICRF_ALRM = (1 Shl CIAICRB_ALRM);
|
|
CIAICRF_SP = (1 Shl CIAICRB_SP);
|
|
CIAICRF_FLG = (1 Shl CIAICRB_FLG);
|
|
CIAICRF_IR = (1 Shl CIAICRB_IR);
|
|
CIAICRF_SETCLR = (1 Shl CIAICRB_SETCLR);
|
|
|
|
const
|
|
CIACRAB_START = 0;
|
|
CIACRAB_PBON = 1;
|
|
CIACRAB_OUTMODE = 2;
|
|
CIACRAB_RUNMODE = 3;
|
|
CIACRAB_LOAD = 4;
|
|
CIACRAB_INMODE = 5;
|
|
CIACRAB_SPMODE = 6;
|
|
CIACRAB_TODIN = 7;
|
|
|
|
CIACRAF_START = (1 Shl CIACRAB_START);
|
|
CIACRAF_PBON = (1 Shl CIACRAB_PBON);
|
|
CIACRAF_OUTMODE = (1 Shl CIACRAB_OUTMODE);
|
|
CIACRAF_RUNMODE = (1 Shl CIACRAB_RUNMODE);
|
|
CIACRAF_LOAD = (1 Shl CIACRAB_LOAD);
|
|
CIACRAF_INMODE = (1 Shl CIACRAB_INMODE);
|
|
CIACRAF_SPMODE = (1 Shl CIACRAB_SPMODE);
|
|
CIACRAF_TODIN = (1 Shl CIACRAB_TODIN);
|
|
|
|
const
|
|
CIACRBB_START = 0;
|
|
CIACRBB_PBON = 1;
|
|
CIACRBB_OUTMODE = 2;
|
|
CIACRBB_RUNMODE = 3;
|
|
CIACRBB_LOAD = 4;
|
|
CIACRBB_INMODE0 = 5;
|
|
CIACRBB_INMODE1 = 6;
|
|
CIACRBB_ALARM = 7;
|
|
|
|
CIACRBF_START = (1 Shl CIACRBB_START);
|
|
CIACRBF_PBON = (1 Shl CIACRBB_PBON);
|
|
CIACRBF_OUTMODE = (1 Shl CIACRBB_OUTMODE);
|
|
CIACRBF_RUNMODE = (1 Shl CIACRBB_RUNMODE);
|
|
CIACRBF_LOAD = (1 Shl CIACRBB_LOAD);
|
|
CIACRBF_INMODE0 = (1 Shl CIACRBB_INMODE0);
|
|
CIACRBF_INMODE1 = (1 Shl CIACRBB_INMODE1);
|
|
CIACRBF_ALARM = (1 Shl CIACRBB_ALARM);
|
|
|
|
const
|
|
CIACRBF_IN_PHI2 = 0;
|
|
CIACRBF_IN_CNT = (CIACRBF_INMODE0);
|
|
CIACRBF_IN_TA = (CIACRBF_INMODE1);
|
|
CIACRBF_IN_CNT_TA = (CIACRBF_INMODE0 or CIACRBF_INMODE1);
|
|
|
|
const
|
|
CIAB_GAMEPORT1 = (7);
|
|
CIAB_GAMEPORT0 = (6);
|
|
CIAB_DSKRDY = (5);
|
|
CIAB_DSKTRACK0 = (4);
|
|
CIAB_DSKPROT = (3);
|
|
CIAB_DSKCHANGE = (2);
|
|
CIAB_LED = (1);
|
|
CIAB_OVERLAY = (0);
|
|
|
|
CIAF_GAMEPORT1 = (1 Shl CIAB_GAMEPORT1);
|
|
CIAF_GAMEPORT0 = (1 Shl CIAB_GAMEPORT0);
|
|
CIAF_DSKRDY = (1 Shl CIAB_DSKRDY);
|
|
CIAF_DSKTRACK0 = (1 Shl CIAB_DSKTRACK0);
|
|
CIAF_DSKPROT = (1 Shl CIAB_DSKPROT);
|
|
CIAF_DSKCHANGE = (1 Shl CIAB_DSKCHANGE);
|
|
CIAF_LED = (1 Shl CIAB_LED);
|
|
CIAF_OVERLAY = (1 Shl CIAB_OVERLAY);
|
|
|
|
const
|
|
CIAB_COMDTR = (7);
|
|
CIAB_COMRTS = (6);
|
|
CIAB_COMCD = (5);
|
|
CIAB_COMCTS = (4);
|
|
CIAB_COMDSR = (3);
|
|
CIAB_PRTRSEL = (2);
|
|
CIAB_PRTRPOUT = (1);
|
|
CIAB_PRTRBUSY = (0);
|
|
|
|
CIAF_COMDTR = (1 Shl CIAB_COMDTR);
|
|
CIAF_COMRTS = (1 Shl CIAB_COMRTS);
|
|
CIAF_COMCD = (1 Shl CIAB_COMCD);
|
|
CIAF_COMCTS = (1 Shl CIAB_COMCTS);
|
|
CIAF_COMDSR = (1 Shl CIAB_COMDSR);
|
|
CIAF_PRTRSEL = (1 Shl CIAB_PRTRSEL);
|
|
CIAF_PRTRPOUT = (1 Shl CIAB_PRTRPOUT);
|
|
CIAF_PRTRBUSY = (1 Shl CIAB_PRTRBUSY);
|
|
|
|
const
|
|
CIAB_DSKMOTOR = (7);
|
|
CIAB_DSKSEL3 = (6);
|
|
CIAB_DSKSEL2 = (5);
|
|
CIAB_DSKSEL1 = (4);
|
|
CIAB_DSKSEL0 = (3);
|
|
CIAB_DSKSIDE = (2);
|
|
CIAB_DSKDIREC = (1);
|
|
CIAB_DSKSTEP = (0);
|
|
|
|
CIAF_DSKMOTOR = (1 Shl CIAB_DSKMOTOR);
|
|
CIAF_DSKSEL3 = (1 Shl CIAB_DSKSEL3);
|
|
CIAF_DSKSEL2 = (1 Shl CIAB_DSKSEL2);
|
|
CIAF_DSKSEL1 = (1 Shl CIAB_DSKSEL1);
|
|
CIAF_DSKSEL0 = (1 Shl CIAB_DSKSEL0);
|
|
CIAF_DSKSIDE = (1 Shl CIAB_DSKSIDE);
|
|
CIAF_DSKDIREC = (1 Shl CIAB_DSKDIREC);
|
|
CIAF_DSKSTEP = (1 Shl CIAB_DSKSTEP);
|
|
|
|
|
|
|
|
{ * custom-chip registers and bits
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
type
|
|
PAudChannel = ^TAudChannel;
|
|
TAudChannel = record
|
|
ac_ptr: Pointer;
|
|
ac_len: Word;
|
|
ac_per: Word;
|
|
ac_vol: Word;
|
|
ac_dat: Word;
|
|
ac_pad: array[0..1] of Word;
|
|
end;
|
|
|
|
PSpriteDef = ^TSpriteDef;
|
|
TSpriteDef = record
|
|
pos : Word;
|
|
ctl : Word;
|
|
dataa: Word;
|
|
datab: Word;
|
|
end;
|
|
|
|
PCustom = ^TCustom;
|
|
TCustom = record
|
|
bltddat : Word;
|
|
dmaconr : Word;
|
|
vposr : Word;
|
|
vhposr : Word;
|
|
dskdatr : Word;
|
|
joy0dat : Word;
|
|
joy1dat : Word;
|
|
clxdat : Word;
|
|
adkconr : Word;
|
|
pot0dat : Word;
|
|
pot1dat : Word;
|
|
potinp : Word;
|
|
serdatr : Word;
|
|
dskbytr : Word;
|
|
intenar : Word;
|
|
intreqr : Word;
|
|
dskpt : Pointer;
|
|
dsklen : Word;
|
|
dskdat : Word;
|
|
refptr : Word;
|
|
vposw : Word;
|
|
vhposw : Word;
|
|
copcon : Word;
|
|
serdat : Word;
|
|
serper : Word;
|
|
potgo : Word;
|
|
joytest : Word;
|
|
strequ : Word;
|
|
strvbl : Word;
|
|
strhor : Word;
|
|
strlong : Word;
|
|
bltcon0 : Word;
|
|
bltcon1 : Word;
|
|
bltafwm : Word;
|
|
bltalwm : Word;
|
|
bltcpt : Pointer;
|
|
bltbpt : Pointer;
|
|
bltapt : Pointer;
|
|
bltdpt : Pointer;
|
|
bltsize : Word;
|
|
pad2d : Byte;
|
|
bltcon0l: Byte;
|
|
bltsizv : Word;
|
|
bltsizh : Word;
|
|
bltcmod : Word;
|
|
bltbmod : Word;
|
|
bltamod : Word;
|
|
bltdmod : Word;
|
|
pad34 : array[0..3] of Word;
|
|
bltcdat : Word;
|
|
bltbdat : Word;
|
|
bltadat : Word;
|
|
pad3b : array[0..2] of Word;
|
|
deniseid: Word;
|
|
dsksync : Word;
|
|
cop1lc : Longint;
|
|
cop2lc : Longint;
|
|
copjmp1 : Word;
|
|
copjmp2 : Word;
|
|
copins : Word;
|
|
diwstrt : Word;
|
|
diwstop : Word;
|
|
ddfstrt : Word;
|
|
ddfstop : Word;
|
|
dmacon : Word;
|
|
clxcon : Word;
|
|
intena : Word;
|
|
intreq : Word;
|
|
adkcon : Word;
|
|
aud : array[0..3] of TAudChannel;
|
|
bplpt : array[0..7] of Pointer;
|
|
bplcon0 : Word;
|
|
bplcon1 : Word;
|
|
bplcon2 : Word;
|
|
bplcon3 : Word;
|
|
bpl1mod : Word;
|
|
bpl2mod : Word;
|
|
bplcon4 : Word;
|
|
clxcon2 : Word;
|
|
bpldat : array[0..7] of Word;
|
|
sprpt : array[0..7] of Pointer;
|
|
spr : array[0..7] of TSpriteDef;
|
|
color : array[0..31] of Word;
|
|
htotal : Word;
|
|
hsstop : Word;
|
|
hbstrt : Word;
|
|
hbstop : Word;
|
|
vtotal : Word;
|
|
vsstop : Word;
|
|
vbstrt : Word;
|
|
vbstop : Word;
|
|
sprhstrt: Word;
|
|
sprhstop: Word;
|
|
bplhstrt: Word;
|
|
bplhstop: Word;
|
|
hhposw : Word;
|
|
hhposr : Word;
|
|
beamcon0: Word;
|
|
hsstrt : Word;
|
|
vsstrt : Word;
|
|
hcenter : Word;
|
|
diwhigh : Word;
|
|
padf3 : array[0..10] of Word;
|
|
fmode : Word;
|
|
end;
|
|
|
|
|
|
const
|
|
VARVBLANK = $1000;
|
|
LOLDIS = $0800;
|
|
CSCBLANKEN = $0400;
|
|
VARVSYNC = $0200;
|
|
VARHSYNC = $0100;
|
|
VARBEAM = $0080;
|
|
DISPLAYDUAL = $0040;
|
|
DISPLAYPAL = $0020;
|
|
VARCSYNC = $0010;
|
|
CSBLANK = $0008;
|
|
CSYNCTRUE = $0004;
|
|
VSYNCTRUE = $0002;
|
|
HSYNCTRUE = $0001;
|
|
|
|
USE_BPLCON3 = 1;
|
|
|
|
BPLCON2_ZDCTEN = (1 Shl 10);
|
|
BPLCON2_ZDBPEN = (1 Shl 11);
|
|
BPLCON2_ZDBPSEL0 = (1 Shl 12);
|
|
BPLCON2_ZDBPSEL1 = (1 Shl 13);
|
|
BPLCON2_ZDBPSEL2 = (1 Shl 14);
|
|
|
|
BPLCON3_EXTBLNKEN = (1 Shl 0);
|
|
BPLCON3_EXTBLKZD = (1 Shl 1);
|
|
BPLCON3_ZDCLKEN = (1 Shl 2);
|
|
BPLCON3_BRDNTRAN = (1 Shl 4);
|
|
BPLCON3_BRDNBLNK = (1 Shl 5);
|
|
|
|
|
|
|
|
{ * dma bits
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
const
|
|
DMAB_AUD0 = 0;
|
|
DMAB_AUD1 = 1;
|
|
DMAB_AUD2 = 2;
|
|
DMAB_AUD3 = 3;
|
|
DMAB_DISK = 4;
|
|
DMAB_SPRITE = 5;
|
|
DMAB_BLITTER = 6;
|
|
DMAB_COPPER = 7;
|
|
DMAB_RASTER = 8;
|
|
DMAB_MASTER = 9;
|
|
DMAB_BLITHOG = 10;
|
|
DMAB_BLTNZERO = 13;
|
|
DMAB_BLTDONE = 14;
|
|
DMAB_SETCLR = 15;
|
|
|
|
DMAF_AUD0 = (1 Shl DMAB_AUD0);
|
|
DMAF_AUD1 = (1 Shl DMAB_AUD1);
|
|
DMAF_AUD2 = (1 Shl DMAB_AUD2);
|
|
DMAF_AUD3 = (1 Shl DMAB_AUD3);
|
|
DMAF_DISK = (1 Shl DMAB_DISK);
|
|
DMAF_SPRITE = (1 Shl DMAB_SPRITE);
|
|
DMAF_BLITTER = (1 Shl DMAB_BLITTER);
|
|
DMAF_COPPER = (1 Shl DMAB_COPPER);
|
|
DMAF_RASTER = (1 Shl DMAB_RASTER);
|
|
DMAF_MASTER = (1 Shl DMAB_MASTER);
|
|
DMAF_BLITHOG = (1 Shl DMAB_BLITHOG);
|
|
DMAF_BLTNZERO = (1 Shl DMAB_BLTNZERO);
|
|
DMAF_BLTDONE = (1 Shl DMAB_BLTDONE);
|
|
DMAF_SETCLR = (1 Shl DMAB_SETCLR);
|
|
|
|
const
|
|
DMAF_AUDIO = (DMAF_AUD0 or DMAF_AUD1 or DMAF_AUD2 or DMAF_AUD3);
|
|
DMAF_ALL = (DMAF_AUD0 or DMAF_AUD1 or DMAF_AUD2 or DMAF_AUD3 or DMAF_DISK or DMAF_SPRITE or DMAF_BLITTER or DMAF_COPPER or DMAF_RASTER);
|
|
|
|
|
|
|
|
{ * interrupt bits
|
|
* Copyright (c) 2002 The MorphOS Development Team, All Rights Reserved.
|
|
* }
|
|
|
|
const
|
|
INTB_SETCLR = (15);
|
|
INTB_INTEN = (14);
|
|
INTB_EXTER = (13);
|
|
INTB_DSKSYNC = (12);
|
|
INTB_RBF = (11);
|
|
INTB_AUD3 = (10);
|
|
INTB_AUD2 = (9);
|
|
INTB_AUD1 = (8);
|
|
INTB_AUD0 = (7);
|
|
INTB_BLIT = (6);
|
|
INTB_VERTB = (5);
|
|
INTB_COPER = (4);
|
|
INTB_PORTS = (3);
|
|
INTB_SOFTINT = (2);
|
|
INTB_DSKBLK = (1);
|
|
INTB_TBE = (0);
|
|
|
|
INTF_SETCLR = (1 Shl INTB_SETCLR);
|
|
INTF_INTEN = (1 Shl INTB_INTEN);
|
|
INTF_EXTER = (1 Shl INTB_EXTER);
|
|
INTF_DSKSYNC = (1 Shl INTB_DSKSYNC);
|
|
INTF_RBF = (1 Shl INTB_RBF);
|
|
INTF_AUD3 = (1 Shl INTB_AUD3);
|
|
INTF_AUD2 = (1 Shl INTB_AUD2);
|
|
INTF_AUD1 = (1 Shl INTB_AUD1);
|
|
INTF_AUD0 = (1 Shl INTB_AUD0);
|
|
INTF_BLIT = (1 Shl INTB_BLIT);
|
|
INTF_VERTB = (1 Shl INTB_VERTB);
|
|
INTF_COPER = (1 Shl INTB_COPER);
|
|
INTF_PORTS = (1 Shl INTB_PORTS);
|
|
INTF_SOFTINT = (1 Shl INTB_SOFTINT);
|
|
INTF_DSKBLK = (1 Shl INTB_DSKBLK);
|
|
INTF_TBE = (1 Shl INTB_TBE);
|
|
|
|
implementation
|
|
|
|
end.
|