--- title: "Try This" type: "article" slug: "try-this" url: "http://localhost/article/try-this/" markdown_url: "http://localhost/article/try-this.md" published_at: "2020-10-27T17:18:24+00:00" modified_at: "2026-06-21T23:26:28+00:00" featured_image: url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg" excerpt: "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$…" category: - name: "SYNC" slug: "sync" taxonomy: "category" url: "http://localhost/category/periodicals/sync/" post_tag: - name: "1984" slug: "year-1984" taxonomy: "post_tag" url: "http://localhost/tag/year-1984/" - name: "Full Text" slug: "fulltext" taxonomy: "post_tag" url: "http://localhost/tag/fulltext/" - name: "TS 1000" slug: "ts1000" taxonomy: "post_tag" url: "http://localhost/tag/ts1000/" - name: "TS 2068" slug: "ts2068" taxonomy: "post_tag" url: "http://localhost/tag/ts2068/" - name: "Type-in program" slug: "type-in-program" taxonomy: "post_tag" url: "http://localhost/tag/type-in-program/" model: - name: "Timex/Sinclair 1000" slug: "ts-1000" taxonomy: "model" url: "http://localhost/model/ts-1000/" - name: "Timex/Sinclair 2068" slug: "ts-2068" taxonomy: "model" url: "http://localhost/model/ts-2068/" indiv: - name: "Carlos Gonzalez" slug: "carlos-gonzalez" taxonomy: "indiv" url: "http://localhost/indiv/carlos-gonzalez/" - name: "Chris BoVee" slug: "bovee-chris" taxonomy: "indiv" url: "http://localhost/indiv/bovee-chris/" - name: "Christopher Marsh" slug: "christopher-marsh" taxonomy: "indiv" url: "http://localhost/indiv/christopher-marsh/" - name: "Sharon Zardetto Aker" slug: "aker-sharon-zardetto" taxonomy: "indiv" url: "http://localhost/indiv/aker-sharon-zardetto/" - name: "Ted Pozyski" slug: "ted-pozyski" taxonomy: "indiv" url: "http://localhost/indiv/ted-pozyski/" publication: "Sync" publication_r: id: 10243 title: "SYNC" type: "periodical" url: "http://localhost/periodical/sync-magazine/" authors: "Christopher Marsh; Ted Pozyski; Chris BoVee; Sharon Zardetto Aker; Carlos Gonzalez" volume: "4" issue: "2" issues_articles: - id: 26460 title: "SYNC v4 n2" type: "issue" url: "http://localhost/issue/sync-v4-n2/" pages: "6-7" pubdate: "March/April 1984" archive_link: false volumeissue: "v4n2" --- ### 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](http://localhost/indiv/christopher-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](http://localhost/indiv/ted-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](http://localhost/indiv/bovee-chris/) 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](http://localhost/indiv/aker-sharon-zardetto/) 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](http://localhost/indiv/carlos-gonzalez/) 2601 S.W. 9 St„ #2 Miami, FL 33135