--- title: "2068 Programs" type: "article" slug: "2068-programs-2" url: "http://localhost/article/2068-programs-2/" markdown_url: "http://localhost/article/2068-programs-2.md" published_at: "2021-06-26T13:05:45+00:00" modified_at: "2026-06-27T09:25:39+00:00" featured_image: url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg" excerpt: "This program was taken, without modification from the December 1986 issue of Sinclair User (Hewson Helpline). It was designed for the Spectrum but works equally well on the 2068. This program will scroll one pixel at a time in any one of four directions." category: - name: "Timex Sinclair User Group Newsletter: Ottawa Chapter" slug: "timex-sinclair-user-group-newsletter-ottawa-chapter" taxonomy: "category" url: "http://localhost/category/periodicals/timex-sinclair-user-group-newsletter-ottawa-chapter/" post_tag: - 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/" publication_r: id: 36591 title: "Timex Sinclair User Group Newsletter: Ottawa Chapter" type: "periodical" url: "http://localhost/periodical/timex-sinclair-user-group-newsletter-ottawa-chapter/" volume: "4" issue: "2" issues_articles: - id: 36605 title: "Timex Sinclair User Group Newsletter: Ottawa Chapter v4 n2" type: "issue" url: "http://localhost/issue/timex-sinclair-user-group-newsletter-ottawa-chapter-v4-n2/" pages: "4" pubdate: "September 1987" archive_link: false --- # 2068 Programs This program was taken, without modification from the December 1986 issue of Sinclair User (Hewson Helpline). It was designed for the Spectrum but works equally well on the 2068. This program will scroll one pixel at a time in any one of four directions. ## Source Code ``` 10 FOR n=1 TO 132 20 READ a 30 POKE 32767+n, a 40 NEXT n 50 STOP 100 DATA 33,0,64,0,191 110 DATA 197,229,209,36,124 120 DATA 230,248,188,32,16 130 DATA 6,8,144,31,31 140 DATA 31,103,1,32,Ø 150 DATA 9,124,23,23,23 160 DATA 103,229,1,32,0 170 DATA 237,176,225,193,16 180 DATA 220,24,43,33,224 190 DATA 87,6,191,197,229 200 DATA 209,124,230,248,188 210 DATA 40,3,37,24,16 220 DATA 14,7,129,31,31 230 DATA 31,103,1,224,255 240 DATA 9,124,23,23,23 250 DATA 103,229,1,32,0 260 DATA 237,176,225,193,16 270 DATA 218,54,0,229,209 280 DATA 19,14,31,237,176 290 DATA 201,33,0,64,6 300 DATA 192,197,167,6,32 310 DATA 203,30,35,16,251 320 DATA 193,16,244,201,33 330 DATA 255,87,6,192,197 340 DATA 167,6,32,203,22 350 DATA 43,16,251,193,16 360 DATA 244,201 1000 FOR n=32 TO 255 1010 PRINT CHR$ n; 1020 NEXT n 1030 FOR n=1 TO 100 1040 RANDOMIZE USR 32768 1050 RANDOMIZE USR 32811 1060 RANDOMIZE USR 32864 1070 RANDOMIZE USR 32882 1080 NEXT n ```