;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; You have to download motfv3.dll from www.mircscripts.org ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Changes: ;;
;; - VERSION ;;
;; - PING ;;
;; - TIME ;;
;; - FINGER ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
on *:start:{ dll motfv3.dll motfv Load }
on *:connect:{ dll motfv3.dll motfv Sync }
ctcp ^*:MOTFV:*:{ sendreply VERSION $nick $chan | haltdef }
ctcp ^*:FINGER:*:{ sendreply FINGER $nick $chan | haltdef }
ctcp ^*:PING:*:{ sendreply PING $nick $chan $2- | haltdef }
ctcp ^*:TIME:*:{ sendreply TIME $nick $chan | haltdef }
alias -l sendreply {
echo $color(CTCP) $iif($3 ischan,-t $3,$iif($cid == $activecid,-at,-st)) $+([,$2 $+ $iif($3 ischan,: $+ $3) $1 $+ ]) $iif($timer(ctcpflood $+ $address),(Ignored - CTCP Flood from $ial($2) $+ ))
if (!$timer(ctcpflood $+ $address)) {
if ($1 == PING) { !.ctcpreply $2 PING $gettok($3-,-1,32) }
if ($1 == VERSION) { !.ctcpreply $2 VERSION mIRC v $+ $version Khaled Mardem-Bey }
if ($1 == FINGER) { !.ctcpreply $2 FINGER $fullname ( $+ $emailaddr $+ ) Idle $idle seconds $iif($readini($mircini,text,finger),( $+ $ifmatch $+ )) }
if ($1 == TIME) { !.ctcpreply $2 TIME $asctime }
.timerctcpflood $+ $address 1 20 $!null
}
}