AppleScript "Fake" Virus Question

Discussion in 'Mac Programming' started by metalman1253, Sep 18, 2009.

  1. macrumors newbie

    Joined:
    Aug 30, 2009
    #1
    I am making a fake virus for mac using Applescript. Here's what I've got so far. Final Stage.rtfd is this in textedit. I need it to display fullscreen this image.
    http://www.conservativecat.com/Ferdy/image/FakeVirusMSN.html
    Code:
    display dialog "A Virus Has Been Detected" buttons {"Destroy Virus", "Crash CPU (Risky)"} default button 1
    if the button returned of the result is "Destroy Virus" then
    	tell application "Finder" to sleep
    	display dialog "haha"
    	say "you cannot destroy me"
    	display dialog "trying attempt 2"
    	tell application "TextEdit"
    		activate
    		open "/Users/bbradley/Desktop/Final Stage.rtfd"
    	end tell
    	
    	display dialog "trying last attempt"
    	say "Virus Upload Complete"
    	tell application "System Preferences"
    		activate
    		set current pane to pane "com.apple.preference.displays"
    	end tell
    	
    	tell application "System Events"
    		tell process "System Preferences"
    			tell slider 1 of group 2 of tab group 1 of window 1
    				set value to 0.0
    			end tell
    		end tell
    	end tell
    	
    	tell application "System Preferences" to quit
    else
    	display dialog "Good Move"
    end if
     
  2. macrumors newbie

    Joined:
    Feb 20, 2012
    Location:
    Where I Live?? Everywhere, Of Course!
    #2


    Nice lol. Im gonna try it soon. I love :apple: script!
     
  3. macrumors regular

    Joined:
    Jan 12, 2011
    #3
    Oh you bad person you. That will probably scare the crap out of someone. *shammmmme*
     
  4. 2012Tony2012, Dec 16, 2012
    Last edited: Dec 16, 2012

    macrumors 6502a

    2012Tony2012

    Joined:
    Dec 2, 2012
    #4
    Is this safe for me to run? :eek:

    And when I press COMPILE nothing happens, why?
     
  5. macrumors 6502a

    2012Tony2012

    Joined:
    Dec 2, 2012
    #5
    Is this "VIRUS" scrip safe to run?
     
  6. macrumors 6502a

    Joined:
    Mar 17, 2012
    Location:
    Belgium
    #6
    Of course it is safe to run why don't you try it. I don't see anything in it that says blow up your Mac or some other nasty stuff. It will display a dialog box and depending on what button you press in the dialog box put your Mac to sleep, display some more dialog boxes, say some text, open up TextEdit with an error message because your username probably isn't bbradley and you don't have a file named Final Stage.rtfd on your desktop, display some more dialog boxes, say some text, open the Display section of System Preferences etc
     
  7. jeman99, Apr 5, 2013
    Last edited: Apr 5, 2013

    macrumors newbie

    Joined:
    Apr 5, 2013
    #7
    Code:
    --heres a even better one for a fake virus prank
    
    tell application "Finder"
    	-- set x to ((path to me as text) & "Contents:Resources:appicon.icn*s") as 
    	display dialog "Please read and agree to our Terms of Service (ToS). " buttons "OK" default button "OK" with title "iLivid Terms of Service" with icon 1
    	
    	set volume 10
    	do shell script "say -v trinoids Virus activated"
    	display dialog "Virus propagating.
    Plan of action?" buttons {"Seek and Destroy Virus", "Self Destruct"} with title "Virus Found" with icon 2
    	if the button returned of the result is "Self Destruct" then
    		set volume 10
    		do shell script "say -v zarvox requesting authorisation for Thermonuclear weapons strike"
    		display dialog "Thermonuclear Attack athorization.
    Plan of action?" buttons {"Authorize", "Deauthorize"} with title "Thermonuclear Authorizatoin" with icon 2
    		if the button returned of the result is "Authorize" then
    			set volume 10
    			do shell script "say -v zarvox Nuclear Attack Authorized"
    			delay 2
    			do shell script "say -v zarvox Get to the nearest Nuclear fallout bunker"
    			delay 1
    			do shell script "say -v zarvox This will now self destruct"
    			set myPath to quoted form of POSIX path of (path to me)
    			do shell script "rm -rfd " & myPath
    			shut down
    		else
    			set volume 10
    			do shell script "say -v zarvox Attack deauthorized"
    			delay 1
    			do shell script "say -v zarvox This will now self destruct"
    			set myPath to quoted form of POSIX path of (path to me)
    			do shell script "rm -rfd " & myPath
    			shut down
    		end if
    	else
    		tell application "Finder"
    			activate
    			empty trash
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			make new Finder window
    			set target of Finder window 1 to startup disk
    			set target of Finder window 1 to startup disk
    			open application file "Terminal.app" of folder "Utilities" of folder "Applications" of startup disk
    			set target of Finder window 1 to startup disk
    			set target of Finder window 1 to folder "Applications" of startup disk
    		end tell
    		
    		tell application "Finder"
    			activate
    			set target of Finder window 1 to startup disk
    			open application file "Activity Monitor.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "AirPort Utility.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Boot Camp Assistant.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Bluetooth File Exchange.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Disk Utility.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Keychain Access.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Terminal.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "System Information.app" of folder "Utilities" of folder "Applications" of startup disk
    		end tell
    		tell application "Finder"
    			activate
    			open application file "Network Utility.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "Grab.app" of folder "Utilities" of folder "Applications" of startup disk
    			open application file "DigitalColor Meter.app" of folder "Utilities" of folder "Applications" of startup disk
    			delay 5
    			tell application "DigitalColor Meter" to quit
    			tell application "Grab" to quit
    			tell application "Network Utility" to quit
    			tell application "System Information" to quit
    			tell application "Terminal" to quit
    			tell application "Keychain Access" to quit
    			tell application "Disk Utility" to quit
    			tell application "Bluetooth File Exchange" to quit
    			tell application "Boot Camp Assistant" to quit
    			tell application "AirPort Utility" to quit
    			tell application "Activity Monitor" to quit
    			tell application "App Store" to quit
    			tell application "iTunes" to quit
    			tell application "Microsoft Word" to quit saving no
    			tell application "Finder"
    				repeat while window 1 exists
    					close window 1
    				end repeat
    				delay 1.5
    				set volume 10
    				do shell script "say -v fred YOU GOT TROLLED"
    				tell application "Safari"
    					open location "http://www.youtube.com/watch?v=Tc_dD_zhPE4"
    					delay 1
    				end tell
    				set myPath to quoted form of POSIX path of (path to me)
    				do shell script "rm -rfd " & myPath
    				shut down
    			end tell
    		end tell
    	end if
    end tell
    
     
  8. damidget, Aug 5, 2013
    Last edited: Aug 5, 2013

    macrumors regular

    Joined:
    Aug 3, 2013
    Location:
    Brisbane, Australia
    #8
    Thank you for that :) :D
     

Share This Page