Star Micronics NX-2410 user manual Plot chara,-.ter ------------~-~----~-~-~~~~-~~~~~

Page 104

3170 IF FL=0 THEN A(CC)=-1

 

 

 

 

 

 

 

 

 

 

3180

BEEP

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3190

CC=CC+l

:IF

CC=127

THEN

CC=33

 

 

 

 

 

 

 

3200

GOT0

1920

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3210

I_---__ Wrap-up --------------_--___----------------------------

3220

CLS :LOCATE 1,l :PRINT "SAVE TO FILE?"

 

 

 

 

3230

S=O

:PX=2 :PY=l :SD$="Yes"

:Sl$="No"

:GOSUB

2820

 

3240

IF

S

THEN

3310

 

 

 

 

 

 

 

 

 

 

 

 

3250

LOCATE 5,lO :PRINT "Output file name [";FI$;") ";

 

3260

INPUT

FO$

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3270

IF

FO$="" AND FI$="" THEN 3250

 

 

 

 

 

 

3280

IF

FO$="" THEN FO$=FI$

 

 

 

 

 

 

 

 

 

 

3290

OPEN FO$ FOR OUTPUT AS #1

 

 

 

 

 

 

 

 

3300

GOSUB 3410 :CLOSE #l

 

 

 

 

 

 

 

 

 

 

3310

'

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3320

LOCATE

7,l

 

 

 

 

 

 

 

(DIP

SWITCH

2-l

 

HUST BE

OFF)"

3330

PRINT

"DOWNLOAD

TO

PRINTER?

 

3340

S=O

:PX=8 :PY=l :SO$="Yes"

:Sl$="No"

:GOSUB

2820

 

3350

IF

S

THEN

END

 

 

 

 

 

 

 

 

 

 

 

 

3360

LOCATE 11,l :PRINT "Select I/F board 'I

 

 

 

 

3370

S=PB

:SO$="COLOR"

 

:Sl$="RONOCRO"

:PX=12

:PY=l

:GOSUB

2820 :PB=S

3380

GOSUB 3480 :LPRINT E$;"3":CHR$(SO);

 

 

 

 

 

3390

FOR CC=33 TO 126 :LPRINT CHR$(CC):" ";:NEXT CC

 

3400

LPRINT

STRING$(lO,lO)

:END

 

 

 

 

 

 

 

3410

I------

Output to

Diskette

-____-___----_----_-------~-~-~~~~~~-~

 

 

 

 

 

 

 

 

3420

PRINT#l,HD$;

 

 

 

 

 

 

 

 

 

 

 

 

 

3430

FOR

CC=33

TO

126

 

 

 

 

 

 

 

 

 

 

 

 

3440

IF

