home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / PRINTING / ASLFONT.ZIP / LASLTEST.BAS < prev    next >
BASIC Source File  |  1991-08-21  |  2KB  |  67 lines
  1. 100 'LASLTEST.BAS: generate a test-print page for ASLFONT soft font in
  2. 110 '              landscape orientation.
  3. 120 '              Program assumes that soft font ASL49???.SFL has been
  4. 122 '              downloaded to the printer with an ID of 1
  5. 130 '
  6. 140 ' Program creates a file containing the data to be printed. To
  7. 150 ' print it, at the DOS prompt, type
  8. 160 '     COPY LASLTEST.DAT PRN
  9. 170 ' or you can type
  10. 180 '     TYPE LASLTEST.DAT > PRN
  11. 190 '
  12. 200 ' written by Janet Gomez  21 August 1991
  13. 210 '
  14. 220 OPEN "O", #1, "LASLTEST.DAT"   'this is the file to be copied (sent)
  15. 230                                'to the printer after this program is
  16. 240                                'executed (see command above)
  17. 242 PRINT #1, CHR$(27);"&l1O";     'set landscape orientation
  18. 250 PRINT #1, CHR$(27);"(1X";     'this printer command selects soft font
  19. 260                               '1 for use. If you want to use a different
  20. 270                               'font id, you must change this number.
  21. 280 PRINT #1, " "
  22. 290 PRINT #1, " "
  23. 300 PRINT #1, " "
  24. 310 PRINT #1, " "
  25. 320 PRINT #1, " "
  26. 330 PRINT #1, " "
  27. 340 PRINT #1, " "
  28. 350 PRINT #1, " "
  29. 360 PRINT #1, " "
  30. 370 PRINT #1, "    ABCDEFGHIJKLM"
  31. 380 PRINT #1, " "
  32. 390 PRINT #1, " "
  33. 400 PRINT #1, " "
  34. 410 PRINT #1, " "
  35. 420 PRINT #1, "    NOPQRSTUVWXYZ"
  36. 430 PRINT #1, " "
  37. 440 PRINT #1, " "
  38. 450 PRINT #1, " "
  39. 460 PRINT #1, " "
  40. 470 PRINT #1, " "
  41. 480 PRINT #1, " "
  42. 490 PRINT #1, "      ASLFONT"
  43. 500 PRINT #1, " "
  44. 510 PRINT #1, " "
  45. 520 PRINT #1, " "
  46. 530 PRINT #1, " "
  47. 540 PRINT #1, "      FOR THE"
  48. 550 PRINT #1, " "
  49. 560 PRINT #1, " "
  50. 570 PRINT #1, " "
  51. 580 PRINT #1, " "
  52. 590 PRINT #1, "    IBM PC AND THE"
  53. 600 PRINT #1, " "
  54. 610 PRINT #1, " "
  55. 620 PRINT #1, " "
  56. 630 PRINT #1, " "
  57. 640 PRINT #1, "   HP LASERJET PRINTER"
  58. 650 PRINT #1, CHR$(27);"E";   'reset command (forces the page to print)
  59. 660                           'Note: reset also removes temporary soft
  60. 670                           '      fonts!
  61. 680 CLOSE #1
  62. 690 PRINT "LASLTEST Done. Output file: LASLTEST.DAT";
  63. 700 END
  64.  
  65.  
  66.  
  67.