home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / cpmug / cpmug046.ark / CPMLABEL.DOC < prev    next >
Encoding:
Text File  |  1985-02-10  |  4.8 KB  |  95 lines
  1.  
  2.        80AT (Series 80 Applications Transfer - Australia)
  3.  
  4.               CP/M User's Group Disk Lable Program
  5.  
  6.                          By Bill Bolton
  7.       
  8.      This  program is written in Microsoft BASIC release 5.1 and 
  9. will run under both the compiler and interpreter.  As I intended 
  10. the program to be complied,  generous use has been made of  long 
  11. lables  which impose no speed penalty with the compiled version. 
  12. There is a small speed penalty as a result when running with the 
  13. interpreter but it is minimal.
  14.  
  15.      There  is  extensive  operator prompting for  all  possible 
  16. program   options  with  defaults  set  for   maximum   operator 
  17. convenience.  I suggest that you run the program and see what it 
  18. does.
  19.  
  20.      As presented the program is ready to run on a Lear  Seigler 
  21. ADM 31 or a SOROC terminal. The only hardware dependant features 
  22. are a clear screen routine (you can simulate it with line feeds) 
  23. and  a reverse video routine (only used to highlight heading and 
  24. error messages).  Both routines are located in the block  labled 
  25. "VIDEO  ATTRIBUTES".  The  program assumes an 80 character  wide 
  26. display,  if you have a narrow display you will probably have to 
  27. change  the  format  of some of  the  INPUT  statement  prompts, 
  28. otherwise the thing should display OK.
  29.  
  30.      The program will generate lables for CP/M User's Group disk 
  31. volumes  1 to 42 (as of June 1980) including 23B.  Volume 39 has 
  32. been withdrawn and no lable can be generated for it,  an warning 
  33. message is displayed if volume 39 is selected.  Provsion is made 
  34. for printing a lable for a "Total Catalogue" disk.
  35.  
  36.      A typical lable appears as follows:
  37.  
  38.     ********************************************************
  39.     *                                                      *
  40.     *    CP/M User's Group Disk, Volume : 1                *
  41.     *                                                      *
  42.     *    Various CP/M Utilities                            *
  43.     *                                                      *
  44.     *    From the 80AT Public Domain Software Library      *
  45.     *                                                      *
  46.     *    IBM 3740 Single Density, 128 Byte Sectors         *
  47.     *                                                      *
  48.     ********************************************************
  49.  
  50.  
  51.      The  Density/Bytes per Sector line selection routine is set 
  52. up for all the formats that 80AT has occasion to use. It is easy 
  53. to  add or delete selections,  you simply need to add/delete the 
  54. selection string and adjust the DIM of SUB$.
  55. รจ     The  batch  print mode assumes that you are using form  fed 
  56. lables.  My  form fed lables (from Avery) are spaced  exactly  9 
  57. lines  apart from the top of one to the top of the next,  so the 
  58. program  assumes this spacing.  To change it just  insert/delete 
  59. LPRINT statements in the "PRINT THE LABLE" block as  appropriate 
  60. for your form fed lables.
  61.  
  62.      In the individual lable mode you should be able to use just 
  63. about any type of lable.
  64.  
  65.      When  further  volumes  are  added  to  the  User's   Group 
  66. collection  it will be easy to adjust the program.  Just add the 
  67. new  volume numbers and descriptions into the volume check  area 
  68. and  change  the  variable MAX% to the  number  of  the  highest 
  69. volume.  The  volume numbers are input as strings so it would be 
  70. possible  to add other "extra" volumes such as I have done  with 
  71. "CAT".  If  you  want to do this then just add  the  new  volume 
  72. "string"  to  the  volume  check area  and  add  another  option 
  73. question to the "ALL" routine.
  74.  
  75.      The program will take up to 200 entries in one batch,  this 
  76. seemed  a  reasonable number to me as I rarely do more than  two 
  77. complete  sets of lables in one batch.  If you really must  have 
  78. more lables in a batch then change the DIM ENTRY$(200) statement 
  79. at  the front of the program to whatever number of  entries  you 
  80. want.   BE  WARNED!  If you choose to compile it and exceed  the 
  81. number of entries dimensioned for,  unpredicatable  (but  nasty) 
  82. things  will happen  as  the variable   storage  is  below   the  
  83. program   in   the  TPA.    The interpreter  will   detect   the 
  84. problem and  give  you  an  error message.
  85.  
  86.      Note  - Programs compiled with the Microsoft Basic Compiler 
  87. cannot be distributed without the payment of a royalty to Micro-
  88. soft for the use of their runtime library.
  89.  
  90.      Copyright  (C)  of this program is retained by  W.  Bolton. 
  91. Non-commercial  use is permitted as an aid for the  disemination 
  92. of  knowledge/information  but commercial  exploitation  is  not 
  93. permitted  and  "I'll come round and rip your bloody  arms  off" 
  94. (ancient Australian curse) if I catch you !
  95.