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

  Name:     isstate() - validate two digit state abbreviations
  Usage:    <logical> = isstate(<state>)
  Params:   string <state> - the state abbreviation to check
  Returns:  logical .T. if the two digit state code is a valid
            state, .F. if not.

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

                 m_state = space(2)

                 @ 10,0  say "Enter state code to lookup: "
                 @ 10,28 get m_state valid isstate(m_state)
                 read

                      or:

                 ? isstate("NY")
                 * prints .T.

                 ? isstate("TY")
                 * prints .F.