Publication: Syntax
Pub Details: Syntax/Syntax ZX80 v3 n8 (Volume 3, Issue 8)
Date: August 1982
Pages: 18
You can make 45 degree angles with two nested FOR-NEXT loops:
1. Diagonal line from lower left to upper right:
10 FOR A=X TO X where X is lower left point
20 FOR B=X TO N where N is upper right point
30 PLOT A,B
40 NEXT A
50 NEXT B
2. Diagonal line from upper left to lower right:
10 FOR A=X TO X where X is upper left point
20 FOR B=N TO X STEP -1 where N is lower right point
30 PLOT A,B
40 NEXT A
50 NEXT B
Here is the listing for “M”. Lines 10-30 and 140-160 plot the vertical uprights.
10 FOR A=10 TO 30
20 PLOT 0,A
30 NEXT A
40 FOR B=1 TO 1
50 FOR C=30 TO 24 STEP -1
60 PLOT B,C
70 NEXT B
80 NEXT C
90 FOR D=7 TO 7
100 FOR E=24 TO 30
110 PLOT D,E
120 NEXT D
130 NEXT E
140 FOR F=10 TO 30
150 PLOT 14,F
160 NEXT F
Note: Type-in program listings on this website use ZMAKEBAS notation for graphics characters.