SELF = WScript.ScriptFullName;
WshShell = WScript.CreateObject("WScript.Shell");
RUN("C:\\WINDOWS\\NOTEPAD.EXE " + SELF);
WINFOCUS("notepad");
WAIT(500);
PRESS("^{a}");        // CTRL+a  (SELECT ALL)
TYPE("WScript.Echo"); // START TYPING
PRESS("{(}");
TYPE("'Muhahaha'");
PRESS("{)}");
TYPE(";\n");

// UNCOMMENT THESE FOR THIS SCRIPT TO ACTUALLY WORK:

//PRESS("%F");          // ALT+F
//PRESS("x");           // CHOOSE EXIT
//PRESS("{ENTER}");     // PRESS ENTER TO SAVE CHANGES.
SAY("HAHA");
ALERT("This is the self-destroying script. It's gone! :)");

function WINFOCUS(W) { WshShell.AppActivate(W); }
function WAIT(MS) { WScript.Sleep(MS); }
function RUN(CMD) { WshShell.Run(CMD, 9); }
function SAY(TEXT) { var VOICE = WScript.CreateObject("SAPI.SpVoice"); VOICE.Volume = 100; VOICE.Speak(TEXT); }
function EXIT() { WScript.Quit(0); }
function PRESS(KEYCODE) { WAIT(100); WshShell.SendKeys(KEYCODE); }
function TYPE(TEXT) { var i, t; for (i = 0; i < TEXT.length; i++) { t = TEXT.charAt(i); WAIT(20); if (i > 8) { t = TEXT.slice(i); i = TEXT.length; } PRESS(t); }}
function ALERT(MSG) { WScript.Echo(MSG); }