@echo.max = 29
alias echostr {
	if ([$0] && ([$0] > echo.max)) {echo $G invalid choice}
	if ([$0] && ([$0] < 1 )) {echo $G invalid choice} 
	if ([$0]==[]) {
        echo ${c1}[ ${hwht}e${cl}chostr ${hwht}f${cl}ormats ${hwht}t${cl}oggles${c1} ]${hblk}-------
	echo ${hblk}
	echo ${hblk} ${hblk}\(${hblu}1${hblk}) ${hblk}${wht}${hwht}.    ${hblk}\(${hblu}2${hblk}) ${hblk}${hwht}${wht}    ${hblk}\(${hblu}3${hblk}) ${hblk}${hwht}${wht}    ${hblk}\(${hblu}4${hblk}) ${wht}${hblk}${wht}    ${hblk}\(${hblu}5${hblk}) ${hblk}${hwht}${wht}    ${hblk}\(${hblu}6${hblk}) ${hblk}${hwht}${wht}
	echo ${hblk} ${hblk}\(${hblu}7${hblk}) ${hblk}${hwht}${wht}    ${hblk}\(${hblu}8${hblk}) ${c1}${c2}${hwht}.    ${hblk}\(${hblu}9${hblk}) ${c1}${hwht}${c2}    ${hblk}\(${hblu}10${hblk}) ${c1}${c2}${c1}   ${hblk}\(${hblu}11${hblk}) ${hwht}${c2}${hwht}   ${hblk}\(${hblu}12${hblk}) ${c1}${hwht}${c1}
	echo ${hblk} ${hblk}\(${hblu}13${hblk}) ${c1}${hwht}${c2}   ${hblk}\(${hblu}14${hblk}) ${c1}${hwht}${c2}   ${hblk}\(${hblu}15${hblk}) $cparse("%K%b%B")   ${hblk}\(${hblu}16${hblk}) $cparse("%B[%G!%B]")   ${hblk}\(${hblu}17${hblk}) $cparse("%r(%B%r)")   ${hblk}\(${hblu}18${hblk}) $cparse("%m*%b*%m*")
	echo ${hblk} ${hblk}\(${hblu}19${hblk}) $cparse("%g-%G=%g-")   ${hblk}\(${hblu}20${hblk}) $cparse("%K%r-%R")   ${hblk}\(${hblu}21${hblk}) $cparse("%B:%c:%b:")   ${hblk}\(${hblu}22${hblk}) $cparse("%c%C!%c")   ${hblk}\(${hblu}23${hblk}) $cparse("%K=%b=%B=")   ${hblk}\(${hblu}24${hblk}) $cparse("%K%c%C")
	echo ${hblk}
	echo ${c1}${hblk}${c1}--${hblk}--${c1}${hblk}--${c1}${hblk}--------
	echo $G echostr currently set to $G
}	
	if ([$0]==[1]) {
	@echos= [${hblk}${wht}${hwht}.${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}	
	if ([$0]==[2]) {
	@echos= [${hblk}${hwht}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[3]) {
	@echos= [${hblk}${hwht}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[4]) { 
	@echos= [${wht}${hblk}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[5]) {
	@echos= [${hblk}${hwht}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[6]) {
	@echos= [${hblk}${hwht}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[7]) {
	@echos= [${hblk}${hwht}${wht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[8]) {
	@echos= [${c1}${c2}${hwht}.${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}	
	if ([$0]==[9]) {
	@echos= [${c1}${hwht}${c2}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[10]) {
	@echos= [${c1}${c2}${c1}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[11]) { 
	@echos= [${hwht}${c2}${hwht}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[12]) {
	@echos= [${c1}${hwht}${c1}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[13]) {
	@echos= [${c1}${hwht}${c2}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[14]) {
	@echos= [${c1}${hwht}${c2}${cl}
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	 if ([$0]==[15]) {
	@echos=[$cparse("%K%b%B")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[16]) {
	@echos=[$cparse("%B[%G!%B]")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[17]) {
	@echos=[$cparse("%r(%B%r)")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[18]) {
	@echos=[$cparse("%m*%b*%m*")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[19]) {
	@echos=[$cparse("%g-%G=%g-")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[20]) {
	@echos=[$cparse("%K%r-%R")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[21]) {
	@echos=[$cparse("%B:%c:%b:")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[22]) {
	@echos=[$cparse("%c%C!%c")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[23]) {
	@echos=[$cparse("%K=%b=%B=")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	if ([$0]==[24]) {
	@echos=[$cparse("%K%c%C")
	^set show_numerics_str $echos
	echo $G echostr set to $G}
	echo $G type /fsave to save echostr theme
}
