
T64K
:screen:
CONST(0,F) :screenplusone:CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(65535,F) CONST(32767,F)
CONST(1,F) CONST(16384,F)

CONST(10385,F) CONST(20241,F)

CONST(10513,F) CONST(16657,F)

CONST(61201,F) CONST(20241,F)

CONST(10385,F) CONST(18449,F)

CONST(61309,F) CONST(20349,F)

CONST(1,F) CONST(16384,F)
CONST(65535,F) CONST(32767,F)

CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)

/*second screen */

CONST(0,F) CONST(0,F)
CONST(30464,F) CONST(78,F)
CONST(21760,F) CONST(74,F)
CONST(18176,F) CONST(78,F)
CONST(28672,F) CONST(224,F)
CONST(0,F) CONST(0,F)
CONST(19110,F) CONST(4097,F)
CONST(44708,F) CONST(30578,F)
CONST(43758,F) CONST(21842,F)
CONST(9220,F) CONST(22354,F)
CONST(0,F) CONST(0,F)
CONST(2158,F) CONST(21130,F)
CONST(12458,F) CONST(43698,F)
CONST(43118,F) CONST(43946,F)
CONST(4128,F) CONST(35345,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)

/* third screen */

CONST(0,F) CONST(0,F)
CONST(0,F) CONST(1,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(1,F)
CONST(49152,F) CONST(1,F)
CONST(16384,F) CONST(0,F)
CONST(16384,F) CONST(0,F)
CONST(49152,F) CONST(1,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)
CONST(22098,F) CONST(19859,F)
CONST(21842,F) CONST(18578,F)
CONST(25975,F) CONST(60819,F)
CONST(21845,F) CONST(43282,F)
CONST(30325,F) CONST(44475,F)
CONST(0,F) CONST(0,F)
CONST(0,F) CONST(0,F)


:endscreen:
P0F

GK

TtempF
AsixteenF
:loopone:
TcountoneF
:loadone:
AscreenF
R64F
R64F
:loadtwo:
AscreenplusoneF
:store:
T0D
AloadoneF
AfourF
TloadoneF
AloadtwoF
AfourF
TloadtwoF
AstoreF
AfourF
TstoreF

AcountoneF
SoneF
ElooponeF


TcountoneF
ZF
AthirtyfiveF

:looptwo:
TcounttwoF
A0D
LD
T0D
A2D
RD
T2D
A4D
LD
T4D
A6D
RD
T6D
A8D
LD
T8D
A10D
RD
T10D
A12D
LD
T12D
A14D
RD
T14D
A16D
LD
T16D
A18D
RD
T18D
A20D
LD
T20D
A22D
RD
T22D
A24D
LD
T24D
A26D
RD
T26D
A28D
LD
T28D
A30D
RD
T30D

AcounttwoF
SoneF
ElooptwoF

TtempF
AreplaceinstF
TstoreF
AloadoneF
SendinstF
G0@

TtempF
AfilledD
T0D
AfilledD
T2D
AfilledD
T4D
AfilledD
T6D
AfilledD
T8D
AfilledD
T10D
AfilledD
T12D
AfilledD
T14D
AfilledD
T16D
AfilledD
T18D
AfilledD
T20D
AfilledD
T22D
AfilledD
T24D
AfilledD
T26D
AfilledD
T28D
AfilledD
T30D
AfilledD
T32D

/* load text */
AonethreethreeF
:loopthree:
TcountoneF
ItempF
AtempF
L1024F
TtempF
OtempF
AcountoneF
SoneF
EloopthreeF

T500K
:countone:CONST(16,F)
:sixteen:CONST(16,F)
:thirtyfive:CONST(35,F)
:one:CONST(1,F)
:four:CONST(4,F)
:counttwo:CONST(35,F)
:endinst:AendscreenF
:replaceinst:T0D
:temp:P0F /* temporary for clearing the accumulator*/
 P0F
:filled:V2047D
 V2047D
:onethreethree:
 CONST(137,F)
E0Z
PF

*@&GENERAL!PROTECTION!FAULT@&
 !IN!MODULE!KERNEL#17M*DLL@&
 @&
 !!!!PLEASE!INSERT!CD!!!!@&
 !!!!!SERVICE!PACK!#4*!!!!!@&
 !!!!!!!IN!DRIVE!D!!!!!!!@&
 
/* 137 characters */


