PROGRAM
NO.
1
870
LPR
I
NT
";
036"
;CHRS(
127)
;"0
;0540pO;
203'pOO
;229CLpO;
419'"
;CHR$(
94
);:"'AO
;468:AFHP'
6"
;CH
Rf(29)
880
LPR
I
NThL
4":LPRI'NTCHRS (28) ;
II
;03'5D";
CHRf
( 127) ;
"DDO
;053
11
;CHRS('95l;··
'0
;205
";CHRS
( 126) ;
"CO
;225ABL
pO
;421
pOO
;464CDX
"O;638HIJJLH6";"
,.'
890' ,LPRINT";036
II
;CHR$
(127)
;"0
;052"
;CHR$
(127 );'''0
;20'6pOO
;222AFX'0;422xGO;459ABLP'0';
638
9
bbb.bg6";CHRS(29)
.
900,'
LPR
I
NT
liE":
LPRI
NTCHR$
(28) ;1I;035D
";
CHRS
(127) ;
"DDO
;051"
;CHR$
( 127) ;
II
0
;208"
;CHR$·(
94)
;"
CO;219CDX'0;424'";CHR$(92);"Ct;454AGFHpO;638C@AA@C@@@@bfJJrb6~;.
'.,
~
,.' '
·910
LPR
INT";03'6"
;CHR$
(127)
;"
0;049Hn;
CHR$
(
124);
"hO;209
pOO
;216CLpO
;427H"
;'CHR$(
94
-)
;
"GCA
AAAABBBBDD'D
DHHHHPPPP
,
"x
pO
;638xI
xyI
x@@@@NQQQQN6"
;
CHRS'(29)
930. LPRINT"S 3" :LPRINT
CHR$
(28);"
;035D"
;CHR$(
127);
"DDO;211"
;CHR$(l24);
"COLp'O;428xO;
638xDLpDx@@@'@NDDDDN6;212
,It
;CHRf
(
'124)
;"
0
;638"
;CHRS
(92) ;
II
bb
",;CHRS
(126) ;
II
bb@@@@''';CHR$
(95
);"DDDDD6";
940
RE"
950'LPRI
NT
II;638"
;CHRS(95
) ;'"
AOOA
It;
CHRS
(95);
II
(!f!@IGHI,IHG6;638GHHGDH@@@@DddddC6"
;
960
RE"
'.
970LPRIMT";638cdf@dc@@@@QRRRRa6;63IbRRRSbtt@@xIIIlx61638IXhhHI'@@@xDDDDx~;638p""p@
@@@";CH~S(94)"bb";CHR$(94)1"Rb6;638fVHDrq@@@@OGQOAA6;63aGHHHHG6;638Bcbb~G6";CHRi(29);
980
A$=STRIHG$(7,CHRt<127»
990
RE"
'1000'
BS=STRING$(7
,CHR$(95»
1010
CS=STRING$(128,"D")
",
'''1020
D$
=
S'TR
I
MG$
(198,1'
A")
1030 ES=STRINGS(20,"@")
1040
GS=STRING'$(
7,1I@")
1050
P$=A$+E$
1060
LPRI
N'T"S'
80":LPRINT
CHR$
(28)
;
as
;035D"
;CHR$(
127)
;uDD'6
;036
".;CHR$
(127) ;
110
;290000000
OO;614GGGGCGG";E$;A$;Et;"GGGCCGG6";CHR$(29);
1070
REfit
1080
LPRINT
"A
70
PRODUCTION
OVE,RTI"E
BREAI<POIN:T";CHRS(95)
;CHRi(9'5) ;CHR$(95)
1090
-RE"
1100
LPRI
NT
CHR$
(28) ;
II
;614"
;AS
;ES
;A$;
E$
;A~;
"0;633
11
;
D$;
"0;261l9@DAA,A@IAAAA@I''';GS;G$
;A$
;
itO
;
035
DII
; CHR$ (
127
) ;
I'D
D6
";
.'
.
.'
, ' , ,
1110
RE"
1120
LPRI
NT" ;036
u;
CHR$
(127) ;
"0;
101
GGGGGGGO;
272'
PHDBAO
;290
'*;A$;
110
;58700000000;614"
;A$;
STR'ING$(
12,"@");CHR$(1'27) ;G$;A";E$;A$;U6
t1
;CHR$(29);
1130
RE"
1140
-LPRIMT"L'
60"
:LPR
INT
CHR$
(28)
;
II
;035D
II
;CHR$
(127·)';
"DDI'
;D$
;D$
;DS;
II
0;
101'"
;AS;STRINGS
(170,"@");"'RKC"i
CHR
$(9S);IIOI@@I@@";At;"O;587
n
;A$;E$;AS;It@@I@@@@@@@@@";CHR$(12'7);"I@@
'@lt~;A$;E$~A$;EStG$;£$;I'AAAAAAA6";
1150
RE"
11'60'LPRI
NT
n·
;036"
;CHRS'(127)
;'''0;07
4CCCCCCC";
STRINC$(20
,"1")
;A$
;"0
;290"
;A$;
"0";
533G,GGGGG
Cit;
STRI
MG$
(47 ,1I@1t)
;AS
;E$;A$
;,E$
;,A$;E$
;Af
;E$
;·
..
·GGGGGGG";
E$
;A$;
It
6
II
;CHR$
(29)
;
1170RE"
. , -
1.180
,LPR
I
NT
liE
50
II
:LPRINT
CHR$
(28)
; It;
035D
U
;CHR$
(12,7)
;"iDD'~;
STRI
N&S'(
3-5
t
..
,·U}
;A$ ;E$;A:$;
"0
;290"
;AS;E$;
,.
GCGC&GC";
E$
;A$;"O
;533";A$
;ES
;C$;
E$
;AS';
E$
;AS;
E$
;A'$;
E$
;
A'S
; E$;AS;
E$';A$
;E$;
II
AAAAAAA";ES;B$;"6";
1190
RE"
1200LPRI
NTuO
;533
11
,;A$;E$;G$;ES
;A$;
E$
;.A$
;E$;A$;E$ ;A$ ;E$ ;A$
;Et
;A$
;ES
;AS
;E~;AS;
1210
LPR
I NT,"O
;290"
;A$;
E$
;A$;
£$
;A$;
"0;036
u,
;CHRt
('1271
;'STR
INC'S
(37,"@" ) ;A$
;E$
;A~;E~
;"A$;"
,6";CHR$(29);
,
l:220LPRINT
"s
'40"
-1,230LPRINTCHR$(28) ;'
1240
RE"
A-6