home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / DATABASE / DBT123S.ZIP / DBTPRINT.PRG < prev    next >
Text File  |  1989-10-31  |  2KB  |  47 lines
  1. *==============================================================
  2. *  DBTPRINT.PRG - demo of printer driver
  3. *                (c) 1989 BERNATH COMPUTER
  4. *                5:51:14  10/26/1989
  5. *==============================================================
  6. CALL DBTOOLS WITH "7,2,0,3,0"
  7. CALL DBTOOLS WITH "3,3,5,15,58,15,3,1,0,1"
  8. CALL DBTOOLS WITH "1,4,8,15,3,0,PRINTER - function 11"
  9. SET COLOR TO N/BG
  10. @ 6,8 say "The PRINTER function allows you to easily take"
  11. @ 7,8 say "advantage of the features of your printer from"
  12. @ 8,8 say "within dBASE. It is also easily configurable to"
  13. @ 9,8 say "handle different kinds of printers easily."
  14. @ 11,8 say "Printer escape sequences are loaded from an"
  15. @ 12,8 say "ASCII file which can be created with any text"
  16. @ 13,8 say "editor, or created by a program supplied."
  17. CALL DBTOOLS WITH "10,14,8,15,3"
  18.  
  19. CALL DBTOOLS WITH "3,6,10,21,70,11,0,1,0,1"
  20. CALL DBTOOLS WITH "1,7,12,11,0,0,Syntax:"
  21. SET COLOR TO +BG/N
  22. mPARM = "CALL DBTOOLS WITH "+CHR(34)+"11,0,0,filespec"+CHR(34)
  23. @ 8,12 SAY mPARM
  24. mPARM = "mPARM = "+CHR(34)+"11,0,1,"+CHR(34)+"+SPACE(31)"
  25. @ 9,12 SAY mPARM
  26. @ 10,12 SAY "CALL DBTOOLS WITH mPARM    (get printer info)"
  27. mPARM = "CALL DBTOOLS WITH "+CHR(34)+"11,seqcode"+CHR(34)+"   (1-48)"
  28. @ 11,12 SAY mPARM
  29. SET COLOR TO BG/N
  30. @ 13,12 SAY "Before using the printer codes, they must be loaded into"
  31. @ 14,12 say "memory, using the syntax on the first line. After loading,"
  32. @ 15,12 say "up to 48 different escape sequences may be sent to the"
  33. @ 16,12 say "printer using the syntax shown on the fourth line. Infor-"
  34. @ 17,12 say "mation about the currently loaded printer can be obtained"
  35. @ 18,12 say "using the syntax in the second line."
  36. CALL DBTOOLS WITH "10,20,12,11,0"
  37. CALL DBTOOLS WITH "3,9,15,19,76,15,7,1,0,1"
  38. SET COLOR TO N/W
  39. CALL DBTOOLS WITH "1,10,18,15,7,0,Printer Driver Definition Control Program"
  40. @ 12,18 SAY "As an aid in creating and editing the printer definition"
  41. @ 13,18 SAY "files, an editing program DBTPRDEF and associated data-"
  42. @ 14,18 SAY "files PRNDEF.DBF and ESCCODES.DBF are provided. The codes"
  43. @ 15,18 SAY "are maintained in the databases, and then the ASCII text"
  44. @ 16,18 SAY "file is automatically created from the data."
  45. CALL DBTOOLS WITH "10,18,18,15,7"
  46. RETURN
  47.