#!/bin/sh

initials () {
	for word in $*; do
		#letter=`echo $word | cut -c1`
		letter=`echo $word`
		out="$out$letter"
		break
	done
	echo $out;
}

attribute () {
	inits=`initials "$1"`
	cat <<GOD_HAVE_MERCY_ON_MY_SOUL
>>>>> "$inits" == $@ writes:
GOD_HAVE_MERCY_ON_MY_SOUL
}

quote () {
	inits=`initials "$@"`
	case "`echo -n`" in
		-n)	echo "$inits> \c";;
		*)	echo -n "$inits> ";;
	esac
}

mode=$1
shift
case "$mode" in
	-a)	attribute "$1" "$2";;
	-q)	quote "$1";;
esac