Skip to content

Commit

Permalink
third_set
Browse files Browse the repository at this point in the history
  • Loading branch information
Zelone committed Dec 23, 2019
1 parent fc565d2 commit 1b0cc6b
Show file tree
Hide file tree
Showing 4 changed files with 28 additions and 0 deletions.
22 changes: 22 additions & 0 deletions Computer.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,22 @@
X=MsgBox("Error while opeaning the computer ,Do you want to fix it?",4+64,"Computer")
X=MsgBox("Unable to fix the error,Do you want to scan your computer",3+48,"Computer Scan")
X=MsgBox("Alert! Virus has been detected,Do you want to delete the virus",3+16,"Critical Error")
X=MsgBox("Unabe to delete the virus",1+64,"Critical Error")
X=MsgBox("Virus is Activated",2+64,"Virus Alert")
X=MsgBox("Deleting System Files..",2+16,"File Deletion")
X=MsgBox("Virus is coppying your password..",2+48,"Virus Alert")
X=MsgBox("Please wait. Uploading your files to hack server. Do you wat to stop it",4+64,"File Transfer")
X=MsgBox("Cannot stop. File transfer Completed",1+16,"Completed")
X=MsgBox("Your computer is Hacked",1+64,"Hacked")
X=MsgBox("You cannot Acces your Computer anymore.. ",1+48,"Computer Hacked")
X=MsgBox("This was a prank there is no virus",1+64,"No Virus")
Dim sapi
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak "Fooled U hahahahahaha mother fucker"
CreateObject("Wscript.Shell").Run "explorer ,,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"






4 changes: 4 additions & 0 deletions Talk.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
Dim message,sapi
message=InputBox("What do you want me to say?","Speak to me ")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
1 change: 1 addition & 0 deletions gitit.cmd
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,7 @@ cd Zelone
git add *.cmd
git add *.md
git add *.exe
git add *.vbs
git commit -m "%*"
git push -u origin master
cd /d %now%
1 change: 1 addition & 0 deletions hidecmd.vbs
Original file line number Diff line number Diff line change
@@ -0,0 +1 @@
CreateObject("Wscript.Shell").Run """" & WScript.Arguments(0) & """", 0, False

0 comments on commit 1b0cc6b

Please sign in to comment.