Star Micronics NX-2410 user manual Locate PX,PY Print ISO$

Page 103

2530 IF Y<Al THEN DT(X,Y+l)=O :CS$=STRING$(S,l) :GOTO 2610 ELSE GOT0 2610

2540 IF Y=Al THEN CS$=CHR$(2) ELSE CS$=STRING$(2,2)

2550 GOT0 2610

2560

2570 IF ST<3 THEN CS$=CHR$(l) :GOTO 2610

2580 IF DT(X,Y+l)=l THEN CS$=CHR$(l) :GOTO 2610 2590 DT(X,Y)=l :CS$=CHR$(2)

2600 IF Y<Al THEN DT(X,Y+l)=P :CS$=STRING$(2,2)

2610 GOSUB 3670

2620 SS=ST :BX=X :BY=Y :GOSUB 2930 :IF SS=ST THEN 2710 2630

2640 IF ST>3 THEN 2670

2650 FOR Z=lO TO 12 :LOCATE Z,40 :PRINT " v :NEXT 2 2660 LOCATE 9+ST,4S :PRINT "t" :GOTO 2480

2670 IF ST=4 THEN GOSUB 3040 :GOTO 2460

2680 IF ST=5 THEN CLS :GOTO 1940

2690 IF ST=6 THEN 3210

2700 IF ST=7 THEN 3100

2710

2720 IF DT(BX,BY)=O THEN 2750 :ELSE

2730 IF DT(BX,BY)=l AND BY<Al THEN CS$= _ 2740 GOT0 2810

2750

2760 CS$.=" . I' :IF (BX MOD 8)=1 THEN CSS="-"

2770 IF (BY HOD lO)=O THEN CS$="+"

2780 IF BY=Al OR DT(BX,BY+l)<>O THEN 2810

2790 IF ((BY+l) MOD lO)=O THEN CS$=CS$+"+" :GOTO 2810

2800 IF (BX MOD .5)=1 THEN CS.$=CS$+"-" ELSE CS$=CS$+"."

2810 GOSUB 3680 :GOTO 2480

2820 1------ yes or No ---_____--_-___----------------------.~---------

2830 LOCATE PX,PY :PRINT " 'I;SO$

2840 LOCATE PX+l,PY :PRINT " ";slg

2850 IF NOT S THEN 2860 ELSE 2880

2860 LOCATE PX,PY :pRINT "zz)"

2870 LOCATE PX+l,PY :PRINT 'I 'I :LOCATE PX,PY

2880 IF S THEN 2890 ELSE 2910

2890 LOCATE PX,PY :PRINT w "

2900 LOCATE PX+l,PY :PRINT "==>" :LOCATE PX,PY

2910 I$=INPUT$(l) :IF I$<>CHR$(13) THEN S=NOT 8 :GOTO 2850

2920 RETURN

2930 I-_____ Function key check ______----------_-____________________

2940 I$=INPUT$(l) :SK=ASC(I$) :FX=VAL(I$)

2950 IF SX>6 AND SK<14 THEN ST=%-6 :GOTO 3030 2960 IF FK=O OR FK=5 THEN 2940

2970 IF FK MOD 3 = 0 THEN Y=Y+l

2980 IF FK MOD 3 = 1 THEN Y=Y-1 2990 IF FX >6 THEN X=X-l

