/* Programm SetPCdate zum Setzen der Zeit fuer der PC
     in Aztec Version 3.4 */
#include "exec/types.h"
#include "exec/memory.h"

#define ZIEL_ADRESSE 0x202000
#define LAENGE 5
#define STARTP 0x1111
struct azeit_s {
  long tage;
  long minuten;
  long ticks;
 } azeit;

main()
{
 APTR mem_ok,adresse;

 mem_ok=AllocAbs((long)LAENGE,(APTR)ZIEL_ADRESSE);
 adresse=ZIEL_ADRESSE; adresse++;
 DateStamp(&azeit);
 *adresse=((azeit.minuten << 16) | (azeit.ticks)); adresse--;
 *adresse=(((long)STARTP << 16) | (azeit.tage));
 }