---
title: "Firstloader — From ZX/TS to 2068"
type: "article"
slug: "firstloader-from-zx-ts-to-2068"
url: "http://localhost/article/firstloader-from-zx-ts-to-2068/"
markdown_url: "http://localhost/article/firstloader-from-zx-ts-to-2068.md"
published_at: "2020-10-27T17:11:49+00:00"
modified_at: "2024-06-23T08:03:44+00:00"
featured_image:
  url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg"
excerpt: "Syntax commissioned a custom program, written by David Ornstein, to convert your existing programs for the 2068 or 48K Spectrums. This program translates input bytes from ZX/TS tapes to an equal number of output bytes in your 2068 that you must edit, and then save. Codes & program control structures differ in the two designs,…"
category:
  - name: "Syntax"
    slug: "syntax"
    taxonomy: "category"
    url: "http://localhost/category/periodicals/syntax/"
post_tag:
  - name: "1983"
    slug: "year-1983"
    taxonomy: "post_tag"
    url: "http://localhost/tag/year-1983/"
  - name: "Downloadable"
    slug: "downloadable"
    taxonomy: "post_tag"
    url: "http://localhost/tag/downloadable/"
  - 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/"
  - name: "ZX81"
    slug: "zx81"
    taxonomy: "post_tag"
    url: "http://localhost/tag/zx81/"
model:
  - name: "Sinclair ZX81"
    slug: "zx81"
    taxonomy: "model"
    url: "http://localhost/model/zx81/"
  - 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: "David Ornstein"
    slug: "david-ornstein"
    taxonomy: "indiv"
    url: "http://localhost/indiv/david-ornstein/"
publication: "Syntax"
publication_r:
  id: 10246
  title: "Syntax"
  type: "periodical"
  url: "http://localhost/periodical/syntax/"
authors: "David Ornstein"
volume: "4"
issue: "12"
issues_articles:
  - id: 26722
    title: "Syntax/Syntax ZX80 v4 n12"
    type: "issue"
    url: "http://localhost/issue/syntax-syntax-zx80-v4-n12/"
pages: "14-18"
pubdate: "December 1983"
download: "https://archive.org/download/timex-sinclair-software-archive/Firstloader%20%281984%29%28Ornstein%2C%20David%29%28US%29%28TS2068%29%28Program%29.zip"
archive_link: false
volumeissue: "v4n12"
article_media:
  - id: 54525
    title: "FIRSTLOAD"
    type: "computer_media"
    url: "http://localhost/computer_media/firstload/"
---

# Firstloader — From ZX/TS to 2068

Syntax commissioned a custom program, written by David Ornstein, to convert your existing programs for the 2068 or 48K Spectrums. This program translates input bytes from ZX/TS tapes to an equal number of output bytes in your 2068 that you must edit, and then save. Codes & program control structures differ in the two designs, making functionally identical programs use different numbers of bytes.

## Source Code: FIRSTLOAD

```
    2 GO TO 40
   10 DATA 1,181,0,17,0,92,33,136,111,237,176,1,124,146,17,62,105,33,62,112,237,176,201
   15 FOR i=24606 TO 24628
   25 READ v
   30 POKE i,v
   35 NEXT i
   40 STOP 
  100 INPUT v
  110 FOR i=v TO v+10
  120 PRINT i,
  130 INPUT t
  135 PRINT t,
  137 POKE i,t
  140 NEXT i
  150 GO TO 207
  205 INPUT "start";v
  206 IF v=0 THEN LET v=45000
  207 LET b$=" "
  210 FOR i=v TO (v+300) STEP 5
  220 PRINT i;
  230 FOR j=0 TO 4
  240 LET x=PEEK (i+j)
  250 IF x<100 THEN LET b$="  "
  255 IF x<10 THEN LET b$="   "
  260 PRINT " ";b$;x;
  270 LET b$=" "
  280 NEXT j
  290 PRINT "  ";
  295 NEXT i
  299 STOP 
  300 FOR i=44000 TO 45234
  310 IF PEEK i<>PEEK (i+6000) THEN PRINT i,PEEK i
  320 NEXT i
  500 CLS 
  501 PRINT "                                                                     Loading code...                                                 Please wait"
  510 LOAD ""CODE 
  600 CLS 
  610 PRINT "                                Enter:                                                                CLEAR 43999 :NEW           then:                                 RANDOMIZE USR 45000"
  699 STOP 
  700 SAVE "firstloadr" LINE 500
  710 SAVE "firstloadr"CODE 44000,1234
  799 STOP
```