#VAR auto_path 0

#ALIAS tpath {
		#IF {$auto_path == 1} 
		{
                #VAR auto_path 0;
				#map name end;
				#map goto start;
				#map find end;
				#path map;
				#map destroy;
                #ECHO {%c%h} {{red} { PATHING OFF }}
        } {
                #VAR auto_path 1;
				#map create;
				#map goto 1;
				#map name start;
                #ECHO {%c%h} {{green} { PATHING ON }};
        }

}

#ACT {Alas, you cannot go that way. . . .} {#IF {$auto_path == 1} {#map undo}} 

#showme __ PATH.tt