; Colors URLs in all outgoing/incoming channel and query messages the
; 'traditional' blue color, along with underlining
; Place the code in Remotes
; If you want to override the URL styling at any time hold the Ctrl key while
; pressing enter (or press ctrl+J)
alias urlcol {
var %x
.echo -q $regsub($1,/(?<=^| )((?>[a-z]{3,8}:\/\/|www\.)\S+)/g,12\199,%x)
return %x
}
on &*:input:*:{
if ($left($1,1) !isin / $readini($mircini,text,commandchar)) && (!$ctrlenter) {
say $$urlcol($1-)
halt
}
}
on &^*:text:*:*:{
echo -bmfltcri normal $iif(#,#,$nick) $+(<,$iif($left($nick(#,$nick).pnick,1) $&
isin $prefix,$v1),$nick,>) $$urlcol($1-)
halt
}