|Syzygy.burdock, HGM,  8-Jan-83 19:54:56|

Boot[];
SetBank[0];
LoadMore[Syzygy];


CP[0, 0]! rMem;
CP[1, 0]! rhMem;
CP[2, 0]! rWData;
CP[3, 0]! rRData;
CP[4, 0]! rResult;
CP[5, 0]! rPassCnt;

CP[10, 0]! banks ← 4;

CP[0, 1]! .MR 0;
CP[1, 1]! .MR 1;
CP[2, 1]! .MR 2;

CP[4, 1]! .MR FFFD;
CP[5, 1]! .MR FFFE;
CP[6, 1]! .MR FFFF;

CP[8, 1]! .MR 10000;
CP[9, 1]! .MR 1FFFF;

CP[B, 1]! .MR 20000;
CP[C, 1]! .MR 2FFFF;

CP[E, 1]! .MR 30000;
CP[F, 1]! .MR 3FFFF;

CP[14, 2]! .TPC 0;

CP[0, 2]! .MR 00000;
CP[1, 2]! .MR 10000;
CP[2, 2]! .MR 20000;
CP[3, 2]! .MR 30000;
CP[4, 2]! .MR 40000;
CP[5, 2]! .MR 50000;
CP[6, 2]! .MR 60000;
CP[7, 2]! .MR 70000;
CP[8, 2]! .MR 80000;
CP[9, 2]! .MR 90000;
CP[A, 2]! .MR A0000;
CP[B, 2]! .MR B0000;

Break[ControlStoreParityError];
Break[DoubleBitMemoryError];
Break[StackErrorTrap];
Break[IBRefillTrap];
Break[Error];
Continue[];