Click above to get retro games delivered to your door ever month!

  Name:     leadchar() - replace leading spaces with a character
  Usage:    <string> = leadchar(<string>,<char>)
  Params:   string <string> - the string to scan
            char <char> - the character to replace spaces with
  Returns:  a string equal to <string> with all leading spaces
            replaced with <char>

 ---------------------------------- Example ---------------------------------

                 FUNCTION STRZERO
                 parameters _number

                 return(leadchar(str(_number),"0"))

            This function returns _number as a string with
            leading spaces replaced by zeros