millifolium
Новичок
- Сообщения
- 18
- Репутация
- 1
Собственно код...после компиляции многократно запускает сам себя...В чем проблемма?
Код:
;pagefile
$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 1047852 < $a[1] AND $a[1] <= 2095704
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 2048 2048"))
Case 2095704 < $a[1] AND $a[1] <= 4191408
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 3072 3072"))
Case ELSE
RunWait(RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management", "PagingFiles", "REG_MULTI_SZ", "c:\pagefile.sys 4096 4096"))
EndSelect