1
2
3
4
5
6
7
8
9
10
11
|
raw 329:*:{
set %creationtime_ [ $+ [ $2 ] ] $3
}
on 9:text:.chanctime:#:{
var %ctime = %creationtime_ [ $+ [ $chan ] ]
if (!%creationtime_ [ $+ [ $chan ] ]) { hop $chan Needed for chanctime | timer 1 4 var %ctime = %creationtime_ [ $+ [ $chan ] ] | timer 1 5 msg $chan Channel $chan created: $asctime(%ctime,dd.mm.yy) | halt }
var %expr = $ctime $+ - $+ %ctime
var %elapsed = $duration($calc(%expr))
msg $chan 0,1« 9,1:0:9,1: 0,1» Channel $chan created: $asctime(%ctime,dd.mm.yy HH:nn:ss) 0,1« 9,1:0:9,1: 0,1» Channel is %elapsed old 0,1« 9,1:0:9,1: 0,1»
}
|