BlackWizard
31-08-2011, 09:56 PM
السلام عليكم ورحمة الله وبركاته
النهاردة لقيت الموضوع دا بالصدفة لتقليل الضغط على الرام وكان مكتوب فى موقع Sroking وموقع Rev6
دا للمعالج x64
While 1
$v_SroProcesses = ProcessList("sro_client.exe")
For $i = 1 To $v_SroProcesses[0][0]
$v_ProcInfo = ProcessGetStats($v_SroProcesses[$i][1])
If IsArray($v_ProcInfo) Then
If ($v_ProcInfo[0] / 1024 >= 100000) Then _SM_CleanRam($v_SroProcesses[$i][1])
EndIf
Next
Sleep(5*60000) ;It will release ram once every 5 minutes you can change this to whatever you like
WEnd
Func _SM_CleanRam($v_ProcessPID)
If @OSArch <> "X86" Then
Local $h_ProcHandle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', BitOR(0x0400, 0x0100), 'int', False, 'int', $v_ProcessPID)
$v_Return = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $h_ProcHandle[0])
DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $h_ProcHandle[0])
Return $v_Return
EndIf
Return 0
EndFunc
ودا للمعالج X32 (86bit
While 1
$v_SroProcesses = ProcessList("sro_client.exe")
For $i = 1 To $v_SroProcesses[0][0]
$v_ProcInfo = ProcessGetStats($v_SroProcesses[$i][1])
If IsArray($v_ProcInfo) Then
If ($v_ProcInfo[0] / 1024 >= 100000) Then _SM_CleanRam($v_SroProcesses[$i][1])
EndIf
Next
Sleep(5*60000) ;It will release ram once every 5 minutes you can change this to whatever you like
WEnd
Func _SM_CleanRam($iPID = -1)
If $iPID <> -1 Then
Local $hHandle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $iPID)
Local $hReturn = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $hHandle[0])
DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $hHandle[0])
Else
$hReturn = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', -1)
EndIf
Return $hReturn[0]
EndFunc ;==>_SM_CleanRam
والطريقة اننا نعمله سكريبت ببرنامج Auto It
http://www.autoitscript.com/site/autoit/
ودول سكريبتات انا جربت اعملهم دلوقتى
x64
http://www.mediafire.com/?ierwewu1bx68kqo
x32
http://www.mediafire.com/?7q2bfhu144d4lkh
المصدرين
http://www.sroking.com/ipb/index.php?showtopic=33971
http://www.rev6.com/forum/showthread.php?19550-Lower-Memory-Usage-Of-SRO_Client.exe-and-or-Other-Processes
وارجو من مشرف الفحص التاكد من الطريقة اذا كانت سليمة ام لا؟ وارجو التاكد من الملفات التى رفعتها
تحياتى
النهاردة لقيت الموضوع دا بالصدفة لتقليل الضغط على الرام وكان مكتوب فى موقع Sroking وموقع Rev6
دا للمعالج x64
While 1
$v_SroProcesses = ProcessList("sro_client.exe")
For $i = 1 To $v_SroProcesses[0][0]
$v_ProcInfo = ProcessGetStats($v_SroProcesses[$i][1])
If IsArray($v_ProcInfo) Then
If ($v_ProcInfo[0] / 1024 >= 100000) Then _SM_CleanRam($v_SroProcesses[$i][1])
EndIf
Next
Sleep(5*60000) ;It will release ram once every 5 minutes you can change this to whatever you like
WEnd
Func _SM_CleanRam($v_ProcessPID)
If @OSArch <> "X86" Then
Local $h_ProcHandle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', BitOR(0x0400, 0x0100), 'int', False, 'int', $v_ProcessPID)
$v_Return = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $h_ProcHandle[0])
DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $h_ProcHandle[0])
Return $v_Return
EndIf
Return 0
EndFunc
ودا للمعالج X32 (86bit
While 1
$v_SroProcesses = ProcessList("sro_client.exe")
For $i = 1 To $v_SroProcesses[0][0]
$v_ProcInfo = ProcessGetStats($v_SroProcesses[$i][1])
If IsArray($v_ProcInfo) Then
If ($v_ProcInfo[0] / 1024 >= 100000) Then _SM_CleanRam($v_SroProcesses[$i][1])
EndIf
Next
Sleep(5*60000) ;It will release ram once every 5 minutes you can change this to whatever you like
WEnd
Func _SM_CleanRam($iPID = -1)
If $iPID <> -1 Then
Local $hHandle = DllCall("kernel32.dll", 'int', 'OpenProcess', 'int', 0x1f0fff, 'int', False, 'int', $iPID)
Local $hReturn = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', $hHandle[0])
DllCall('kernel32.dll', 'int', 'CloseHandle', 'int', $hHandle[0])
Else
$hReturn = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'long', -1)
EndIf
Return $hReturn[0]
EndFunc ;==>_SM_CleanRam
والطريقة اننا نعمله سكريبت ببرنامج Auto It
http://www.autoitscript.com/site/autoit/
ودول سكريبتات انا جربت اعملهم دلوقتى
x64
http://www.mediafire.com/?ierwewu1bx68kqo
x32
http://www.mediafire.com/?7q2bfhu144d4lkh
المصدرين
http://www.sroking.com/ipb/index.php?showtopic=33971
http://www.rev6.com/forum/showthread.php?19550-Lower-Memory-Usage-Of-SRO_Client.exe-and-or-Other-Processes
وارجو من مشرف الفحص التاكد من الطريقة اذا كانت سليمة ام لا؟ وارجو التاكد من الملفات التى رفعتها
تحياتى