#pragma no_clone
#pragma strict_types

#include <macros.h>
#include <std.h>
#include <time.h>
#include <mudtime.h>
#include <stdproperties.h>
#include "/d/sys/kutils.h"

inherit "/std/room";
inherit "/d/std/event";

private int time_dni = 0;
private int dzien_miesiaca = 0;
private int godzina = 0;
private int time_godziny = 0;
private int time_minuty = 0;
private int time_sekundy  = 0;
private int time_miesiace =0;
private int time_lata  	=0;

nomask private void
time_na_liczby(int time)
{
      int n;
    //policz lata
    time_lata = (n = time / 31104000);
    time -=n * 31104000;
    //policz miesiace
    time_miesiace = (n = time / 2592000);
    time -= n * 2592000;
    //policz dni
    time_dni = (n = time / 86400);
    time -= n * 86400;

    //policz godziny
    time_godziny = (n = time / 3600);
    time -= n * 3600;

    //policz minuty
    time_minuty = (n = time / 60);
    time -= n * 60;

    //policz sekundy
    time_sekundy = time;
}

void
czas()
{
      string sek;
      int s;
      seteuid(getuid(this_object()));
      sek=read_file("/d/Amn/std/godziny");
      sscanf(sek, "sekundy:%d" ,s);
      time_na_liczby(((time() - SECURITY->query_start_time())+s)*24);
}

int 
pora_roku()
{
    czas();
    switch(time_miesiace)
    {
    case 11:
    case 0..1:
    return MT_ZIMA;
    case 2:
      return MT_WCZESNA_WIOSNA;
    case 3..4:
      return MT_WIOSNA;
    case 5:
      return MT_WCZESNE_LATO;
    case 6..7:
      return MT_LATO;
    case 8:
      return MT_WCZESNA_JESIEN;
    case 9..10:
      return MT_JESIEN;
    }
}

int
pora_dnia()
{
  czas();
  switch(time_godziny)
    {
    case 2..3:
      {
	godzina=time_godziny;
	return MT_SWIT;
      }
    case 4..7:
      {	
	godzina=time_godziny;
	return MT_WCZESNY_RANEK;
      }
    case 8..10:
      {	
	godzina=time_godziny;
	return MT_RANEK;
      }
    case 11:
      {
	godzina=time_godziny;
	return MT_POLUDNIE;
      }
    case 12..16:
      {
	godzina=time_godziny;
	return MT_POPOLUDNIE;
      }
    case 18..19:
      godzina=time_godziny;
      return MT_WIECZOR;
    case 20..21:
      {
	godzina=time_godziny;
	return MT_POZNY_WIECZOR;
      }
    case 22..23:
    case 0..1:
      {
	godzina=time_godziny;
	return MT_NOC;
      }
    }
}

int
miesiac()
{
  czas();
  //    if(time_dni==0) time_dni=1;
  switch(time_miesiace)
    {
    case 0: 
      {
	return M_STYCZEN;
      }
    case 1:
      {
	return M_LUTY;
      }     
    case 2: 
      {
	return M_MARZEC;
      }
    case 3: 
      {
	return M_KWIECIEN;
	}
    case 4: 
      {
	return M_MAJ;
      }
    case 5: 
      {
	    return M_CZERWIEC;
      }
    case 6: 
	{
	  return M_LIPEC;
	}
    case 7:
      {
	return M_SIERPIEN;
      } 
    case 8: 
      {
	return M_WRZESIEN;
      }
    case 9: 
      {
	return M_PAZDZIERNIK;
      }
    case 10: 
      {
	return M_LISTOPAD;
      }
    case 11: 
      {
	return M_GRUDZIEN;
      }
    }
}

public string
check_time()
{
  int li;
  int pora_dn;
  int mies;

  li=this_object()->query_prop(ROOM_I_INSIDE);

  if(li==1)
    return "Nie jestes w stanie ustalic pory dnia nie wychodzac na zewnatrz.\n";
  mies=miesiac();
  pora_dn=pora_dnia();
  
  return "Wedlug kalendarza Krain mamy teraz "+DZIEN_MIESIACA_STR(time_dni)+" dzien miesiaca "+MT_MIESIAC_STR(mies)+".\n"+
    "Jest teraz okolo godziny "+GODZINA_STR(time_godziny)+" "+MT_PORA_DNIA_STRB(pora_dn)+".\n";
}