)*APDUMPAAADTEXԤTZTLONGTYABLANKTYP $$-ԠРӛ$$-($$-2$$-ߛ<$$-éӠĮF$$-P$$-ߛd##n##x##󮠛####󮠠####٠##򠠠######堠##¯Ƞ######堛##堛"##堠,##宛@##J##򠠠T##堠^##ᠦh##r##䮠|####llTHE TEXT-PLOT ROUTINE IS CALLED AS> X=USR(ADR(TXTLONG$) ,MOVCD,COLOR,WDTH,HT,Y,X,C##-----------------------------jj IS A CODE WHICH DETERMINES HOW MUCH OF THE CHARACTER IS DISPLAYED.mmIF 0 THEN ALL OF IT IS SHOWN. IF IT IS 1 3 5 OR 7 THEN THE LEFTMOST COLUMN IS DELETED.ZZIF IT IS 2 3 6 OR 7 THEN THE TOP ROW OF EACH CHARACTER IS DELETED.BBIF IT IS 4 5 6 OR 7 THEN THE BOTTOM ROW IS DELETED.ppTHIS IS USEFULL FOR LABELLING GRAPHS AND FOR PUTTING MORE TEXT ON THE SCREEN THAN NORMALeeA PARTICULAR USE IS FOR LARGE CHARACTERS DESIRED NEAR THE EDGE OF THE SCREEN.XX THIS VARIABLE REFERS TO THE COLOR REGISTER IN 4 COLOR MODES.==THE NUMBER IS THE SAME AS THE SETCOLOR COMMAND.@@THE VALUES ARE NOT THE SAME AS THE COLOR STATEMENT.??FOR GR. MODES 4 AND 6 THE VALUE IS IMMATERIALnnFOR GR. MODE 8 A VALUE OF 3 PRODUCES WHITE LETTERING.1 OR 2 PRODUCE COLOR ARTIFACTING.&llTHE ARTIFACTED COLOR WILL DEPEND ON WHETHER THE X COORDINATE IS ODD OR EVEN.0@@HIGHER COLOR NUMBERS WILL PRODUCE ODD RESULTS.:ccFOR GTIA MODE 9 THE COLOR VALUE SELECTS THE LUMINANCE OF THE CHARACTER.D\\FOR GTIA MODE 11 THE COLOR VALUE SELECTS THE HUE OF THE CHARACTER.NiiFOR GTIA MODE 10 THE COLOR VALUE MAY HAVE VALUES OF 4 5 6 7 12 13 14 AND 15 ONLY.XWWTHIS IS BECAUSE ONLY 9 TOTAL COLORS ARE AVAILABLE IN THIS MODE.bl^^ THIS VARIABLE DETERMINES THE WIDTH OF THE CHARACTER AS MULTIPLE ...v99OF THE NORMAL WIDTH PRODUCED IN THAT MODE.eeIN GR. MODE 8 THE NORMAL SIZE IS THE SAME AS GR. MODE 0 IF YOU CHOOSE COLOR 3.<<IT IS THE SAME AS GR.1 IF COLOR IS 1 OR 2.ii IS THE HEIGHT OF THE CHARACTER IN MULTIPLES OF THE STANDARD FOR THAT MODE.ii IS THE ROW NUMBER. IT CORESPONDS TO THE VERTICAL PLOT POSITION IN BASIC.pp REFERS TO THE COLUMN NUMBER. IT CORRESPONDS DIRECTLY TO THE BASIC 'POSITION' FOR THAT MODEdd AND TOGETHER SPECIFY THE UPPER LEFT CORNER OF THE CHARACTER CREATED.FF IS THE ASCII VALUE FOR THE CHARACTER. EXMPLE: "A"=65;A, cc67@,.PW(JJhhhhh  Eԅ hhhh֥X˥Y̭hhͪecc67@,.P˥ihh  &  &Յޠۥ cc67Aa,.Pi ۥ 8ۅe˅˥i̠߄8f߈8ޅޠ۩E߅hhɀ8*cc67AA,.Pυх i@ͥ `8 ͥͅѢͥeхͥi ۊ4cc67A!,.PEϤ   Մؤք٠Ȅr &WH%ԅ∱%ߑ˄ &>cc67A,.PHEh%E˩Hehhք٠(НՄH2267A,.e˥ï`R<<(4}TYPE OF PRINTER.1=CENTRONICS 2=EPSON 3=C.ITOH\f[ +@$'0@A0@[0@@p @zK,@@'/A@&9/AAuK/@@FF6-?:C:,<<@<@<@<@<@<@:I,,FF6-?:C:,<<@<@<@<@<@<@:T,,FF6-?:C:,<<@<@<@<@<@1<@: ,,FF6-?:C:,<@<@<@<@<@<@9<@:G,,FF6-?:C:,<<@<@<@<@<@V<@:E,,FF6-?:C:,<<@<@<@<@<@<@:T,,FF6-?:C:,<@<@<@<@<@<A<@:S,,FF6-?:C:,<<@<@<@<@<AP<@: ,,FF6-?:C:,<@<@<@<@<@<AV<@:B,,FF6-?:C:,<<@<@<@<@<Ah<@:I,,FF6-?:C:,<<@<@<@<@<Au<@:G,,ffTHE PRINTER DUMP ROUTINE IS CALLED AS X=USR(ADR(DUMP$) ,ADR(AAA$),DM,LINES)WW IS A CHARACTER STRING WHICH WILL HOLD THE GRAPHICS DATA.aa IS THE MEMORY LOCATION WHERE THE FIRST SCAN LINE TO DUMP STARTS.$.ddTHE LAST VALUE IN THE CALL IS THE NUMBER OF SCAN LINES TO DUMP ON EACH PASS.8 A@B;;THE TRAP IS SO WE DON'T DIMENSION TWICEL&&;A,;A ,;A,Vcc67@,.PhhhhhhhϢ(Ѡϱ̈́Р Hjhi(Ԡ˦Ji ˈ`++67@,.iːi͐Я`j+ 6. 67A ,. +67@,.t THIS LINE INITIALIZES AAA$~/@/67@r<@r,.>:,+ 6. 67A,. +67@,.HHABLANK$ SIMPLY PLACES THE DUMP IN THE MIDDLE OF THE PAGE7@6.(67A,.767@,./@/67@r<@r,.>:,CCTHIS LINE ALTERS THE PROGRAM FOR NON CENTRONICS TYPE PRINTERS/"@/67@7<@7,.>:@B,/"@/67@d<@d,.>:@,EETHE PRECEDING 2 LINES ALTER THE PROGRAM FOR EPSON TYPE PRINTERS A%%6-F:@,%AV$F:@,&&FIND THE START OF DISPLAY MEMORY2"@23>:@',>:@7,>:@H,((INITIALIZE CENTRONICS FOR GRAPHICS 2"@23>:@',>:@e,>:@, SET EPSON TO 6 PIN SPACING""@"3>:@',T12(!!SET C.ITOH TO 6 PIN SPACING2-@@2<6-?:C:,:@',S0420n..INITIALIZE AND PRINT GRAPHICS FOR C.ITOHxA"@A3>:@',>:@u,>:Ad,>:@,--INITIALIZE AND PRINT GRAPHICS FOR EPSON6-%A@))INCREMENT POINTER TO DISPLAY MEMORY 2"@23>:@',>:@,>:AU, RESET CENTRONICS TO NORMAL2"@23>:@',>:@P,>:AU,RESET EPSON TO NORMALW"@W3>:@',>:@b,>:@,>:@I,>:@T,>:AU,RESET C.ITOH TO NORMAL AD:TEXT2