|Sneaky.burdock|
Boot[];
SetBank[0];
Load[CedarEtherInitialDLion];
CP[02,0]! uDiagnostic ← 0; |don't bother with boot diagnostic.|
CP[04,0]! uESubBoot ← 52; |(← 52) Jackpot 6-22 boot|
CP[05,0]! uPacketType ← 0600; |(← 0600) PreEtherInitial sets this|
Break[markPages2];
Start[go,0];
Unbreak[markPages2];
CP[02,0]! rD ← 8800;
Break["megaChange"];
Continue[0];
Unbreak["megaChange"];
Break["nextBank+3"];
bankNumber= CP[01,0]! Q;
BankLoop:
Continue[0];
|** SetMP[bankNumber]; **|
IF bankNumber = 87 { GOTO[BankLoopExit]; };
GOTO[BankLoop];
BankLoopExit:
Unbreak["nextBank+3"];
CP[01,1]! rC ← 87;
SetMP[bankNumber];
Break["clearMem+1"];
Continue[0];
Unbreak["clearMem+1"];
Break[OnceOnlyInit];
Continue[0];
Unbreak[OnceOnlyInit];
Break[exitToEmulator];
Continue[0];
Unbreak[exitToEmulator];
Break["enableIOP+1"];
Continue[0];
Unbreak["enableIOP+1"];
SetBank[0];
Load["CedarIO"];
SetBank[1];
LoadMore["Cedar1"];
SetBank[0];
LoadIOPNoSymbols["Domino"];
IOP[02, 1]! PC ← 2000;
|end...|