let t_jk_dlgs s =
try if Str.string_match reg_jkdlg s 0 then
let n, l = Str.matched_group 1 s, Str.matched_group 2 s in
let name = remove_q3colors n and line = remove_q3colors l in
va "%30s :: %s" name line
else if Str.string_match reg_jkprivdlg s 0 then
let n, nn, l = Str.matched_group 1 s, Str.matched_group 2 s, Str.matched_group 3 s in
let name1 = remove_q3colors n and name2 = remove_q3colors nn and line = remove_q3colors l in
va "%45s ~: %s" (va "%s -> %s" name1 name2) line
else "" with _ -> ""