UIT VICTAPE NO.2 1984T EM$"NOT PRINTABLE"LD$"DATA IS LOST""SCREEN-DUMP"(I14000: d(14)"OU MAY HAVE NOTICED THAT SEVERAL OF THE PROGRAMS ON THIS TAPE"6n"HAVE A BUILT-IN SCREENDUMP FACILITY."x"HE PROGRAM USED GIVESA REASONABLE IMAGE OF THE SCREEN, BUT NOT AN";"ABSOLUTELY TRUE ONE.""HIS IS BECAUSE THE SCREEN CHARACTERS ARE FORMED IN AN 8*8"""MATRIX OF DOTS,WHILST THE PRINTER USES A 7*5MATRIX ";H" - 5 DOTS WIDE BY 7 DOTS HIGH.""EALING WITH THE 5-DOTWIDTH IS REALLY QUITE STRAIGHTFORWARD.""EY F1 FOR NEXT PAGE";A$:A$""190"ITH THE PRINTER SET TO 'GRAPHICS' MODE THEWIDTH OF A CHARACTER CAN ";?"BE ANYTHING FROM 1TO OVER 400 DOTS.""OWEVER, THE NUMBER OFVERTICAL DOTS IS STILLLIMITED TO 7.""HE PROGRAM WE'VE USEDSO FAR GETS AROUND THEPROBLEM BY TURNING THE";"WHOLE CHARACTER SET ONITS SIDE BEFORE IT IS PRINTED."T"OR SIMPLE TEXT DUMPS THIS WORKS PRETTY WELLSINCE THE ALPHANUMERIC";"CHARACTERS DO NOT FILLTHE WHOLE 8*8 MATRIX.""EY F1 FOR NEXT PAGE";A$:A$""280"1000,(14)""6" FURTHER DISADVANTAGEOF THIS SIMPLE SCREEN-DUMP ROUTINE IS THAT"p@"THE PRINTED COPY IS TURNED THROUGH 90 EG.AS YOU MAY HAVE SEEN ALREADY."J"BVIOUSLY, A PROGRAM WHICH CAN PROVIDE TRUECOPIES OF THE SCREEN,"T"ORIENTATED CORRECTLY, IS GOING TO REQUIRE A MORE COMPLEX APPROACH."P^" DESCRIPTION OF THE TECHNIQUE REQUIRED IS GIVEN ON THE NEXT PAGE"qh"EY F1 FOR NEXT PAGE";rA$:A$""370|"INCE THE PRINTER CAN ONLY PRINT CHARACTERS 7 DOTS HIGH, WHEN WE""TRANSFER THE CHARACTERSHAPES FROM THE SCREENONLY 7 OF THE LINES OF";K"THE 8*8 MATRIX CAN BE PRINTED AT A TIME."" HE REMAINING LINE MUST BE 'REMEMBERED' UNTIL THE WHOLE ROW""HAS BEEN PRINTED, AND THEN USED AS THE TOP LINE OF THE NEXT ROW.""" HE SECOND ROW ON THE PRINTER WILL THUS CONSIST OF THE LAST"s"LINE OF THE FIRST ROW PLUS THE FIRST 6 LINES OF THE SECOND ROW ANDSO ON!!""EY F1 FOR NEXT PAGE";A$:A$""460"OW KEY F1 TO RE-READ""OR F3 TO LOAD THE MAIN  PROGRAM"A$:A$"")A$""490:"";(142);W631,76:632,207:633,34{634,83:635,67:636,82:637,69638,42:639,34:640,44:641,56:642,13:643,82:644,213:645,13198,15:(142)"BUT FOR VIC GRAPHICS CHARACTERS, THE ENTIRE8*8 MATRIX IS REQUIRED")3000=A$:A$""2000KA$""kA$""A$""CS$A$:1000z36869,240""A$"";A$" " (7746)32EM$;:I12000::1000CH(7746):CS$""CHCH1283000)CS32768CH8:CT7769:XTCT187:CO384007680CT:XOCO1874 I07\VL(CSI):MX128:CTCT22:COCO22g J07w*VLMX21104CTJ,160:COJ,0:VLVLMX9XTIJ22,160:XOIJ22,0>MXMX2HJRIZLD0\I07:(XTI)99LD1:XOI,5^IaLDLD$;f2000A "12345678 12345678>.";L I18y ""I"ϥ "((I),1)" "; I " " " SCREEN PRINTER" "YOU CAN TEST THIS NOW BY PRESSING ANY KEY THAT PRINTS CHARACTERS";# " INCLUDING GRAPHICS."< " "] "KEY F1 FOR NEXT PAGE";c