65000 REM +++++++++++++++++++++++++++++++++
65010 REM ! Program ....   SK[RMPR
65020 REM ! Utg}va  ??     1980-??-??
65030 REM ! av (c) CARL C-SON ORRE
65040 REM ! {ndrat av TOJ
65050 REM ! F|r printer Minne 16 Kbytes
65060 REM ! Ins{nt av TOJ
65070 REM +++++++++++++++++++++++++++++++++
65080 REM Program som l}ter skrivaren
65090 REM skriva av sk{rmen.
65100 REM 
65110 REM 
65120 OPEN "PR:" ASFILE 1
65130 V=31744 : T=0 : GOSUB 65240
65140 V=V+128 : T=T+1 : GOSUB 65240
65150 IF T<=6 GOTO 65140
65160 V=31784 : T=0 : GOSUB 65240
65170 V=V+128 : T=T+1 : GOSUB 65240
65180 IF T<=6 GOTO 65170
65190 V=31824 : T=0 : GOSUB 65240
65200 V=V+128 : T=T+1 : GOSUB 65240
65210 IF T<=3 GOTO 65200 : REM SKRIVA AV 22 RADER
65220 CLOSE 1
65230 GOTO 65230
65240 FOR C=0 TO 39
65250 ; #1CHR$(PEEK(V+C));
65260 NEXT C
65270 ; #1" "
65280 RETURN