Remember:{ set %wLocops.x $window($active).x 
           set %wLocops.y $window($active).y
           set %wLocops.w $window($active).w
           set %wLocops.h $window($active).h
}
Clear:/clear $active