Raphael's Prog

$IP = InputBox("SAVER","Tippe bitte einen Namen ein,!!!!ACHTUNG!!!!: Keine Sonderzeichen, Nur Buchstaben und Zahlen, und _")
run ("notepad.exe")
WinWaitActive("[CLASS:Notepad]")
Send("Ich werde dir jetzt mal was Schönes Zeigen...{ENTER}Passe gut auf, dies wird Magisch ^^.{ENTER}")
Sleep(2000)
Send("^a")
Send("{del}")
Send("Du Fragst dich doch schon bestimmt wie man Bilder aus Zeichen Erstelt oder?.{ENTER}Ich Zeige dir hier mal wie das geht.")
Sleep(5000)
Send("^a")
Send("{del}")
Send("_$$$$$$$____$$$____$$___$$_$$______$$$$$$$_$$$___$$.{ENTER}_____$$____$$_$$___$$___$$_$$______$$______$$$$__$$.{ENTER}____$$____$$___$$__$$$$$$$_$$______$$$$$___$$_$$_$$.{ENTER}___$$____$$$$$$$$$_$$___$$_$$______$$______$$__$$$$.{ENTER}__$$_____$$_____$$_$$___$$_$$______$$______$$___$$$.{ENTER}_$$$$$$$_$$_____$$_$$___$$_$$$$$$$_$$$$$$$_$$____$$.{ENTER}")
Sleep(1000)
Send("^s")
Sleep(800)
Send($IP &".txt")
Send("{ENTER}")
Send("Na bist du nun Erstaunt ? Das Dachte ich mir.{ENTER}Naya bis zum Nächsten mal")
Sleep(6000)
Send("^s")
Send("!{F4}")