on -send_public * if ([$aback]==[on]&&[$awaystat]==[1]) {@awaystat=[0];^timer 1 /back}


alias gone away
alias away {@awaystat=[1]
	@awayl=[on]
	do.away
	@awaytime=[$time()]
	@awaymsg=[$0]?[$0-]:[$awayr]
	mme is away, ${awaymsg} ${awayf} 
	//away $awaymsg  }{
	@awaytime=[$time()]
        echo log is ${awayl}  
}	  
alias back {@awaystat=[0]
	@backmsg=[$0]?[$0-]:[$backr]
	@backtime=[$time()]
	if ([$awaytime] > [0]) {
	@timediff=[$tdiff2(${backtime - awaytime})]
	//back 	
 	do.back
	mme is back, ${backmsg} ${backf}
	if ([$awayl]==[on]) 
	@awayl=[off]
	echo $G logging has been turned off
        input "read away log? [y|n]: " if ([$0]==[Y]) {readlog}}
	if ([$awaytime] < [1]) {
	//back 	
 	mme is back, ${backmsg} [gone (0)]
	if ([$awayl]==[on]) 
	@awayl=[off]
	echo $G logging has been turned off
        input "read away log? [y|n]: " if ([$0]==[Y]) {readlog}}
	@awaytime=[0]
}        	
on -idle * if ([$0]!=[0]) { if ([$0]==[$awayt]&&![$awaystat]==[1]) {away autoaway after $0 min
	echo $G auto set away after $0 minutes}}

alias aback if ([$0]) {
                @aback = [$0]
                echo $G embryonic ${hblk}[${hblu}a${blu}utoback ${blu}on ${hblu}p${blu}ublic$ ${hblk}]${wht} set to ${hwht}$toupper($aback)}{
                if ([$0]==[])
                echo $G embryonic ${hblk}[${hblu}a${blu}utoback ${blu}on ${hblu}p${blu}ublic${hblk}]${wht} set to ${hwht}$toupper($aback)}

alias awaytime if ([$0]) {
		@awayt = [$0]  
                echo $G embryonic ${hblk}[${hblu}a${blu}waytime${hblk}]${wht} set to ${hwht}$awayt}{
                if ([$0]==[])  
                echo $G embryonic ${hblk}[${hblu}a${blu}waytime${hblk}]${wht} set to ${hwht}$awayt}

alias awaymsg if ([$0]) {
                @awayr = [$0-]
                echo $G embryonic ${hblk}[${hblu}a${blu}way reason${hblk}]${wht} set to ${cl}"$awayr"}{
                if ([$0]==[])
                echo $G embryonic ${hblk}[${hblu}a${blu}way reason${hblk}]${wht} set to ${cl}"$awayr"}


alias backmsg if ([$0]) {
                @backr = [$0-]
                echo $G embryonic ${hblk}[${hblu}b${blu}ack reason${hblk}]${wht} set to ${cl}"$backr"}{
                if ([$0]==[])
                echo $G embryonic ${hblk}[${hblu}b${blu}ack reason${hblk}]${wht} set to ${cl}"$backr"}