PLOT
Format: var = PLOT (expr1, expr2)
Supported by: Telmac SBASIC v 24.3
Similar commands:
Floating Point BASIC 2.2: PLOT
Pecom 64 BASIC 4.0: PLOT
PLOT function is used for drawing and erasing 'graphics'. To achieve 'graphics' the TMC-600 uses characters #80 to #BF, which are defined as a 2x3 matrix. Allowing 80 x 72 dots to be put on the screen. Expr1 defines the 'column' number (0 to 79) and expr2 the 'line' number (0 to 71).
Return value equals 0 if there was no 'dot' printed at the specified location.
Example 1:
10 CURSOR 1: CLS 20 FOR X = 0 TO 71 30 A = PLOT (X, X) + PLOT (X, 71 - X): NEXT 40 GOTO 20
Example 2:
10 CURSOR 1: CLS 20 FOR X = 0 TO 71 30 A = PLOT (X, X) + PLOT (X, 71 - X): NEXT 40 FOR X = 0 TO 79: A = PLOT (X, 20) 50 NEXT
Example 3:
10 CURSOR 1: CLS
20 FOR X = 0 TO 71
30 A = PLOT (X, X) + PLOT (X, 71 - X): NEXT
40 FOR X = 0 TO 79
50 IF PLOT (X, 10) <>0 THEN A = PLOT (X, 10)
60 NEXT
Example 4, using 2 colours:
10 CURSOR 1: CLS 20 FOR X = 0 TO 79 STEP 2 30 COLOR 4 40 A = PLOT (X, 36 + 30 * SIN (0+X/10)) 50 COLOR 2 60 A = PLOT (X+1,71-EXP (0+X/19)) 70 NEXT