[Info-vax] getting pixel dimensions of monitor

[Phillip Helbig---undress to reply]

In SYS$MANAGER:DECW$PRIVATE_SERVER_SETUP.COM I have stuff like

[...]
$ if node .eqs. f$getsyi("NODENAME") then goto DO_'node'
[...]
$DO_FOO:
$ dwd0 = f$edit(f$extract(0,2,f$element(0,",",DECW$DEVICE)),"UPCASE")
$ if (dwd0 .eqs. "GY")
$ then
$!maybe values aren't correct
$   decw$xsize_in_pixels == "1280"
$   decw$ysize_in_pixels == "1024"
$   define /system /executive_mode decw$server_pixel_depth 24
$   define /system /executive_mode decw$server_refresh_rate 60
$ endif

The numbers come from trial and error.  Using them on a different
monitor sometimes results in stretched images, so the ratio is probably
not the same.  Is there some standard way to find out what the ratio
really is?  (Probably not, otherwise one could set it on the fly.)