--- title: "16 Pin Bowling" type: "article" slug: "16-pin-bowling" url: "http://localhost/article/16-pin-bowling/" markdown_url: "http://localhost/article/16-pin-bowling.md" published_at: "2020-10-27T17:09:15+00:00" modified_at: "2026-06-21T23:36:17+00:00" featured_image: url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg" excerpt: "Sixteen pins appear at the top of the screen for Bowling and the ball at the bottom. Use keys 5 and 8 to line up the two and press key 0 to bowl. The ball will be deflected by impact with the pins and thus make your task more difficult. For every pin hit you…" category: - name: "Timex Sinclair User" slug: "timex-sinclair-user" taxonomy: "category" url: "http://localhost/category/periodicals/timex-sinclair-user/" post_tag: - name: "1983" slug: "year-1983" taxonomy: "post_tag" url: "http://localhost/tag/year-1983/" - 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: "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/" publication: "Timex Sinclair User" publication_r: id: 10278 title: "Timex Sinclair User" type: "periodical" url: "http://localhost/periodical/timex-sinclair-user/" volume: "1" issue: "2" issues_articles: - id: 26867 title: "Timex Sinclair User n2" type: "issue" url: "http://localhost/issue/timex-sinclair-user-n2/" pages: "34" pubdate: "July 1983" archive_link: false volumeissue: "v1n2" --- # 16 Pin Bowling Sixteen pins appear at the top of the screen for Bowling and the ball at the bottom. Use keys 5 and 8 to line up the two and press key 0 to bowl. The ball will be deflected by impact with the pins and thus make your task more difficult. For every pin hit you will add one to your score; the score is printed after eight balls and the game ends (1K). ``` 1 LET Q=CODE "" 2 LET S=Q 3 LET C=Q 4 LET M=CODE "(graphic 1)" 5 FOR B=M TO CODE "(graphic 4)" 6 FOR A=M+C TO CODE "(graphic E)"-C 7 PRINT AT B,A;"T" 8 NEXT A 9 LET C=C+M 10 NEXT B 11 LET X=CODE "(graphic 7)" 20 LET F=M 25 LET Y=CODE "?" 30 LET X=X + (INKEY$="8" AND XCODE "") 35 PRINT AT Y,X;" O " 40 IF F>CODE "(graphic E)" THEN GOTO CODE "(graphic -)" 45 IF INKEY$="0" THEN GOSUB CODE "W" 50 GOTO CODE ";" 60 PRINT AT Y,X+M; 65 IF PEEK (PEEK 16398 + VAL "256" * PEEK 16399) - CODE "T" THEN LET Q=Q+M 70 PRINT AT Y,X+M; "O";AT Y,X+M; "(inverse O)"; AT Y,X+M;" " 75 LET Y=Y-M 80 IF Y=M-M THEN LET F=F+M 90 IF Q>S AND RNDS AND RND>VAL ".6" THEN LET X=X+M 100 LET S=Q 110 IF Y=Y-M THEN RETURN 120 GOTO CODE "W" 150 PRINT Q ```