home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / zsys / znode-12 / i / pdtins.com (.txt) < prev    next >
Encoding:
Turbo Pascal Compiled 8bit CP/M-80 COM  |  1993-06-12  |  10.5 KB  |  85 lines
  1. Copyright (C) 1985 BORLAND Inc
  2. Kaypro, no hilite
  3.  .,;:=?*[]<>{}
  4. ^#V#N#F
  5. s#r#q#p
  6.     #^#V
  7. 9^#Vh&
  8. |/g}/o#
  9. T]=o`9y
  10. T9^K#
  11. 8/<oz
  12. T9^K#
  13. oGOW_g
  14. `1pF,
  15. LSTCAUX
  16. >~O6~*
  17.  .##~
  18. TRUEFALSE
  19. ##N#F*
  20. ##~++
  21.     N#F#s#r
  22. N#F#^#V
  23. Nw#Fw
  24. q#p#6
  25. #w#w#w
  26. >!DM!
  27. <(    !\
  28. Ns#Fr
  29. User break
  30. Run-time
  31.  error 
  32. , PC=
  33. Not enough memory
  34. Program aborted
  35. }2r/*{/
  36. s*r/&
  37. Error - file !c/
  38.      missing.
  39.  Aborting.
  40. ?Public Domain Turbo Pascal Terminal Installer (PDTINS) version 
  41. Carson Wilson 
  42. Dec. 5, 1986
  43. Reset.. 
  44. PDTINS.DTA
  45. PDTINS.DTA
  46. CEnter Control-C to quit, or name of Turbo Pascal program to install
  47. *as "filename.COM" (no drivespec allowed): 
  48. PDTINS.DTA
  49. f$*^1#"^1!
  50. . !(0
  51. Z$!(0
  52.  *U1&
  53. Enter your terminal's number or "Q" to quit:   
  54. x$*X1+"X1
  55. Erasing !`
  56. .OLD.. 
  57.     Renaming !`
  58. .COM to !`
  59. .OLD.. 
  60. Creating new !`
  61. .COM.. 
  62. Error writing to !i
  63. . Possibly out of disk space.
  64.     Renaming !`
  65. .OLD back to !`
  66. .COM.. 
  67. Aborting.. 
  68. }2V1!`1
  69. +)))))))
  70. s*V1&
  71. }2V1!`1
  72. +)))))))
  73. s*V1&
  74. Installing !`
  75. .COM for # *X1
  76.  now installed for terminal # *X1
  77.  above.
  78.  If program doesn't work, rename !`
  79. .OLD to !`
  80. .COM,
  81. !and install for another terminal.
  82. ogram doesn't work, rename !`
  83. .OLD to !`
  84. "m/!5/
  85.