Pozia, один нюанс - память измеряется в KB, поэтому все значения $a[1] надо умножить на 1024 ...
Просто так для проформы прикладываю свой вариант скрипта по автоматическому заданию размера файла подкачки (может пригодится народу):
Код:

$a = MemGetStats()
Select
Case $a[1] <= 261963
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 512 512"))
Case 261963 < $a[1] AND $a[1] <= 523926
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 1024 1024"))
Case 523926 < $a[1] AND $a[1] <= 1047852
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 1536 1536"))
Case ELSE
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 2048 2048"))
EndSelect