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

  Name:     datetype() - get current SET DATE TO setting
  Usage:    <integer> = datetype()
  Params:   none
  Returns:  an integer defining the current DATE type in use, as
            defined in the table below:

                 1 = American
                 2 = Ansi
                 3 = British
                 4 = French
                 5 = German
                 6 = Italian

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

                 SET DATE AMERICAN
                 ? datetype()
                 * prints 1

                 SET DATE GERMAN
                 ? datetype()
                 * prints 5