Timezones
Posted by brand0n`
Wednesday, June 15, 2005
Description: Give time for 4 (continental) american timezones
wrote this when i got bored...
<mirc>
on *:TEXT:_time*:#: {
set %HH1 $left($time,2)
set %HHEST $calc(%HH1 + 01)
set %nn $mid($time,4,2)
set %ss $right($time,2)
set %HHPST $calc(%HH1 - 02)
set %HHMST $calc(%HH1 - 01)
if (!$2) {
msg $chan Central time is: $time $+ . Eastern time is:[^K] %HHEST $+ : $+ %nn $+ : $+ %ss $+ . Pacific time is:[^K] %HHPST $+ : $+ %nn $+ : $+ %ss $+ . Mountain time is:[^K] %HHMST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == CST) {
msg $chan Central time is $time $+ .
}
elseif ($2 == EST) {
msg $chan Eastern time is:[^K] %HHEST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == PST) {
msg $chan Pacific time is:[^K] %HHPST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == MST) {
msg $chan Mountain time is:[^K] %HHMST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 != CST) && ($2 != MST) && ($2 != EST) && ($2 != PST) {
notice $nick Please choose between [^B]CST[^B], [^B]MST[^B], [^B]PST[^B], and [^B]EST[^B]. Or, just type _time.
}
}
<mirc>
wrote this when i got bored...
<mirc>
on *:TEXT:_time*:#: {
set %HH1 $left($time,2)
set %HHEST $calc(%HH1 + 01)
set %nn $mid($time,4,2)
set %ss $right($time,2)
set %HHPST $calc(%HH1 - 02)
set %HHMST $calc(%HH1 - 01)
if (!$2) {
msg $chan Central time is: $time $+ . Eastern time is:[^K] %HHEST $+ : $+ %nn $+ : $+ %ss $+ . Pacific time is:[^K] %HHPST $+ : $+ %nn $+ : $+ %ss $+ . Mountain time is:[^K] %HHMST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == CST) {
msg $chan Central time is $time $+ .
}
elseif ($2 == EST) {
msg $chan Eastern time is:[^K] %HHEST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == PST) {
msg $chan Pacific time is:[^K] %HHPST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 == MST) {
msg $chan Mountain time is:[^K] %HHMST $+ : $+ %nn $+ : $+ %ss $+ .
}
elseif ($2 != CST) && ($2 != MST) && ($2 != EST) && ($2 != PST) {
notice $nick Please choose between [^B]CST[^B], [^B]MST[^B], [^B]PST[^B], and [^B]EST[^B]. Or, just type _time.
}
}
<mirc>