1 REM Ins{nt av: Sven Wickberg <1384>    1985-07-22 22.14.33
10 REM EPSON f|r modem     85 06 27  sw
11 REM K|r denna rutin (ev med auto-start)
12 REM som f|rsta }tg{rd n{r du sl}r p}
13 REM datorn. D} {r du alltid s{ker p}
14 REM att printern {r inkopplad som du
15 REM vill ha den.
16 REM --------------------------------
17 REM Exemplet avser Epson MX80
18 REM --------------------------------
40 ; CHR$(12%)'Laddar printern... (den {r v{l p}slagen???)'
50 M%=10% : REM vmarg
60 R%=99% : REM total radl{ngd inkl vmarg
70 S%=72% : REM antal rader/sida totalt p} papperet
80 P$='PR:'
100 P%=1% : OPEN P$ ASFILE P%
200 ; #P%,CHR$(27,108,M%); : REM tab(M%)= VMARG 
300 ; #P%,CHR$(27,81,R%); : REM R% tecken/rad (inkl. VMARG)
400 ; #P%,CHR$(27,77); : REM elite-stil
500 ; #P%,CHR$(27,67,72); : REM 72-raderspapper 
600 ; #P%,CHR$(7%); : REM bekr{ftelsepip
700 ; 'Printern inst{lld f|r    VMARG='M%
710 ; '                Total RADBREDD='R%
730 ; 'Totalt antal RADER p} papperet='S%
900 ; : ; 'Okey, nu laddas TERM100...'
1000 CHAIN 'TERM100'