A(C

 

THEN

3460

 

 

 

 

 

 

 

 

 

 

3450

PRINT#l,E$;"&";CHR$(O);STRING$(2,CC);A$(CC);P$(CC):

 

3460

NEXT

CC

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3470

PRINT#l,E$;"%l";:RETURN

 

 

__-__--__---___------------------------

3460

t-e---- Output to

printer

3490 IF QUA>0 OR SCR THEN 3510

 

 

 

 

 

 

 

 

3500

IF

PT=l

THEN

LPRINT E$;"M"; ELSE

IF PT=2

THEN

LPRINT

CHR$(15);

3510

LPRINT HD$;

 

 

 

 

 

 

 

 

 

 

 

 

 

3520

FOR

CC=33

TO

126

 

 

 

 

 

 

 

 

 

 

 

 

3530

IF

A(CC)<O

THEN

3570

 

 

 

 

 

 

 

 

 

 

3540

LPRINT E$;"&";CHR$(O):STRING$(2,CC);

 

 

 

 

 

 

3550

FOR

Y=l

TO

3

:Z=ASC(HID$(A$(CC),Y,l))

:GOSUB

 

3590 :NEXT Y

3560

FOR Y=l TO LEN(P$(CC))

:Z=ASC(BID$(P$(CC),Y,l))

:GOSUB 3590 :NEXT Y

3570

NEXT

CC

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3580

LPRINT E$;"%l";:RETURN

 

 

 

 

 

 

 

 

 

 

3590

'

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3600

IF NOT PB THEN 3630

 

 

 

 

 

 

 

 

 

 

3610

PPuWIP(hH3BD)

:IF PP<128

THEN

3610

 

 

 

 

 

3620

OUT

&HJBC,Z

:OUT

&H3BE,5

 

:OUT

6H3BE.4

:GOTO

3650

 

3630

PP=INP(&H379)

:IF

PP<128

THEN

3630

 

 

 

 

 

3640

OUT

&H378,Z

:OUT

6H37A.5

 

:OUT

6iH37A.4

 

 

 

 

 

3650

RETURN

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3660

1__-___ plot chara,-.ter -____-___---_----_---~-~----~-~-~~~~-~~~~~

3670

LOCATE

X,Y

 

 

:PRINT

CS$;:RETURN

 

 

 

 

 

3680

LOCATE

BX,BY

 

:PRINT

CS$;:RETURN

 

 

 

 

 

96

Image 104
Contents MULTI-FONT Relocate the computerorprinterwithrespectto the mceiver HOW to USE this Manual Features of the Printer Quad-sized Tableofcontents Commercial Software Download Character Generator Check the carton contents ChapterPage Setting UP Remove the top cowerInstall the ribbon cartridge Replace the top cover Lnsfall the optional IC cardMount the paper guide Connect the printer’s power cordConnect the printer to the computer Semiautomatic loading Figure i-7. Mounting the paper guide for single sheetsManual loading Loading and Parking Fanfold Forms Opening the rear coverClamp Lever Paper parking Figure l-72. Mounting the paper guide for fanfold formsTest Printing Long self test Interface testAdjusting the Printing GAP IBM Page Selected Mode You OFF Switches and Indicators ChapterOn Line switch Paper feed switchQuiet Mode switch POWER-UP Functions Short test pattern On Line switchLprint CHR$I Next Return Switch Combination Functions Switch combination functions of control panelPage Page Memo Installing Your Software Printer menuWidth Printer command optionsType styles Setting the DIP Switches Using Your SoftwareInitialization sequence AlignmentOther printer commands Type style and pitch selectionCan help you to use ESC4italicESC5 print Memo With DOS and Basic HARD-COPYING the Screen MS-DOS and PC-DOSProgramming the Printer with DOS Commands Aprint README.DOCNew file Programming the Printer with Basic Acopy CON LQPRINT.BATLprint Lprint END How the program works Page Lprint ES= c~$oc~$6oc~$6o Cleaning the Printer RkPLACING the RibbonReplacing the Print Head Replacing the ribbon cartridgeScrews Replacing the print headReplacing the Battery in the RAM Card Replacing the batteryIf the printer doesn’t print If fanfold paper becomes stuckIf label paper becomes stuck If a// text is printed on the same lineIf you have problems with download characters If you have problems with horizontal tabulationIf you have problems with graphics Switches and indicators Interface and Emu/a tionDot Matrix Size Character SetsType Sty/es and Pitches Paper SpecificationsDimensions and Weight Electrical Specifications Fnterface SignalsEnvironmental Requirements OptionKCK OUT Memo Printer Control Commands FdNT Control Commands Select draft quality charactersSelect LQ characters Select LQ type styleSelect ornament character Select italic charactersCancel emphasized printing Cancel double-strike printingSelect Upright Characters Emphasized printingStop Underlining Start OverliningCharacter SET Commands Enable printing of all character codes Enable printing of a// character codes on next characterSelect Slash Zero Select Normal ZeroPica Pitch Elite pitchHigh-speed elite pitch High-density Elite PitchCancel condensed printing Cancel Expanded PrintingCondensed Expanded printingSelect Master Print mode Caocel one-line expanded printingSelect proportional spacing Select fixed spacingIncrease character Spacing Select double or quadruple sizePrint Double-height Characters Return To normalSelect character height, width, and line spacing Select CharacterWidth Vertical Position Commands Select character type and print pitchSet line spacing to 718 inch Set line spacing to 7160 or 7172 inchSet line spacing to 116 inch Set base unit for line spacingSet line spacing to n/180 or n/276 inch Set line spacing to n/360 inchSelect forward feed mode Define line spacing to n/72 inchExecute ESC a Line feedPerform one n/780-inch or n/276-inch line feed Cancel top and bottom margins Set page Iength to n inchesSet bottom margin Form feedDisable paper-out detector Enable paper-out detectorSet vertical tab stops Set vertical tab stops every n linesHorizontal Position Commands Set left marginSelect vertical tab channel TabCancel autoniatic line feed Set left and right marginsCarriage return SetBackspace Left justifyCenter text Right justifyReset Set horizontal tab stopsSet horizontal tab stop every n columns Horizontal tabRelative horizontal Tab Relative horizontal tab in inchesAbsolute horizontal tab in inches Absolute horizontal tab in co/umnsPrint 8-bit Sing/e-density Graphics Print 8-bit double-density GraphicsPrint 8-bit double-density, double-speed graphics Print Bit quadruple-density GraphicsSelect graphics mode Print 24bit hex-density graphicsSelect Graphics Mode Download Character CommandsConvert graphics Density Copy character set from ROM into RAM cardDefine Download Select download character setOther Printer Control Commands Select ROM characterSet MS6 to Set MS8 toCancel last line Cancel Quiet printRepeat data Quiet printCancel immediate Print Set printer off-lineSet printer on-he Stop printingBidirectional Unidirectional printingOne-line unidirectional printing Manual feedSet print start position on ASF Reset PrinterEject paper From ASF Memo AppendixcDOWNLOAD Normal characterDraft characters Pica Super/subscript character 1220 Then QUA=2 Else QUA=0 CLS Locate PX,PY Print ISO$ Plot chara,-.ter ------------~-~----~-~-~~~~-~~~~~ Character Sets Standardcharacterset IuIX Ih Y I-G- I-G- l-7 Page I‘? IBM Character SET #lAdditional Character SET # $ h o 0 § International Character SetsIndex Irl 107 Command Summary 109 Select base unit for line spacing 111