home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / mbug / mbug090.arc / COUNT.DOC < prev    next >
Text File  |  1979-12-31  |  6KB  |  117 lines
  1. COUNT - Version 1.5 - 3/29/84
  2. =============================
  3.  
  4. by Robert Throckmorton
  5. CP/Morrow Computer Group
  6. Sacramento, CA
  7.  
  8. Permissioεá i≤ granteΣ t∩ cop∙ thi≤ prograφ anΣ thσá accompanyinτ ì
  9. documentatioε fo≥ an∙ non-commercia∞ use.
  10.  
  11.  
  12. Overview:  COUN╘ read≤ ASCI╔ tex⌠ file≤ anΣ count≤ thσ numbe≥á oµ ì
  13. áááááááááááword≤á containeΣ therein«á   Non-alphabetiπ character≤ ì
  14. áááááááááááarσá generall∙ treateΣ  a≤ space≤ (therσ i≤ onσá mino≥ ì
  15. áááááááááááexceptioε noteΣ below⌐ anΣ onl∙ word≤ witΦ tw∩ o≥ morσ ì
  16. ááááááááááácharacter≤á arσ counted«á Fo≥ WordSta≥á  users¼á  thi≤  ì
  17. áááááááááááVersioεá (1.5⌐ ignore≤ Do⌠ CommanΣ Line≤á (meaninτá i⌠ ì
  18. ááááááááááádoesn'⌠ coun⌠ them⌐ anΣ sof⌠ hyphens.
  19.  
  20. Usage:     COUN╘  i≤ intendeΣ  fo≥ usσ b∙ students¼á  writers¼ o≥  ì
  21. áááááááááááanyonσá  elsσ  wh∩  care≤  ho≈  lonτ thei≥ tex⌠á file≤ ì
  22. áááááááááááare«á  (Somσá spellinτá checke≥ program≤ perforφá thi≤ ì
  23. áááááááááááfunction«á  Minσá doesn't--that'≤á wh∙ ╔á bothereΣá t∩ ì
  24. áááááááááááwritσ it.⌐  A⌠ thσ CP/═ promp⌠ typσ COUN╘ followeΣá b∙ ì
  25. áááááááááááthσ appropriatσ filename.
  26.  
  27.            EXAMPLE║    A╛ COUN╘ B:REPORT.TXT
  28.  
  29. Specifics: WitΦ thσ exceptioε oµ thσ apostrophσ (27H)¼á al∞á non-ì
  30. áááááááááááalphabetiπá character≤á arσ treateΣá a≤á spaces«á  Thσ ì
  31. áááááááááááreasoεá fo≥á thi≤á exceptioε i≤ t∩ ensurσá thσá prope≥ ì
  32. ááááááááááácountinτá oµ contractions«á  Sincσ COUN╘á onl∙á count≤ ì
  33. áááááááááááword≤á witΦ tw∩ o≥ morσ characters¼á (seσ "Changesó t∩ ì
  34. áááááááááááalte≥ thσ default⌐ notσ thσ following:
  35.            
  36.            I am        => COUNT sees only the 'am'.  
  37.            I'm         => COUNT sees one word (not zero).
  38.            You'll      => COUNT sees one word (not two).
  39.            don't       => COUNT sees one word.
  40.  
  41.            Versioεá 1.╡á include≤á ß LOOKU╨ tablσ froφá 02A8╚á t∩ ì
  42. ááááááááááá02B1H«á  Thσ use≥ ma∙ patcΦ iε thσ hexadecima∞á value≤ ì
  43. áááááááááááoµá ASCI╔á character≤ hσ o≥ shσ prefer≤ bσ treateΣá a≤ ì
  44. áááááááááááalphabetiπ characters«á  Thσ apostrophσ (27╚ a≤á noteΣ ì
  45. áááááááááááabove⌐á i≤ currentl∙ thσ onl∙ characte≥ iε thσ 10-bytσ ì
  46. ááááááááááátable«á  Character≤ ma∙ bσ entereΣ iε an∙ order¼ bu⌠ ß ì
  47. ááááááááááávaluσ oµ zer∩ mus⌠ terminatσ thσ tablσ anΣ ma∙ no⌠á bσ ì
  48. ááááááááááápresen⌠ betweeε an∙ tw∩ characters«á  Thσ tablσ ma∙ bσ ì
  49. áááááááááááturneΣ ofµ completel∙ b∙ patchinτ locatioε 02A8╚ t∩ 0.
  50.  
  51. .cp 7èHyphens:   Versioε 1.╡ als∩ include≤ ß subroutinσ t∩ overlooδ so-ì
  52. ááááááááááácalleΣá "softóá hyphen≤ iεá WordSta≥á files«á  Wheεá ß  ì
  53. ááááááááááá"softóá hypheεá (1EH⌐á i≤á encountered¼áá thσá prograφ ì
  54. ááááááááááásearche≤á fo≥á thσ nex⌠ alphabetiπ characte≥á (thereb∙ ì
  55. ááááááááááábypassinτá carriagσá returε anΣ linσá feeΣá sequences⌐ ì
  56. ááááááááááábeforσá resuminτá counting«á  Thi≤ subroutinσá ma∙á bσ ì
  57. áááááááááááturneΣá ofµ b∙ patchinτ 0327╚ froφ ß valuσ oµá 23╚á t∩ ì
  58. áááááááááááC9H«  
  59.  
  60.            NOTE║á  D∩á no⌠ ente≥ 1E╚ iε thσ LOOKU╨ tablσ a≤á thi≤ ì
  61. áááááááááááwil∞ confusσ thσ soft-hypheε subroutine.
  62.  
  63.            ╔á havσ choseε no⌠ t∩ trea⌠ regula≥ o≥ "hardóá hyphen≤ ì
  64. áááááááááááiεá thσá samσ manne≥ a≤ apostrophe≤ becausσá the∙á arσ ì
  65. áááááááááááuseΣá iε s∩ man∙ differen⌠ ways«á  Peoplσá dra≈á line≤ ì
  66. áááááááááááwitΦá them¼á makσ arrow≤ (--->⌐ anΣ al∞ othe≥ sort≤ oµ ì
  67. áááááááááááthings«áá  (Sometimes¼áá the∙áá arσá eveεáá useΣáá fo≥ ì
  68. áááááááááááhyphenation!⌐á  Therefore¼á assuminτ thσ hyphen≤ belo≈ ì
  69. áááááááááááare as described, pleasσ note:
  70.  
  71.            char-acter    ("soft" hyphen)  => COUNT sees one word.       
  72.            multi-strike  ("hard" hyphen)  => COUNT sees two words
  73.  
  74. Dot
  75. Commands:  COUN╘á als∩á include≤á ß subroutinσá t∩á overlooδá do⌠ ì
  76. ááááááááááácommanΣá lines«á  A≤ COUN╘ work≤ througΦ you≥ filσá i⌠ ì
  77. ááááááááááálook≤á fo≥ thσ sequencσ 'LF.º (L╞ ╜ Linσ FeeΣ ╜á 0AH)«  ì
  78. áááááááááááWheεá thi≤á sequencσá i≤á found¼áá thσá prograφá stop≤ ì
  79. ááááááááááácountinτ unti∞ i⌠ encounter≤ ß C╥ terminatinτ thσá Do⌠ ì
  80. áááááááááááCommanΣá line«á  Thi≤ subroutinσ ma∙ bσ turneΣ ofµá b∙ ì
  81. ááááááááááápatchinτ 030C╚ froφ ß valuσ oµ 2B╚ t∩ C9H.
  82.  
  83. Revision
  84. Note:      Thσá subroutinσ fo≥ handlinτ multiplσ read≤ fo≥á largσ ì
  85. áááááááááááfile≤á ha≤ als∩ beeε rewritteε anΣ debuggeΣ iε Versioε ì
  86. ááááááááááá1.╡ followinτ ß use≥ complaint«á  Thσ erro≥ presen⌠ iε ì
  87. ááááááááááápreviou≤ version≤ wa≤ not major.
  88.  
  89.            COUN╘ read≤ ß filσ unti∞ al∞ availablσ memor∙ ha≤ beeε ì
  90. áááááááááááuseΣá u≡ (actuall∙ overwritinτ thσ CCP⌐á  theεá count≤ ì
  91. áááááááááááthσ word≤ anΣ read≤ somσ more«  Thσ filσ terminato≥ i≤ ì
  92. áááááááááááassumeΣ t∩ bσ ß CTRL-┌ (1AH)«á  COUN╘ shoulΣ worδ witΦ ì
  93. ááááááááááámos⌠ computer≤ runninτ CP/═ 2.2«  
  94.  
  95. .cp 15èChanges:   Thσ use≥ ma∙ changσ thσ minimuφ worΣ lengtΦ (currentl∙ ì
  96. ááááááááááá▓á characters⌐ b∙ patchinτ location≤ 02D2╚á anΣá 02FD╚ ì
  97. áááááááááááfroφáá 02╚áá t∩á thσá ne≈á minimuφá worΣá lengtΦáá (iε ì
  98. áááááááááááhexadecimal)«  Thu≤ thσ use≥ coulΣ creatσ ß versioε oµ ì
  99. áááááááááááCOUN╘ whicΦ woulΣ coun⌠ onl∙ word≤ iε exces≤ of¼á say¼ ì
  100. ááááááááááá1░ character≤ b∙ patchinτ iε thσ valuσ 0BH.
  101.  
  102. Pleasσ addres≤ al∞ suggestions¼á revisions¼ bugs¼ complaints¼ anΣ ì
  103. othe≥ sucΦ nonsensσ to:
  104.  
  105.                               Robert Throckmorton
  106.                               7945 Kingswood Drive #240
  107.                               Citrus Heights, CA  95610
  108.  
  109. Your comments will be genuinely appreciated.
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117. .paè