home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / firstcap.zip / FCAP2.PRG < prev    next >
Text File  |  1986-03-12  |  961b  |  31 lines
  1.  
  2. *********************************************
  3. *           V E R S I O N   2               *
  4. *********************************************
  5. *
  6. *  Function.....: Firstcap() . . . Version 2
  7. *  Author.......: Dennis L. Dias
  8. *  Source ID....: NAN449
  9. *  Date.........: 12/14/85
  10. *
  11. *  Syntax:  FIRSTCAP( <expC> )
  12. *  Same syntax and output as version 1 except that the first word
  13. *  will always be capitalized..even if a special word is preceded by
  14. *  one or more leading word separators such as "...A Fine Madness..."
  15. *
  16. *  Notes:  This version calls an assembly language routine to do
  17. *          most of the work. The character string passed to the
  18. *          assembler module must first be converted to lower case.
  19. *          Execution speed is very fast..completely invisible.
  20. *
  21. FUNCTION FIRSTCAP
  22. *
  23. PARAMETERS fl_strg
  24. PRIVATE fl_outstr
  25. *
  26. fl_outstr = LOWER(fl_strg)
  27. CALL fcap with fl_outstr
  28. RETURN(fl_outstr)
  29. *
  30. ***************************
  31.