#!/bin/rc

nick='marmalade'

if(~ $#* 0){
	addr='tcp!localhost!44322'
}
if not if(! $#* 1){
	addr=$"1
}
if not if(! ~ $#* 2){
	echo 'usage: 9talk/cmd [addr] [nick]' >[1=2]
	exit usage
}
if not {
	addr=$"1
	nick=$"2
}

fn onecmd{
	cmd=$"*
	{echo $"cmd; echo QUIT} | aux/dial -e $addr
}

while(){
	line=`{read -n 1}
	line2=`{echo $"line | tail +1c}
	switch($line){
	case !*
		onecmd SEND $"line2 >/dev/null
	case .* :*
		onecmd SEND $"nick' '$"line2 >/dev/null
	case "*
		onecmd SEND $"nick': '$"line2 >/dev/null
	case *
		onecmd SEND $"nick': '$"line >/dev/null
	}
}