--- title: "Try This" type: "article" slug: "try-this-20" url: "http://localhost/article/try-this-20/" markdown_url: "http://localhost/article/try-this-20.md" published_at: "2022-10-07T12:27:17+00:00" modified_at: "2026-08-05T12:58:27+00:00" featured_image: url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg" excerpt: "Circle Fill 10 INPUT \"X-COORDINATE? (0-255)(127 IS CENTER) \";X 20 INPUT \"Y-COORDINATE? (0-255)(87 IS CENTER) \";Y 30 INPUT \"RADIUS? \";R 40 CIRCLE X,Y,R: PLOT X,Y 50 INPUT \"CHOOSE COLOR BY KEY NUMBER \";C: INK C 110 FOR N=0 TO R 120 LET Z=R↑2: LET ZZ=N↑2 130 LET XX=SQR (Z-ZZ) 140 LET YY=Y+XX: LET XY=2*XX 150…" category: - name: "Timelinez" slug: "timelinez" taxonomy: "category" url: "http://localhost/category/periodicals/timelinez/" post_tag: - name: "1984" slug: "year-1984" taxonomy: "post_tag" url: "http://localhost/tag/year-1984/" - name: "Best of Timex/Sinclair 2068 Articles and Documents" slug: "ts2068best" taxonomy: "post_tag" url: "http://localhost/tag/ts2068best/" - 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 2068" slug: "ts-2068" taxonomy: "model" url: "http://localhost/model/ts-2068/" indiv: - name: "David Perry" slug: "david-perry" taxonomy: "indiv" url: "http://localhost/indiv/david-perry/" publication_r: id: 21571 title: "Timelinez" type: "periodical" url: "http://localhost/periodical/timelinez/" authors: "David Perry" authors_r: - name: "David Perry" slug: "david-perry" taxonomy: "indiv" url: "http://localhost/indiv/david-perry/" - name: "Walt Gaby" slug: "walt-gaby" taxonomy: "indiv" url: "http://localhost/indiv/walt-gaby/" volume: "2" issue: "8" issues_articles: - id: 39517 title: "TimeLinez v2 n8 Aug 1984" type: "issue" url: "http://localhost/issue/timelinez-v2-n8-aug-1984/" pages: "7" pubdate: "August 1984" archive_link: false --- # Try This ### Circle Fill ``` 10 INPUT "X-COORDINATE? (0-255)(127 IS CENTER) ";X 20 INPUT "Y-COORDINATE? (0-255)(87 IS CENTER) ";Y 30 INPUT "RADIUS? ";R 40 CIRCLE X,Y,R: PLOT X,Y 50 INPUT "CHOOSE COLOR BY KEY NUMBER ";C: INK C 110 FOR N=0 TO R 120 LET Z=R↑2: LET ZZ=N↑2 130 LET XX=SQR (Z-ZZ) 140 LET YY=Y+XX: LET XY=2*XX 150 PLOT X+N,YY: DRAW 0,-XY 160 PLOT X-N,YY: DRAW 0,-XY 170 NEXT N 210 INK 0 220 CIRCLE X,Y,R-12 230 FOR G=11 TO 16 240 CIRCLE X,Y,R+G 250 NEXT G 310 PRINT AT 0,0;"X=";X;AT 1,0;"Y=";Y;AT 2,0;"R=";R 320 PRINT AT 0,8;"COLOR KEY NO.=";C 330 PRINT AT 21,4;"HIT ANY KEY TO REPEAT" 340 PAUSE 0: CLS: GO TO 10 ``` ### CAPS Mode ``` 10 REM ************************************ 12 REM IN AND OUT OF CAPS MODE FROM WITHIN PROGRAM (FOR T/S 2068) See SYNTAX, March 1984 14 REM ************************************ EXAMPLE PROGRAM Walt Gaby, April 1984 16 REM ************************************ 20 POKE 23658,8 30 INPUT a$ 35 FOR n=1 TO 5 40 PRINT a$ 45 NEXT n 50 POKE 23658,0 60 INPUT b$ 65 FOR n=1 TO 3 70 PRINT b$ 75 NEXT n 80 GO TO 10 ```