Star Micronics LC24-20 user manual Programming with Basic, 1310 1320

PROGRAMMING WITH BASIC

As an example of programming the printer on Microsoft BASIC. we have

listed the program for the IBM-PC. This program runs in the printer’s Standard mode. and the downloadable condition.

1000

1010

1020

I030

1040

1050

1060

1070

1080

1090

1100

1110 I 120 1130 1140 I i 5 i) I I (>() 1 I 70 1180

I I 9() 1] (]() ]~lo I ~zl) ~~30 1~~o

1250

1260 ] ~70

1280 1~ y [)

13100

1310

1320

I 3 3() 1340 1350

I360

1370

1380 I 390

14 c o

I 4 I () [ ~~o

1430

1440

I4.50

1460

1470 I 480 1490 1500 1510 1520 I 530 1540 1550 1560 1570

‘ Set

control

codes

Escape

code

E$=CHR$

( 27 )

D$?E$+”

x(l “

Draft

qual

i ty

L$=E$+

“ x 1 “+E$+

“ k “

‘ Letter

qual

i ty

RM$=L$+CHR$ ( O)

Roman

character

H$=CHR$ ( 9 )

Hori

zonta

1

tab

PI $=E$+

“ P“

Pi

ca

pi

tch

S t a r t pr i n t i ng

~1 ~T.H

---

Lk”l’1 : “ , 255

S e t

HT

LPR I NT

ES ; “ D“ ; CHR$ ( 3 ) ; CHR$ (24 ) : CHR$ [ O)

LPRINT

L$ : CHR$ ( O) ; “Res

i dent

LQ

fOnts

are

: “

LPRI NT

H$:L$:CHR$ (0)

; “Roman

characters.

“ :

LPRINT

H$; L$;

CHR$ (I)

: “Sanserif

characters,

“

LPRINT

H$: L$:CHR$ (2)

; “Courier

rhara~tel”s.

“ :

LPR INT

H$ ; L$ ; CHR$ ( 3 ) : “Prestige

character

s,”

LPRINT

H$:L$:cHR$ (4)

;“Script

~hara~ters.

”

I.PR I W

LPR I N’1 RM$ :“P1rillt

pi

tclle.

al-e:

“

I.PRI NT

H$ : PI $ : “Fic-a

pi

tch

( 10

CPI)

,“:

1>PRI NT

H$ : E$ : “ M“ : “Eli te pitch

(12

CPI)

,“

I.1’Rr x-r

1[$ : 1?S : “ F “ : “ semi

- c [,nd c IIs ed

[1i t c h

( I 5

(’1’I )

“ :

LPR I?JT

H$ : PI$ :

S e 1e c t

c Ond e n 5 ecl

p r I n t

LPR I NT

CHR$ ( 1.5) :

LPFiINT

“ Cundens

ed

p i ca

p 1t ch

( 17

CI’ I ) , “

LPR INT

H$ : E$ : “!4” : “ Conrlens ed

e 1 i t e

p i t ch

[20 (’PI) , “ :

LPRINT

CHF?$( 18 )

Cane

e 1

conde

ns eti

I)] i IIt.

LPR INT

H$ : E$ ; “ p 1 “ :

S e 1e c t

p rOpc r t i utIa 1

s I):+t. z 1)s

LPR I NT

P I $ : “ Nc)rma 1

prOp

Or t i una

1 , “ :

LPR I XT

H$ : C’HR$ ( 15)

: “ Cond ens ed

prupo

r t i ona

1.

“ :

1.PR I NT

CHR$ ( I 8 ) :

Canr

e 1

pro

pa r t i Ona 1

s j)<!c 1IIF

LPR 1XT

E$ : “PO “

I.PFiI ST

LF’RI XT

H$ : E$ : “ W1 “ : “ Duut,

1e–he

i gh t , “ : E$ : “ WO”

I.F’RI XT

If $ : E,$ : “w 1 “ ; “ Donh

1e

wi d t h ,

“; E$ ; “WO“

LI’R ~)iT

H$ : CHR$ (28 ) ; “ E“ ; CHR$ ( 2 ) : “Trip

1e

wi d t h . “ :

LI’R I NT

CHR$ (28)

; “ E“ ; CHR$ [ O)

I.I’R I NT

H$ : E $ : “h” ; CHR$ ( 1 ) : “ Douh

1e–s

i z ed

, “

1.I’RI N’T 11$; E$ ; “ h “ ; CHR$ ( 2 ) : “Quad-s

i Zed.

“ ;

LF’RI NT

ES : “ h “ ; CHR$ ( O)

I. PRINT : LPR I h’1’

LF’RI NT

E$ : “Q “ : CHR$ ( 47 )

S ? t

r i gh t

real- g,i 11

LI’R I NT

‘TMS : “ \ :+i i 011s

1 i tle

and

[cha rar

t 6 r

s p:.1[’ i ngs

: “

LPRI NT

E$ : “ a 1 “

(’t> II t

e r

t r x t

F’(IR 1= 1 TO 7

LPR I NT

E$ : “.{ “ : CHR$ ( I ) :

L i ne

spa

c i ng

s e t

I.PR1 XT

E$ : “ “ : CHR$ ( I ) :

I ncreas

t

chara[. t r I

s I;ice

LPR I NT “ THE SPACINGS ARE CHANGED“

NEXT

I

FOR 1=7

TO 1 STEP - I

LpR INT

E$ ; “ A“ ; CHR$ ( I ) ;

L i n e

spa

c i t)g

s e t

LF’RINT

E$ ; “ “ ; CHR$ ( I ) ;

I nc r eas

&

c hara

c t i>r

s pa c e

LPRINT “THE SPACINGS ARE CHANGED”

NEXT

I

LF’RINT

ES : “ aO”

Left

just

i fy

L i ng

LPRINT

E$ ; “3“ : CHR$ ( 30) :

‘ S e t

[ /6”

1 i ne

spa

LF’RINT

E$ ; “

“ ; CHR$ (0)

:

NrIrma

1

character

space

LPRINT

: LPRINT

LPRINT

RM$; “Other features

: “

136