Информация о памяти компьютера

; FASM-code..
; GlobalMemoryStatus
;--------------------
;struct:
;    dw_Length;          ; размер структуры (8*4 байта)
;    dw_MemoryLoad;      ; занято в процентах
;    dw_TotalPhys;       ; /всего памяти
;    dw_AvailPhys;       ; свободно
;    dw_TotalPageFile;   ; /файл подкачки
;    dw_AvailPageFile;   ; свободно подкачки
;    dw_TotalVirtual;    ; /всего виртуальной
;    dw_AvailVirtual;    ; свободно виртуальной
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
 
format   PE console
include 'win32ax.inc'
include 'api\kernel32.inc'
entry   start
 
section '.data' data readable writeable
buff         dd  8 dup(0)     ; буфер под структуру
 
section '.code' code readable executable
start:
    invoke   GlobalMemoryStatus, buff
;// Всего физической памяти
    mov      eax,[buff+8]
    shr      eax,20             ; в Мбайтах
    cinvoke  printf, <'MEMORY',10,'----------',10,'Total   : %d Mb',10,0>,eax
 
;// Свободно
    mov      eax,[buff+12]
    shr      eax,20             ; в Мбайтах
    mov      ebx,100               ;..и в процентах
    sub      ebx,[buff+4]
    cinvoke  printf, <'Free    : %d Mb = %d%%',10,10,0>,eax,ebx
 
;// Файл подкачки
    mov      eax,[buff+16]
    shr      eax,20
    cinvoke  printf, <'PageFile',10,'----------',10,'Total   : %d Mb',10,0>,eax
    mov      eax,[buff+20]
    shr      eax,20
    cinvoke  printf, <'Free    : %d Mb',10,10,0>,eax
 
;// Виртуальной памяти
    mov      eax,[buff+24]
    shr      eax,20
    cinvoke  printf, <'Virtual',10,'----------',10,'Total   : %d Mb',10,0>,eax
    mov      eax,[buff+28]
    shr      eax,20
    cinvoke  printf, <'Free    : %d Mb',10,0>,eax
 
    cinvoke  scanf
    invoke   ExitProcess, 0
;----------------------------------------------
section  '.idata' import data readable
library  kernel32, 'kernel32.dll',\
            msvcrt,   'msvcrt.dll'
 
import   msvcrt,\
         printf, 'printf',\
            scanf,  'scanf'