function getAutomsgFor(c:Tcontact):string;
var
h:Tdatetime;
begin
if imAwaySince > 0 then
h:=(now-imAwaySince)*24
else
h:=0;
result:=template(automessages[0], [
'%you%', c.displayed,
'%nick%', c.nick,
'%ip%', ifThen(c.ip=0,___('unk'),ip2str(c.ip)),
'%status%', statusName(c.status),
'%proto%', ifThen(c.proto=0, ___('unk'), intToStr(c.proto)),
'%awaysince%', formatDatetime(timeformat.automsg, imAwaySince),
'%elapsedhours%', intToStr(trunc(h)),
'%elapsedminutes%', intToStr(trunc(frac(h)*60)),
'%h%', intToStr(hourof(now)),
'%m%', intToStr(minuteof(now)),
'%s%', intToStr(secondof(now)),
'%D%', intToStr(dayof(now)),
'%M%', intToStr(monthof(now)),
'%Y%', intToStr(yearof(now)),
'%hh%', intToStr(hourof(now),2),
'%mm%', intToStr(minuteof(now),2),
'%ss%', intToStr(secondof(now),2),
'%DD%', intToStr(dayof(now),2),
'%MM%', intToStr(monthof(now),2),
'%YY%', intToStr(yearof(now),2),
'%onlinecontacts%', intToStr(ICQ.readroaster.count-countContactsIn(SC_offline)),
'%offlinecontacts%', intToStr(countContactsIn(SC_offline))
]);
end; // getAutomsg