2013_1371545542_754.png


كيفكم يااعضاء وزوار ومشرفيين واداريين المنتدى الرائع ( صقور الابداع )

انشاء الله بخير يارب

[----------------------------------------------------------]

طبعا اليوم ويانة كود بسيط بلغة AUTOIT
يقوم بيقاف الشاشة عند الضحية يعني مايخلي يتحكم بالشاشة مالتة
راح يعتبر انو الحاسبة اتوقفت هههههه:SnipeR (63):

[----------------------------------------------------------]

الـــــــCode


;This c0de is Written BY GENERAL BAGHDAD

;www.sqorebda3.com/vb
#NoTrayIcon

Global Const $lciWM_SYSCommand = 274
Global Const $lciSC_MonitorPower = 61808
Global Const $lciPower_Off = 2
Global Const $lciPower_On = -1
Global $s = False
HotKeySet("{Enter}","_EXIT")
while 1
$time = 1
$time = $time + $time
if $time <> 10 Then
$time = 1
monitorof()
EndIf
WEnda
Func monitorof()
$MonitorIsOff = True
Local $Progman_hwnd = WinGetHandle('[CLASS:progman]')

While $MonitorIsOff = True
DllCall('user32.dll', 'int', 'SendMessage', _
'hwnd', $Progman_hwnd, _
'int', $lciWM_SYSCommand, _
'int', $lciSC_MonitorPower, _
'int', $lciPower_Off)
_IdleWaitCommit(0)
Sleep(20)
WEnd
EndFunc
Func _EXIT()
Exit
EndFunc
Func _IdleWaitCommit($idlesec)
Local $iSave, $LastInputInfo = DllStructCreate ("uint;dword")
DllStructSetData ($LastInputInfo, 1, DllStructGetSize ($LastInputInfo))
DllCall ("user32.dll", "int", "GetLastInputInfo", "ptr", DllStructGetPtr ($LastInputInfo))
Do
$iSave = DllStructGetData ($LastInputInfo, 2)
Sleep(60)
DllCall ("user32.dll", "int", "GetLastInputInfo", "ptr", DllStructGetPtr ($LastInputInfo))
Until (DllStructGetData ($LastInputInfo, 2)-$iSave) > $idlesec Or $s = False
Return DllStructGetData ($LastInputInfo, 2)-$iSave
EndFunc

[----------------------------------------------------------]

للخروج من حالة الاغماء المتككرر بمعنى ارجاع الشاشة شغالة للضحية قم بالضغط على
ENTER

[----------------------------------------------------------]

وصلنا الى نهاية الموضوع
اتمنى اكون وفقت في الطرح :rolleyes:
 

المواضيع المشابهة


رد: ايقاف تشغيل الشاشة عند الضحية - بالautoit

ججآري التجرِبة ~
كفؤِ يآ بطلِ ~
 


رد: ايقاف تشغيل الشاشة عند الضحية - بالautoit

آلله يعطيك الف عافيه ي بطل ..

جاري تجربه الكود ف اقرب فرصه ...

تقبل مروري ي وحش ..
 


رد: ايقاف تشغيل الشاشة عند الضحية - بالautoit

حركات جهنمية

يعطيك العافية

ان شاء الله اجربها في اقرب وقت
 

عودة
أعلى