XProfan

WindowTitle "GetSystemMetrics"
Def GetSystemMetrics(1) !"user32","GetSystemMetrics"
Font 2
cls
Print "                            SlowProcessor = ";~GetSystemMetrics(73)
Print " BootMode 0Normal 1Failsafe 2Safe+Network = ";~GetSystemMetrics(67)
Print " Network present LSB = ";~GetSystemMetrics(63) & 1;", No. of Monitors = ";~GetSystemMetrics(80)
Print "         Width of primary display monitor = ";~GetSystemMetrics(0)
Print "                Heigth of primary monitor = ";~GetSystemMetrics(1)
Print "  WindowBorder px = ";~GetSystemMetrics(5);";  WindowBorder3D px = ";~GetSystemMetrics(45)
Print "                     MinWidth of a Window = ";~GetSystemMetrics(28)
Print "                      MinHeight of Window = ";~GetSystemMetrics(29)
Print "                    Heigth of CaptionArea = ";~GetSystemMetrics(4)
Print "                            MenubarHeight = ";~GetSystemMetrics(15)
Print "                    SM_CX-FIXED/DLG-FRAME = ";~GetSystemMetrics(7)
Print "     CursorWidth = ";~GetSystemMetrics(13);";       CursorHeight = ";~GetSystemMetrics(14)
Print "             ArrangeMinimizedWindows Mode = ";~GetSystemMetrics(56)
print
Print "                       MousePortInstalled = ";~GetSystemMetrics(19)
Print "                   Number of MouseButtons = ";~GetSystemMetrics(43)
Print "                VerticalScrollWheel Mouse = ";(~GetSystemMetrics(75)>0)
Print "              HorizontalScrollWheel Mouse = ";(~GetSystemMetrics(91)>0)
Print "          XP/Vista/Win7 Edition='Starter' = "; ~GetSystemMetrics(88)
Print "                   TabletPCSupport Active = ";~GetSystemMetrics(86)
Print "            Windows4PenComputingInstalled = ";~GetSystemMetrics(41)
Print "             Windows Media Center Edition = ";~GetSystemMetrics(87)
WaitInput
End