is this now the latest for the 2nd post script (AHK)?
Code: Select all
GlobalMemoryStatusEx(GMS = 1) {
VarSetCapacity(MEMORYSTATUSEX, 64, 0)
NumPut(64, MEMORYSTATUSEX)
DllCall("GlobalMemoryStatusEx", "ptr", &MEMORYSTATUSEX)
return, % (GMS = "0") ? NumGet(MEMORYSTATUSEX, 0, "Int")
: (GMS = "1") ? NumGet(MEMORYSTATUSEX, 4, "Int")
: (GMS = "2") ? Round((NumGet(MEMORYSTATUSEX, 8, "Int64") / 1024**2), 2)
: (GMS = "3") ? Round((NumGet(MEMORYSTATUSEX, 16, "Int64") / 1024**2), 2)
: (GMS = "4") ? Round((NumGet(MEMORYSTATUSEX, 24, "Int64") / 1024**2), 2)
: (GMS = "5") ? Round((NumGet(MEMORYSTATUSEX, 32, "Int64") / 1024**2), 2)
: (GMS = "6") ? Round((NumGet(MEMORYSTATUSEX, 40, "Int64") / 1024**2), 2)
: (GMS = "7") ? Round((NumGet(MEMORYSTATUSEX, 48, "Int64") / 1024**2), 2)
: (GMS = "8") ? NumGet(MEMORYSTATUSEX, 56, "Int")
: "FAIL"
}
MsgBox, 48, GlobalMemoryStatusEx, % "GlobalMemoryStatusEx function /`n"
. "MEMORYSTATUSEX structure`n`n"
. "Lenght:`t`t`t" GlobalMemoryStatusEx(0) "`n`n"
. "MemoryLoad:`t`t" GlobalMemoryStatusEx(1) " %`n`n"
. "TotalPhys:`t`t`t" GlobalMemoryStatusEx(2) " MB`n"
. "AvailPhys:`t`t`t" GlobalMemoryStatusEx(3) " MB`n`n"
. "TotalPageFile:`t`t" GlobalMemoryStatusEx(4) " MB`n"
. "AvailPageFile:`t`t" GlobalMemoryStatusEx(5) " MB`n`n"
. "TotalVirtual:`t`t" GlobalMemoryStatusEx(6) " MB`n"
. "AvailVirtual:`t`t" GlobalMemoryStatusEx(7) " MB`n`n"
. "AvailExtendedVirtual:`t`t" GlobalMemoryStatusEx(8) " MB`n"