home *** CD-ROM | disk | FTP | other *** search
/ Pegasus Graphics Universe / Pegasus_Graphics_Universe.iso / p11 / labeler / pr_regis.mac < prev    next >
Text File  |  1992-10-15  |  4KB  |  81 lines

  1. \X PRINT_REGISTRATION\CLEAR ON KEYS\MOVE 0 TO Q
  2. \IF PRT_LOC='3'\OPEN LPT3:\IF A=144 OR A=0\JUMP PR2\ELSE\JUMP BADPR\ENDIF
  3. \IF PRT_LOC='2'\OPEN LPT2:\IF A=144 OR A=0\JUMP PR2\ELSE\JUMP BADPR\ENDIF
  4. \OPEN LPT1:\IF A=144 OR A=0\MOVE 3 TO P\JUMP PR2\ENDIF\X BADPR
  5. \READ K:081117PW.FON\MOVE 11 TO FNTY
  6. \LOC 30,40\HEI 459\WID 570 DOT C
  7. Unable to write to printer.
  8. Please turn on your printer,
  9. or be sure it has paper, etc.
  10. Or, send your registration to: 
  11. THE ANIMATED SOFTWARE COMPANY
  12. P.O. BOX 188006
  13. CARLSBAD, CA 92009
  14. Enclose a check or money order
  15. for $15.00 for LABELER and be
  16. sure to tell us what version
  17. you have! (+ tax in Calif.)
  18. Guaranteed for 90 days!
  19. Questions, please write or call
  20. (800) 551-2726.
  21. Thank you for registering 
  22. your program!
  23. \"
  24. \"
  25. \"
  26. \"
  27. \WAIT RET -1 "                         Press <RETURN> to continue..."\RETURN
  28. \X PR2\PRIN [27],'E',\PRIN ' '\PRIN ' '\PRIN ' '\+
  29. \PRIN '                ***********************************************'\+
  30. \PRIN '                *  Registration form for LABELER disk labeler *'\+
  31. \PRIN '                *             by Russell D. Hoffman           *'\+
  32. \PRIN '                *                 Date: ',#TIME&DATE[1,8],'              *'\+
  33. \PRIN '                * Please register if you use it.  Not only do *'\+
  34. \PRIN '                * you support the hard work of the author but *'\+
  35. \PRIN '                *  you also will receive special promotions.  *'\+
  36. \PRIN '                *                                             *'\+
  37. \PRIN '                * Name:______________________________________ *'\+
  38. \PRIN '                *                                             *'\+
  39. \PRIN '                * (Company:)_________________________________ *'\+
  40. \PRIN '                *                                             *'\+
  41. \PRIN '                * Address:___________________________________ *'\+
  42. \PRIN '                *                                             *'\+
  43. \PRIN '                * City:______________________________________ *'\+
  44. \PRIN '                *                                             *'\+
  45. \PRIN '                * State:_______ Zip:_________________________ *'\+
  46. \PRIN '                *                                             *'\+
  47. \PRIN '                * Phone:(_______) ___________________________ *'\+
  48. \PRIN '                *                                             *'\+
  49. \PRIN '                * * * * * * * * * * * * * * * * * * * * * * * *'\+
  50. \PRIN '                * LABELER software version: ',#1000,'.             *'\+
  51. \PRIN '                * LABELER ',#601,#610,'.              *'\+
  52. \PRIN '                ***********************************************'\+
  53. \PRIN ' '\+
  54. \PRIN '                If you would like a HUGE, 3.5" VGA demo of'\+
  55. \PRIN '                our animated software, please send $5.00 for'\+
  56. \PRIN '                media costs, shipping and handling, and ask'\+
  57. \PRIN '                for the 3.5" ANIMATED SOFTWARE DEMO.'\+
  58. \PRIN '                Other demos also available.  Please specify:'\+
  59. \PRIN '                CGA, TANDY/PCjr, VGA, 5.25", 3.5", etc.'\+
  60. \PRIN ' '\+
  61. \PRIN '                We also offer a variety of other SHAREWARE'\+
  62. \PRIN '                products.  We will mail a complete list on'\+ 
  63. \PRIN '                request, or when you register this program.'\+
  64. \PRIN ' '\+
  65. \PRIN '                To register this program, send this form with'\+
  66. \PRIN '                check or money order for $15.00 to:'\+
  67. \PRIN ' '\+
  68. \PRIN '                       THE ANIMATED SOFTWARE COMPANY'\+
  69. \PRIN '                    P.O. Box 188006  Carlsbad CA 92009'\+
  70. \PRIN ' '\+
  71. \PRIN '                  California residents, add sales tax.'\+
  72. \PRIN '                  Phone (800) 551-2726 for questions.'\+
  73. \PRIN '                  (M-F 10am-6pm P.S.T. preferred.)'\+
  74. \PRIN ' '\+
  75. \PRIN '                    **** THANK YOU FOR REGISTERING! ****'\+
  76. \PRIN ' '\+
  77. \PRIN '                   Please use the back of this sheet for'\+
  78. \PRIN '                  any comments you have about the program.'\+
  79. \PRIN [12],\PRIN [27],'E'\+
  80. \IF PRT_LOC='3'\CLOSE LPT3:\ELSE\IF PRT_LOC='2'\CLOSE LPT2:\ELSE\CLOSE LPT1:\ENDIF\MOVE 1 TO Q\RETURN
  81.