3000 IF FK (4 THEN X=X+1

3010 IF Y>Al THEN Y=Al ELSE IF Y<l THEN Y=l

3020 IF X>HI THEN X=HI ELSE IF X<l THEN X=1

3030 RETURN

3040 Q------ clear all dots __-_______----__-__-____________________--

3050 FOR N=l TO HI-7 STEP 8 :FOR O=N TO N+7 :LOCATE 0,l

3060 IF O=N THEN PRINT LEFT$(SC$(O),Al): ELSE PRINT LEFT$(SC$(l),Al); 3070 NEXT 0,N

3080 FOR X=1 TO HI :FOR Y=l TO Al :DT(X,Y)=O :NEXT Y,X

3090 ST=2 :X=1 :Y=l :RETURN

3100 9---_-- Store character data ----____--------------~~-~~~~~-~~---

3110 CLS :LOCATE 20,20 :PRINT Il*==** WAIT *a***"

3120 FL=0 :A$(CC)=CHR$(AO)+CHR$(Al)+CHR$(A2) :A(CC)=Al :P$(CC)=""

3130 FOR Y=l TO Al :FOR N=l TO HI-7 STEP E :WT=lPS :P=O

3140FOR X=N TO N+7 :P=P+WT*(DT(X,Y) AND 1) :FL=FL+P

3150WT=.S*WT :NEXT X

3160P$(CC)=P$(CC)+CHR$(P) :NEXT N,Y

Page 102 Page 104
Image 103
Page 102 Page 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 Chapter Check the carton contentsPage Remove the top cower Setting UPInstall the ribbon cartridge Lnsfall the optional IC card Replace the top coverConnect the printer to the computer Connect the printer’s power cordMount the paper guide Figure i-7. Mounting the paper guide for single sheets Semiautomatic loadingManual loading Opening the rear cover Loading and Parking Fanfold FormsClamp Lever Figure l-72. Mounting the paper guide for fanfold forms Paper parkingTest Printing Interface test Long self testAdjusting the Printing GAP IBM Page Selected Mode You OFF Chapter Switches and IndicatorsPaper feed switch On Line switchQuiet Mode switch Short test pattern On Line switch POWER-UP FunctionsLprint CHR$I Next Return Switch combination functions of control panel Switch Combination FunctionsPage Page Memo Printer menu Installing Your SoftwareType styles Printer command optionsWidth Alignment Setting the DIP SwitchesUsing Your Software Initialization sequenceType style and pitch selection Other printer commandsCan help you to use ESC4italicESC5 print Memo HARD-COPYING the Screen MS-DOS and PC-DOS With DOS and BasicAprint README.DOC Programming the Printer with DOS CommandsNew file Acopy CON LQPRINT.BAT Programming the Printer with BasicLprint Lprint END How the program works Page Lprint ES= c~$oc~$6oc~$6o RkPLACING the Ribbon Cleaning the PrinterReplacing the ribbon cartridge Replacing the Print HeadReplacing the print head ScrewsReplacing the battery Replacing the Battery in the RAM CardIf a// text is printed on the same line If the printer doesn’t printIf fanfold paper becomes stuck If label paper becomes stuckIf you have problems with graphics If you have problems with horizontal tabulationIf you have problems with download characters Interface and Emu/a tion Switches and indicatorsCharacter Sets Dot Matrix SizeDimensions and Weight Paper SpecificationsType Sty/es and Pitches Option Electrical SpecificationsFnterface Signals Environmental RequirementsKCK OUT Memo FdNT Control Commands Select draft quality characters Printer Control CommandsSelect italic characters Select LQ charactersSelect LQ type style Select ornament characterEmphasized printing Cancel emphasized printingCancel double-strike printing Select Upright CharactersStart Overlining Stop UnderliningCharacter SET Commands Select Normal Zero Enable printing of all character codesEnable printing of a// character codes on next character Select Slash ZeroHigh-density Elite Pitch Pica PitchElite pitch High-speed elite pitchExpanded printing Cancel condensed printingCancel Expanded Printing CondensedSelect fixed spacing Select Master Print modeCaocel one-line expanded printing Select proportional spacingReturn To normal Increase character SpacingSelect double or quadruple size Print Double-height CharactersWidth Select CharacterSelect character height, width, and line spacing Set line spacing to 7160 or 7172 inch Vertical Position CommandsSelect character type and print pitch Set line spacing to 718 inchSet line spacing to n/360 inch Set line spacing to 116 inchSet base unit for line spacing Set line spacing to n/180 or n/276 inchLine feed Select forward feed modeDefine line spacing to n/72 inch Execute ESC aPerform one n/780-inch or n/276-inch line feed Form feed Cancel top and bottom marginsSet page Iength to n inches Set bottom marginSet vertical tab stops every n lines Disable paper-out detectorEnable paper-out detector Set vertical tab stopsTab Horizontal Position CommandsSet left margin Select vertical tab channelSet Cancel autoniatic line feedSet left and right margins Carriage returnRight justify BackspaceLeft justify Center textHorizontal tab ResetSet horizontal tab stops Set horizontal tab stop every n columnsAbsolute horizontal tab in co/umns Relative horizontal TabRelative horizontal tab in inches Absolute horizontal tab in inchesPrint Bit quadruple-density Graphics Print 8-bit Sing/e-density GraphicsPrint 8-bit double-density Graphics Print 8-bit double-density, double-speed graphicsPrint 24bit hex-density graphics Select graphics modeCopy character set from ROM into RAM card Select Graphics ModeDownload Character Commands Convert graphics DensitySelect download character set Define DownloadSet MS8 to Other Printer Control CommandsSelect ROM character Set MS6 toQuiet print Cancel last lineCancel Quiet print Repeat dataStop printing Cancel immediate PrintSet printer off-line Set printer on-heManual feed BidirectionalUnidirectional printing One-line unidirectional printingEject paper From ASF Reset PrinterSet print start position on ASF Memo Normal character AppendixcDOWNLOADDraft 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 IBM Character SET #l I‘?Additional Character SET International Character Sets # $ h o 0 §Index Irl 107 Command Summary 109 Select base unit for line spacing 111
Top Page Image Contents