Did you try this way?
I put the sleep and the conline-emptying as two separate actions in the same brackets of the "if" statements. I also gave the "at" command a second argument, just in case.
[SELECT ALL] Code:
// On TK message script by DES|Bukz. Little mod by Kirin.
if (! (strstr $mapstartalways tkchk)) [add2alias mapstartalways [sleep 1000 [tkchk]]] []
if (checkalias srymsg) [] [srymsg = "Sorry Mate :("]
tkchk = [
if (= $connected 1) [ // Only apologize to real people :p
if (! (strcmp (at $conline 0) "3you")) [] [ // Workaround for stupid people who use "you" in their nicks
if (strstr $conline "you fragged teammate ") [sleep 1000 [say (concatword % $srymsg)]; conline [ ]] []
if (strstr $conline "you gibbed teammate ") [sleep 1000 [say (concatword % $srymsg)]; conline [ ]] []
if (strstr $conline "you splattered teammate ") [sleep 1000 [say (concatword % $srymsg)]; conline [ ]] []
if (strstr $conline "you knifed teammate ") [sleep 1000 [say (concatword % $srymsg)]; conline [ ]] []
if (strstr $conline "you headshotted teammate ") [sleep 1000 [say (concatword % $srymsg)]; conline [ ]] []
]
sleep 1 [tkchk]
][]]
newmenu "sorrymsg"
menuitemtextinput "Auto-sorry upon TK msg: " "result $srymsg" "srymsg = $arg1"