Verfasst: 21.02.2009 18:52
BTW, ich würde das mit dem Anfangslogo codemäßig ein wenig ändern. Ich persönlich würde wahrscheinlich einfach alles markieren und "Entf" drücken, aber wenn Du das drin lassen willst, dann mach es lieber so:
Code: Alles auswählen
OpenConsole()
ConsoleTitle("WallpaperChanger @ TheDarkZim-.-")
ConsoleColor(12, 0)
ConsoleCursor(10)
Print("Dieses Programm wurde von The_Dark_Zim-.- geschrieben!")
Delay(1500)
Print(".")
Delay(200)
Print(".")
Delay(200)
PrintN(".")
Delay(200)
Repeat
Read.s str$
PrintN(str$)
Delay(50)
Until str$ = ""
Delay (2000)
CloseConsole()
DataSection
Data.s "#################################################"
Data.s " # #"
Data.s " # #"
Data.s " # /\ /\ #"
Data.s " # //_\ /_\\ #"
Data.s " # /// \\\ #"
Data.s " # ______________________ #"
Data.s " # \ / #"
Data.s " # \ / #"
Data.s " # \ __ __ / #"
Data.s " # \/°°\ /°°\/ #"
Data.s " # °°°°\ /°°°° #"
Data.s " # °°°°| |°°°° #"
Data.s " # °°°| |°°° #"
Data.s " # °/ \° #"
Data.s " # \ / #"
Data.s " # \ / #"
Data.s " # \/ #"
Data.s " # #"
Data.s " # #"
Data.s " # #"
Data.s " # #"
Data.s " # #"
Data.s " # #"
Data.s " #"
Data.s ""
EndDataSection