--- title: "Decision Maker" id: 63127 type: "computer_media" slug: "decision-maker" url: "http://localhost/computer_media/decision-maker/" markdown_url: "http://localhost/computer_media/decision-maker.md" published_at: "2026-01-26T12:22:19+00:00" modified_at: "2026-03-30T21:41:40+00:00" author: "David Anderson" featured_image: url: "http://localhost/wp-content/uploads/2026/01/decision-maker.png" category: - name: "Archived Media" slug: "archived-media" taxonomy: "category" url: "http://localhost/category/archived-media/" post_tag: - name: "Byte Power" slug: "byte-power" taxonomy: "post_tag" url: "http://localhost/tag/byte-power/" - name: "Downloadable" slug: "downloadable" taxonomy: "post_tag" url: "http://localhost/tag/downloadable/" - name: "TS 2068" slug: "ts2068" taxonomy: "post_tag" url: "http://localhost/tag/ts2068/" model: - name: "Timex/Sinclair 2068" slug: "ts-2068" taxonomy: "model" url: "http://localhost/model/ts-2068/" indiv: - name: "Kristian Boisvert" slug: "boisvert-kristian" taxonomy: "indiv" url: "http://localhost/indiv/boisvert-kristian/" genre: - name: "Business" slug: "business" taxonomy: "genre" url: "http://localhost/type/business/" media_contents: - id: 63049 title: "Byte Power Spring 1987" type: "computer_media" url: "http://localhost/computer_media/byte-power-spring-1987/" media_type: "Program" programmers: - name: "Kristian Boisvert" slug: "boisvert-kristian" taxonomy: "indiv" url: "http://localhost/indiv/boisvert-kristian/" mediadate: "1987" producer_company: - id: 25181 title: "Byte Power" type: "company" url: "http://localhost/company/byte-power/" images: - url: "http://localhost/wp-content/uploads/2026/01/decision-maker.png" article_media: - id: 63071 title: "Decision Maker" type: "article" url: "http://localhost/article/decision-maker-2/" media_type_tags: "Business" --- # Decision Maker ## Source Code ``` 0 REM DECISION MAKER ©1987 BYTE POWER WRITTEN BY KRISTIAN BOISVERT 1 IF PEEK 23681<>0 THEN PRINT AT 0,0;: RANDOMIZE USR 50900: NEW 2 CLS : LIST 9999: STOP 9000 INK 0: PAPER 7: BORDER 7: CLS : PRINT AT 8,9;"DECISION MAKER";AT 12,0;"STILL LOADING..." 9010 INK 7: LOAD ""CODE : INK 0: RUN 9999 SAVE "DECISION" LINE 9000: SAVE "DECISION"CODE 49965,10460: VERIFY "DECISION": VERIFY "DECISION"CODE ```