1alias query
2{
3	if (!$0)
4		return;
5
6	if (!querywin($0))
7	{
8		^window new name $0 hide_others query $0
9		^window logfile $CTOOLZ_DIR/$0.log
10		^window log on
11	}
12	else
13	{
14		^window show querywin($0)
15	}
16}
17