---
title: "4 Times Screen$"
type: "article"
slug: "4-times-screen-3"
url: "http://localhost/article/4-times-screen-3/"
markdown_url: "http://localhost/article/4-times-screen-3.md"
published_at: "2026-11-09T22:33:14+00:00"
modified_at: "2026-11-09T22:33:14+00:00"
featured_image:
  url: "http://localhost/wp-content/uploads/2022/04/20230809-041332.jpg"
excerpt: "Since my last article on the Tandy DMP105 printer, modifications were made to screen dump 4 times the normal size to about a half page worth. Also the print head is now controlled so it can plot to any location on the page. In this case, the font style controls the width; ELITE (12 CPI)…"
post_tag:
  - 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: "Abed Kahale"
    slug: "abed-kahale"
    taxonomy: "indiv"
    url: "http://localhost/indiv/abed-kahale/"
genre:
  - name: "Printer"
    slug: "printer"
    taxonomy: "genre"
    url: "http://localhost/type/printer/"
publication: "Update Magazine"
publication_r:
  id: 10283
  title: "Update Magazine"
  type: "periodical"
  url: "http://localhost/periodical/update-magazine/"
authors: "Abed Kahale"
issues_articles:
  - id: 26487
    title: "Update April 1992"
    type: "issue"
    url: "http://localhost/issue/ts-2068-up-date-april-1992/"
pages: "9"
pubdate: "April 1992"
archive_link: false
volumeissue: "vn"
---

# 4 Times Screen$

Since my last article on the Tandy DMP105 printer, modifications were made to screen dump 4 times the normal size to about a half page worth. Also the print head is now controlled so it can plot to any location on the page. In this case, the font style controls the width; ELITE (12 CPI) & Expanded was used below. One half the vertical pixels were used for one print head pass. The program should be aplicable to other printers with proper modifications.

To obtain a negative (inverse video) or vice versa add NOT. NOT POINT(C,R-xx)

```
   1 REM TANDY DMP105 PRINTER DRIVER by Abed Kahale 1/92
  20 RANDOMIZE USR 100: OPEN #3,"LP"
  30 RANDOMIZE USR 100: POKE 16092,0: REM No line feed (otherwise double spacing)
  50 RANDOMIZE USR 100: POKE 16093,32: REM LPRINTs & CHR$s sent to printer.
  80 LPRINT CHR$ 27;CHR$ 23;CHR$ 27;CHR$ 14;CHR$ 18: REM Elite, Expanded (Elongated!) & Graphic mode.
  85>LPRINT CHR$ 10:REM Line feed.
  90 LPRINT CHR$ 27;CHR$ 16;CHR$ 0;CHR$ 35: REM Locates head (margin) at 35 pixels from the left.
  95 RANDOMIZE USR 100: LOAD "C.C$"SCREEN$
 155 FOR Y=0 TO 175 STEP 4: LET R=175-Y: REM vertical pixels; tacken twice for 8-pin head.
 160 FOR C=0 TO 255: REM Horizontal pixels.
 170 LET B=0
 180 LET B=B+POINT (C,R-.5): REM    divided by 2
 190 LET B=B+2*POINT (C,R-1): REM    "    "
 200 LET B=B+4*POINT (C,R-1.5): REM    "    "
 210 LET B=B+8*POINT (C,R-2): REM    "    "
 220 LET B=B+16*POINT (C,R-2.5): REM    "    "
 230 LET B=B+32*POINT (C,R-3): REM    "    "
 240 LET B=B+64*POINT (C,R-3.5): REM    "    "
 250 LET B=B+128
 255 IF IN 127<>236 THEN  GO TO 255: REM Checks if READY.
 260 LPRINT CHR$ B;
 270 NEXT C
 280 LPRINT CHR$ 27;CHR$ 90;CHR$ 0: REM carriage return.
 290 NEXT Y
 300 LPRINT CHR$ 30: REM Back to character mode.
 320 STOP
```

[![Four-times-size screen dump of a woman's portrait on the Tandy DMP105](http://localhost/wp-content/uploads/2026/11/update-new-4-times-screens-1-1024x685.png)](http://localhost/wp-content/uploads/2026/11/update-new-4-times-screens-1.png)Four-times-size screen dump of a woman's portrait on the Tandy DMP105