%
% stack: x-per y-per w-per h-per
%
perscreen
4 copy @^Dim
4 copy @^DimWin
@^DimWeb