Try This

TS1000/ZX81 (1K RAM or more)

Type in the following lines. Make sure the computer is in SLOW mode, press RUN and ENTER. Type in any character or string of characters and press ENTER. Notice the cursor response. When the screen is full hit CONT, ENTER, and continue typing.

10 POKE 16390,INT (RND*256)
20 INPUT A$
30 PRINT A$
40 GOTO 10

TS2068

Change the 16390 in line 10 to 23617. Notice the difference from the TS1000.

10 POKE 23617,INT (RND*256)
20 INPUT A$
30 PRINT A$
40 GOTO 10

Our thanks to:

Christopher D. Marsh
91 1 Summit Dr
Greensburg, PA 15601

TS1000/ZXJM (2K RAM)

Type in the lines below, press RUN and ENTER. The BREAK key will stop the program at any value of X {degrees).

5 FAST
10 FOR A=0 TO 63
20 PLOT A,21
30 NEXT A
40 FOR B=0 TO 43
50 PLOT 0,B
60 NEXT B
65 SLOW
70 FOR X=0 TO 62
80 PRINT AT 18,10;"Y= 20 SINE X"
85 PRINT AT 20,10;"X=";X*360/62
90 LET Y=20+20*SIN (X/31*PI)
95 PRINT AT 21,10;"Y=";(Y-20)
100 PLOT X,Y
110 NEXT X

TS2068

Delete lines 5 and 65 in the above listing and type in. Notice the difference from the TS1000.

Our thanks to:

Ted A. Pozyski
1215 Thompson St.
Houston, TX 77007

TS1000/ZX81 (1K RAM)

Carefully examine the lines below. Decide what the computer should PRINT. Now type in the lines:

1 REM BOVEE
10 IF .02+.03=.05 THEN PRINT "THEY ARE EQUAL"
30 PRINT .02+.03

Press RUN and ENTER. Did you get what you expected? Our thanks to:

Chris BoVee
Box 8264
Pembroke Pines, FL 33084

TS2068

Type in the lines below, RUN, and ENTER, Observe the results.

10 FOR d=95 TO 255 STEP 10
15 PLOT 65,27: DRAW 100,100,PI*d
20 PAUSE 30: CLS : NEXT d

10 OVER 1
15 FOR n=1 TO 2
20 PLOT 65,27: DRAW 100,100,PI*255
25 NEXT n

Our thanks to:

Sharon Zardetto Aker
20 Courtland Dr.
Sussex, NJ 07461

TS10OO/ZX81 (2K RAM)

Type in the lines below. RUN in SLOW mode. Try to follow the pattern.

10 FOR A=0 TO 10
20 FOR C=A TO 31-A
30 PRINT AT A,C;"\''"
40 IF C>(29-A) THEN GOTO 60
50 PRINT AT 21-A,C+1;"\.."
60 NEXT C
70 FOR L=A+1 TO 20-A
80 PRINT AT L,31-A;"\ :";AT 21-L,A;"\: "
90 NEXT L
100 PRINT AT 0,1;"\''";AT L,31-A;"\.:";AT A,A-1;"\:'";AT L,A;"\:.";AT A,31-A;"\':";AT 11,9;"TIMEXSINCLAIR"
110 NEXT A

Our thanks to:

Carlos Gonzalez
2601 S.W. 9 St„ #2
Miami, FL 33135