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

 setepoch()          Set the epoch flag
------------------------------------------------------------------------------
 Declaration
   getset.hdr

 Syntax
   proc setepoch extern
   param value uint uYear

 Arguments
   uYear is the new epoch year value.

 Return
   None.

 Description
   The setepoch() function sets the epoch year according to the
   passed parameter.

 Example
   #define EXAMPLE_DATE
   #include example.hdr

   proc Test_setepoch
   set century on
   ? ctod( "10/01/50" )
   setepoch( 1980 )
   ? ctod( "10/01/50" )
   endproc

   proc main
   Test_setepoch()
   endproc