It is currently 4. June 2020 23:55

All times are UTC + 1 hour




 Page 1 of 1 [ 1 post ] 
Author Message
 Post subject: Current Day
PostPosted: 16. July 2009 13:58 
Administrator
User avatar

Joined: 17. March 2008 13:32
Posts: 96
Location: Arnstadt, Germany
; Returns the current day of the date given
alias ttt {
  ;a check for $date
  if (/ isin $1) { tokenize 32 $date($ctime($1),dd.mm.yyyy) }
  ;another check if it's a date that could be used with this method
  if ($ctime($1)) {
    !var %d,%y,%c,%m
    %d = 31+28+31+30+31+30+31+31+30+31+30
    %y = $iif($date($ctime($1),dd.mm.yyyy) == $1,$1,$date(dd.mm.yyyy))
    %c = $ctime(%y)
    %m = $calc($date(%c,m) -1)
    %d = $iif(%m != 0,$gettok(%d,1- $+ %m,43),0)
    return $calc($(%d,2) + $date(%c,dd) $iif(($ctime(29/02/ $+ $date(%c,yyyy))) && (%m > 1),+1))
  }
}



_________________
one step closer to world domination
Cyberscripters Administrator/Founder
Offline
 Profile  
 
Display posts from previous:  Sort by  
 Page 1 of 1 [ 1 post ] 

All times are UTC + 1 hour


Who is online

Users browsing this forum: No registered users


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  

cron