| Autore: IRon | Data: 2005-07-28 |
| Modificato:
2005-08-03 |
Letture: 322 |
|
Ad esempio inserendo 22/07/2005 restituisce Friday
Sintassi : /dey , $dey(dd/mm/yyyy)
alias dey {
if ($regex($1,[0-9]{2}/[0-9]{2}/[0-9]{4})) {
var %week = Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday , %t = $findtok(%week,$day,1,44)
if ($numtok($duration($calc($ctime($1) - $ctime($date))),32) == 2) { var %pr = $gettok($gettok($duration($calc($ctime($1) - $ctime($date))),2,32),1,100) }
else { var %pr = $gettok($duration($calc($ctime($1) - $ctime($date))),1,100) }
if ($calc(%pr + %t) > 7) { var %ss = $calc((%pr + %t) - 7) }
else { var %ss = $calc(%pr + %t) }
if (%ss == 0) { echo -a $day | halt }
else { echo -a $gettok(%week,%ss,44) | halt }
}
else { echo $color(info) -a * /dey: insufficient parameters or incorrect syntax $chr(91) /dey <dd/mm/yyyy> $chr(93) | halt }
}
controllo attraverso la creazione di una regular espression che il parametro inserito sia nel formato dd/mm/yyyy , se è nel formato esatto continua , altrimenti avverte con un echo dell'errore
setto 1 var contenente i giorni della settimana che mi servirà successivamente per ricavare il giorno richiesto, e 1 var che individua la posizione del giorno settimanale odierno all'interno della var %week
controllo con un if cosa restituisce l'$duration , e in base ad esso mi setto 1 variabile contenente la differenza (in giorni) fra il giorno richiesto e quello attuale
ricavo una variabile attraverso $calc che mi servirà successivamente per individuare con $gettok la posizione del giorno ricavato all'interno di %week
stampo a video nella finestra attiva il giorno della settimana corrisponde nte alla data indicata.
|
|
