home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / enterprs / cpm / utils / f / hw.cpm (.txt) < prev    next >
Encoding:
Turbo Pascal Compiled 8bit CP/M-80 COM  |  1993-05-08  |  23.3 KB  |  208 lines
  1. Copyright (C) 1984 BORLAND Inc
  2. Kaypro, no hiliteeedP
  3. ^#V#N#F
  4. s#r#q#p
  5.     #^#V
  6. 9^#Vh&
  7. |/g}/o#
  8. T]=o`9y
  9. T9^K#
  10. 8/<oz
  11. T9^K#
  12. oGOW_g
  13. `1pF,
  14. w###6
  15. ##N#F*
  16. Nw#Fw
  17. q#p#6
  18. #w#w#w
  19. TRUEFALSE
  20.     N#F#s#r
  21. N#F#^#V
  22. " C}=(
  23. F+N+++V+^
  24. q#p##
  25. User break
  26. Run-time
  27.  error 
  28. , PC=
  29. Program aborted
  30. "+D!Xy
  31. /Y HABaaaaaa!
  32. HardWire for KAYPRO CP/M!2
  33. (c) - Paul Pomerleau, 1985
  34.     S
  35.  - Send a file.
  36.     G
  37.  - Get a file.*J
  38. Set *I
  39. NEC to 
  40. COM:*N
  41. N81XS!
  42. TRS-100 to 
  43. 8N1E!
  44. TRS-200 to 
  45. 8N1ENN!
  46. FILINK!
  47. XMODEM!
  48. NEC PC8201
  49. TRS-100!
  50. TRS-200!
  51.     T
  52. ( - Toggle echo.           -   Currently 
  53.  baud!.
  54.     F
  55. ( - Flip mode.             -   Currently 
  56.     B
  57. ( - Set baudrate.          -   Currently 
  58.     L
  59. ( - Log drive.             -   Currently 
  60.     U
  61. ( - Set user number.       -   Currently 
  62.     E
  63.  - Erase a file.
  64.     D
  65.  - List directory.
  66.     V
  67.  - View a file.
  68.     X
  69.  - Exit program.!$
  70.  - Rename a file.!$
  71.  - Return file size.!$
  72.  - Configure HardWire.!
  73. Select a letter: !
  74. File exists: Delete?
  75. k+!bu
  76. }2au*au&
  77. }2\u*\u&
  78. }2Wu*Wu&
  79. }2Mu*Mu&
  80.   ABORTED - !
  81. Control-C at keyboard.
  82. File not found.
  83. No more directory space.
  84. No more disk space.
  85. Hit any key.
  86. Ready?
  87.  - 110
  88.  - 300
  89.  - 600
  90.  - 1200
  91.  - 2400
  92.  - 4800
  93.  - 9600
  94.  - 19.2k
  95. Select letter for baud rate: 
  96. Name of file to send: 
  97. Sending !V
  98.  - Containing *
  99.      records.
  100. Waiting... 
  101. 1,}2u
  102.  CRC not supported: Use Checksum.
  103.  Recs   *R
  104. 1,}2u
  105.  Transfer completed.!
  106. Name of file to receive: 
  107. Waiting... !
  108. 1,}2u
  109. 1,}2u
  110. 1,}2u
  111.  Recs   *
  112. 1,}2u
  113. 1,}2u
  114.  Transfer completed.!
  115. File to send: 
  116. Sending...*z
  117.     Save as: 
  118. Receiving...*z
  119. Name of file to send: 
  120.             
  121. Ready  !R
  122. Set  !G
  123. Go  -  linked...!
  124. Sending Filename:  !
  125.  - Containing *
  126.      records.
  127.  Recs   *
  128.  Transfer completed.!
  129. To drive: 
  130.     :Work.nam
  131. Waiting... !
  132. Ready  !S
  133. Set  
  134. Go  Linked...!
  135. Receiving Filename:  !
  136.  Recs   *~t
  137.  Transfer completed.!
  138. C!`    "P
  139. No change.*x
  140. Drive: 
  141. "}2ut*ut&
  142. E*ut&
  143. E*ut&
  144. User number: 
  145. #"ot*ot
  146. 1F*ot
  147. *ot"L
  148. Invalid user number.!
  149. File to erase: 
  150. File erased.!
  151. Name of file to view: 
  152. ;I*bt
  153. YG*dt
  154.  Hit any key.  (Control-C aborts)
  155. zH*dt
  156. }2at*dt
  157.  Hit any key.  (Control-C aborts)
  158. "dt*u
  159. !I*bt
  160. "bt*bt
  161. "G*bt
  162. 6-}2u
  163. File to rename: 
  164. New name: 
  165. File name: 
  166. "Wt*Wt
  167.            !V
  168.   -  *Wt
  169.  Records totaling *Ut
  170. 6-}2u
  171. 6-}2u
  172.    |   !
  173. 6-}2u
  174. HardWire       - vers. 2.0
  175. Copyright 1985 - Paul Pomerleau
  176.    Serial number !
  177. -How many disk drives does this machine have? !
  178. &Only up to eight drives are permitted.
  179. APlease enter the name for each drive.      (Example: Drive #1: A)
  180. Drive #*
  181. ?HardWire can log onto a specific drive every time it starts up.
  182. Do you wish it to do this? 
  183. Which drive? 
  184. HWhen HardWire starts up, what baud rate do you want your machine set to?
  185.  - TRS-100
  186.  - TRS-200
  187.  - NEC PC8201
  188.  - XMODEM     (NEC Starlet)
  189.  - FILINK     (Epson Geneva)
  190. /What mode do you want HardWire to start up in? 
  191. TRS-100
  192. TRS-200
  193. FILINK
  194. NEC PC8201
  195. XMODEM
  196. $Did your Kaypro come with graphics? 
  197. /What is your processor speed (in MHZ) times 10?
  198. $           Example:  25 for 2.5 MHZ.
  199. 9           Just hit <RETURN> if you don't know the speed.!
  200. (What drive is this copy of HardWire on? 
  201. Aborting HW.COM!
  202. HW.COM
  203. Now installing HW.COM...!i
  204.    Installation complete.
  205. $   This copy of HardWire is damaged.
  206. Now exiting:
  207. N  Please restart HardWire to enact changes which were made to the HW.COM file.!
  208.