Table of Contents
Advertisement
PROGRAM NO. 1
1250 LPRIHT";035D" ;CHR$ (,127); "DD" ;STRI HG' (35 , "." ) ;A$; E$ ;A'; E$ -A$; E$ "CCCCCCCO -263" -A'-
'E$;A$;E$;A$;E';A$;E$"GGGGGGGO;479CCCCCCC";E$;G$;E$;A$;E$;G$;Et;A';E$;A$;E$;Ai;E';A$;!
t;l\$lE$;A.;E$;A$;E$;A$~"6";
1260 RE"
, 1270R-Elf
"
,"',
, "
1280
LPRINT";4~9";A$;E'"AAAAI\AA";EtlAt~E$;A$;E';A$;E$\AllEt;A';E$;A$;E$;A';E$;A$;Et;A
'~~E$;Ai~"O";
"
,
'
1290LPR INT" ;263"; F' ;F$ ;F$;F' ;A$;"O ;036"';CHR$ ( 127) ;STR ING'$( 1.0, "'" ) ; uGGGGGGC" ;E$ ;F$ ;F$ ,
;'~'
;1\$; u6,·';CHR$ (29);
1300
RE"
1310
RE"
1320' LPRIHT"
30"'
1".330 RE'"'
<
.
"
,
l340LPRINT ""CHR$ (28); u;035Du ;CHR'( 127> ;uDDu ;STRING$ (8, "@II) ;A$ ;E$ ;A$ ;E$ ;A$ ;E$ ;A$ ;E$ ;A$
;E';G';E$UOOOOOOO";E';G';E';A$;E$;A$;E';A';E$;A$;E$;A$;"0;452GGGGGGC";E$;A$;E$;A';E$;
A$;E$;A$;E';;A$;E$;A$;E$;A$;E';A$;E';A';E';A$;E';A'~E$ ;1\$;"6";
1350
RE"
1360
RE"
.
1370 LPR I NTu;
036
,i
;~HR$(
121)
;"@@@@@@I'@@" ; A' ;E'
;1\$;
E$ ;A$ ;E$
;'1\$
;E$;I\$; E$;"@'I@I@@at;E';1\
$ ;E$ ;A$ ;E' ;A$ ;E$ ;A$ ;E$
;1\$
;E$ ;A$ ;E$;,A$; E$; u@@@@I@'" ;E$; "@@I'@'@'"
,;~$;'A$;
E$
;"1\;$;
E$ ;A$; E$;
A
$; E$ ;
A
$ ;
~$
;
A
$ ;
E
$; A $ ; E$;
A
$; E
$ ;
A
$; ES;
A"
$ ; E
$ ;
A
$ ;
E
$; A
$ ;
E
$,;
A
$
'r"
0"
;CHR
$' (
29, ) ;
1380 LPRINT
" V " "
.
1390 LPRINT CHR$(28);"16";CHR$(29);
1400 RE"
1410 LPRINT"
20",
1420 RE"
1430
RE"
. '
1440 LPRI NT CHR$ (28) ; ..
;035»"
;CHR$(l'27) ; II DDO
;047
II ;F$ ;F$ ;F$ ;F$;
~$;
Fi ;F$; P$ ;F$; F$;F$; FS;
P. ;P$ ;F' ;F$ ;F' ;Ft ;F' ;F$ ;F$ ;F' ;"P$:;Ft ;Ft ;P$; PS ;1\$;"
6
It
'
1450
RE"
' , '
,',
"
1460 LPRI NT CHRS (28') ';
It
;036 ";
CHR$( 127); "8@8"'I@I@," ;PSlP$lF$lF$; Ft;F$ ;F$; F$;F';F$; F$;F'
$;F$;Ft;F$;P';P$;P';F$;F'lFt;F$;F$;P';F$;F';Ft1A$tC~~t(2');
,
1470
LPRIHT
"0"
,
1480 LPRINT CHRS,(
~~
>.; n16"
;CH~$';(
291; "
1490 LPRINT"
'10"
1500 RE"
1510
LPRINT CHR$(28);";035D~;CHR~(127>;"DDI@@@@"@";F$;'$;P$;F$;P$;F$;F$;pj;F$;F$;F$;
F$ ;F$ ;F' ;F$ ;F$ ;F' ;Ft,;P$ ;P$ ;FS ;F' ;F$ ;Ft ;F$ ;Ft ;F$ ;A$;" 6
at
'
"
, 1520 RE"
'
" ,
1"5"3'0
RE"
,"
."
,'"
1540
LPRIHT
CHR'(28)~"~036";CHR$(127);"@'@I@@@@@@II;F$;F$;F$;F';F$;F$;F$;F$;F$;F$;F$;F
$;F$;F$;F$;F$;F$;F';P$;P$;P$;F';Ff;F$;P$;F$;F$;A$;CHR$(29);
1550 LPRIHT "L"
_
_
.
1560
G$=STRING$(3,CHRt(12()}+CHRf(127)+STRING$(3,CHR$(124»tSTRING$(20,"D")
1570 RE"
'
:>158,OL~RI
NT, CH,R$
(~8)
;" 16,;03:6" ;CHR$ ( 127) ;
U
DDDDDDDDDD ";Gt ;GS,;GS ;C$; G$l"GS;G$';G$
;G~$
;G$ ;&$
;&$ ;&$ ;,&';G$,;.&$;&$ ;&$
;G,,$,;~$;G$
;ct
;G,~
;&$
;Gt ;C$ ;Gt ;G$;
It
8
It
;CHR$ (29) ;
159() RE"
"
"
1600 LPRINT"
0:1
~
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20'21
'22'
23
24
25
26
27
28";CHR$(138)'
1'610 LPRINY'u
WEEK NU"BERIt;CHRS(141);CHR$(138);CHR$(138>
1620 LPRINT STRING$(40,"
It)
;"1-979't:;c'HR$(141) ;CHR$('138f, '
1630
LPR INT STR I
HG$
(22,
It
II);"
RELATI ONSHI P OF PROFIT' TO SALES VOLU"E"
1640 LPRINT CHR$(141);STRIHGt(27,CHR$(138»
1660
END
A-7
Hide quick links:
Advertisement
Table of Contents
