Pasted

const int SUNRISE = 1;
    const int DAY = 0;
    const int SUNSET = 2;
    const int NIGHT = 3;
    const int DAY_PAL = 0;
    const int SUNRISET_PAL = 32;
    const int NIGHT_PAL = 33;
    const int NIGHT_OVERLAY_LAYER = 6;
    const int CLOCK_FRAMES = 0;
    const int CLOCK_SECONDS = 1;
    const int CR_SECONDS = 30;
    const int CLOCK_MINUTES = 2;
    const int CR_MINUTES = 29;
    const int CLOCK_HOURS = 3;
    const int CR_HOURS = 28;
    const int CLOCK_DAYS = 4;
    const int CLOCK_MAX = 5;
    int CYCLE = 0;
    int CURRENTDMAP = -1;
    int CURRENTSCREEN = -1;
 
const int TIME_FRAME     = 0;
const int TIME_SEC   = 1;
const int TIME_MINUTE    = 2;
const int TIME_HOUR  = 3;
const int TIME_DAY   = 4;
const int TIME_MONTH     = 5;
const int TIME_YEAR  = 6;
const int TIME_MAX  = 7;
 
const int DMT_DUNGEON = 2;
const int DMT_INTERIOR = 3;
 
int Time[TIME_MAX]={-1, 0, 0, 0, 1, 1, 1};
 
global script a
{
    void run()
    {
        while(1)
        {
            Do_Time();
            DayNightCycle();
            Waitdraw();
            Waitframe();
        }
    }
}
 
void DayNightCycle()
{
    dmapdata dm = Game->LoadDMapData(Game->GetCurDMap());
    int type = dm->Type;  
    
    
    if ( CURRENTDMAP != Game->GetCurDMap() || CURRENTSCREEN != Game->GetCurScreen() )
    {
    
        TraceNL(); 
        TraceS("Detected DMap Type: "); Trace(type);
        CURRENTDMAP = Game->GetCurDMap();
        CURRENTSCREEN = Game->GetCurScreen();
    }
    
    if ( type == DMT_INTERIOR )
    {
        TraceS("Interior DMap found by DayNightCycle()"); return;
    }
    if ( type == DMT_DUNGEON )
    {
        TraceNL(); TraceS("Dungeon DMap found by DayNightCycle()"); return;
    } 
    else
    {
        if (Time[TIME_HOUR] <= 5)
        {
            if (CYCLE != SUNRISE)
            {
                CYCLE = SUNRISE;
                TraceNL(); Game->DMapPalette[CURRENTDMAP] = SUNRISET_PAL;
                return;
            }
        }
        else if (Time[TIME_HOUR] <= 11) 
        {
            if (CYCLE != DAY)
            {
        
                CYCLE = DAY;
                Game->DMapPalette[CURRENTDMAP] = DAY_PAL;
                return;
            }
        }
        else if (Time[TIME_HOUR] <= 17) 
        {
            if (CYCLE != SUNSET)
            {
                CYCLE = SUNSET;
                Game->DMapPalette[CURRENTDMAP] = SUNRISET_PAL;
                return;
            }
        }
        else 
        {
            if (CYCLE != NIGHT)
            {
                CYCLE = NIGHT;
                Game->DMapPalette[CURRENTDMAP] = NIGHT_PAL;
                return;
            }
        }
        return;    
    }    
}
 
 
 
 
void Do_Time()
{
    int f = ++Time[TIME_FRAME];
    if ( f % 2 )  ++Time[TIME_SEC];
    if ( f >= 60 ) Time[TIME_FRAME] = 0;
    if ( Time[TIME_SEC] > 59 ) 
    {
        Time[TIME_SEC] = 0;
        ++Time[TIME_MINUTE];
    }
    if ( Time[TIME_MINUTE] > 59 ) 
    {   
        Time[TIME_MINUTE] = 0;
        ++Time[TIME_HOUR];
    }
    if ( Time[TIME_HOUR] > 23 )
    {
        Time[TIME_HOUR] = 0;
        ++Time[TIME_DAY];
    }
    if ( Time[TIME_DAY] > 30 )
    {
        Time[TIME_DAY] = 1;
        ++Time[TIME_MONTH];
    }
    if ( Time[TIME_MONTH] > 12 )
    {
        Time[TIME_MONTH] = 1;
        ++Time[TIME_YEAR];
    }
}