*STRING.CMD 1/2/85
*program to store variables to macros for use in STRING processing

*create current character
store "$(string,cpointer,1)" to character

*move character pointer
store "store 1 to cpointer" to firstchar
*store "store len(string) to cpointer" to lastchar
store "store cpointer + 1 to cpointer" to nextchar

*test for end of string

*store "cpointer > len(trim(string)) = 1 .and. string = ' '" to empty

*test for end of string
store "(cpointer > len(trim(string)))" to endstring

*test for type of character
store "&character = ' '" to isblank

*case conversion

*build a new string
store "store &character to newstring" to startstr
store "store newstring + &character to newstring" to addchar

*For Compatibility
*	store string to be process to variable 'string'
*	set talk off
*	do nonblank.cmd to check for empty string
*	do string - this program
*	'newstring' will be the result to be used by calling program
*	cpointer may be moved or used








