-
M~82/183
________________________________
__
-
-
Finally, try quadruple density
(ESC
Z):
-
-
40 LPRINT CH R$(27);CH R$(90);CH R$(11);CH R$(0);CHR$(1);CH
R$(2);
CH R$(4);CH R$(9);CH R$(18);CH R$(36);CH R$(72);CH R$(144);
-
CH R$(32);CH R$(64);CH R$(128)
-
Compare the results:
-
#co
-
;
;
-
I
The angle
is
even steeper, and the
two
lines have merged
into
one
thick line because
of
even greater overlap,
-
Here
is
another sample program that
uses
a FOR-NEXT
loop
to
print
all the possible combinations
of
dots and spaces in numeric order:
05 'SAMPLE2
06
WIDTH "LPT1:",255
-
10 NDOTS = 256
12
'MAXIMUM
POSSIBLE COMBINATIONS
30
LPRINT CHR$(27);CHR$(75);
CHR$(NDOTS MOD 256);CHR$(FIX(NDOTS/256));
40
'START GRAPHICS 256 COLUMNS -
50 FOR
1=0
TO NDOTS-1
60 LPRINT CHR$(I);
-
70
NEXT I
73
LPRINT:REM LINE FEED
-
-
70