Etwas

bind pub - !fight competition

proc competition { nick uhost hand chan args } {
  global sdate edate nick1 name1 nick2 name2
  set sdate [lindex [split $args] 0]
  set edate [lindex [split $args] 1]
  set nick1 [lindex [split $args] 2]
  set name1 [lindex [split $args] 3]
  set nick2 [lindex [split $args] 4]
  set name2 [lindex [split $args] 5]
  set sdate [string trimleft $sdate "{"]
  set name2 [string trimright $name2 " }"]
  putserv "NOTICE $nick1 : poker $name1 $sdate $edate"
}

bind msg - response response

proc response { nick uhost hand text } {
   putserv "PRIVMSG #kaffeezug : $text"
}

# Channel Call     : [10:14] <!Toasta> !fight 2007-01-01 2007-10-12 Toasta caroline46 nick2 name2
# Bot Sends Notice : [10:14] >> Bot: poker caroline46 2007-01-01 2007-10-12
# client respondes : [10:14] -> *Bot* response 2007-01-01 2007-10-10 caroline46 NL ($1) IPN 3536 18.52 11.34 20.76 43.38 -938.77 -13.2
# Client Chan Output : Missing :(