Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature may not be available in some browsers.
Herzlich Willkommen!
Nach der Schließung von inDiablo.de wurden die Inhalte und eure Accounts in dieses Forum konvertiert. Ihr könnt euch hier mit eurem alten Account weiterhin einloggen, müsst euch dafür allerdings über die "Passwort vergessen" Funktion ein neues Passwort setzen lassen.
Solltet ihr keinen Zugriff mehr auf die mit eurem Account verknüpfte Emailadresse haben, so könnt ihr euch unter Angabe eures Accountnamens, eurer alten Emailadresse sowie eurer gewünschten neuen Emailadresse an einen Administrator wenden.
program D2;
uses crt;
var hero : integer;
goodess : integer;
eingabe : integer;
loader : integer;
names : string;
begin
textcolor(red);
textbackground(white);
loader:=0;
clrscr;
repeat
writeln('Willkommen bei Diabl<>2 f?r den Dos-Modus!');
writeln('Per Eingabe einer Zahl und durch Dr?cken von');
writeln('Enter w„hlen Sie zwischen den Optionen aus.');
writeln;
writeln('1:Verstanden 2:Bitte nochmal');
readln(eingabe);
until eingabe=1;
clrscr;
writeln('Wie heiáen Sie?');
readln(names);
repeat
writeln('Bitte w„hlen Sie ihre Mentalit„t.');
writeln;
writeln('1:Gut 2:Neutral 3:B”se');
readln(goodess);
case goodess of
1:writeln('Als Guter Held bekommen Sie Hilfe durch den Himmel im Kampf gegen das B”se.');
2:writeln('Als Neutraler Held sind Sie nicht gebunden an die K„mpfe zwischen Gut und B”se.');
3:writeln('Als B”ser Held bekommen Sie Hilfe des Teufels im Kampf gegen das Gute.');
else goodess:=4;
end;
until goodess<4;
clrscr;
repeat
writeln('Bitte w„hlen Sie ihre Heldenklasse.');
writeln;
writeln('1:Nahk„mpfer 2:Bogensch?tze');
writeln;
writeln('3:Magier 4:šberlebensk?nstler');
readln(hero);
case hero of
1:writeln('Als Nahk„mpfer gehen Sie mit Schild und Schwert in die Schlacht.');
2:writeln('Als Bogensch?tze besiegen Sie ihre Gegner mit Pfeil und Bogen.');
3:writeln('Als Magier rufen Sie m„chtige Zauber herbei.');
4:writeln('Als šberlebensk?nstler lernen Sie von allem ein bisschen, und haben vor allem Gl?ck.');
else hero:=5;
end;
until hero<5;
clrscr;
repeat
write('.');
loader:=loader+1;
delay(1000);
until loader>6;
textbackground(black);
clrscr;
textbackground(yellow);
delay(100);
clrscr;
textbackground(white);
delay(100);
clrscr;
textbackground(black);
delay(100);
clrscr;
writeln('DDDDD IIIIII IIIIII AA BBBB LLLLLL OOOO');
writeln('D DD IIII IIII A A B BB LLLL O O');
writeln('D D II II AAAAAA BBBB LL O O');
writeln('D D II II AA AA BBBB LL O O');
writeln('D DD IIII IIII A A B BB LLLL O O');
writeln('DDDDD IIIIII IIIIII A A BBBB LLLLLLL OOOO');
delay(1000);
writeln(',, ,,, ,,,, , , ,,, ,, ,,');
delay(2000);
clrscr;
writeln('Ein Alchemist entdeckte ein neuartiges Element,');
delay(2000);
writeln('es schien hart wie Stahl und doch weich wie Heu...');
delay(2000);
writeln('Er bemerkte nicht wie es langsam bei seinen Forschungen');
delay(2000);
writeln('an diesem Material seinen K”rper durchdrang,');
delay(2000);
writeln('und eh er sich versah, war er das Material geworden.');
delay(2000);
writeln('Doch es war nichts irdisches was er nun war, es war...');
delay(2000);
writeln('teuflisch....');
delay(2000);
writeln('Nicht nur k”rperlich ver„nderte sich der Alchemist,');
delay(2000);
writeln('ebenso sein Geist wandelte sich, er wurde verbittert, denn..');
delay(2000);
writeln('Alles was er anfasste wurd von nun an zu Feuer, und seine');
delay(2000);
writeln('Mitb?rger verscheuchten ihn mit verwunderten Blicken.');
delay(2000);
writeln('Und so wurde er einsam, doch was noch schlimmer ist..');
delay(2000);
writeln('Er wurde zu einer Bestie, die den Zeichnungen des Teufels sehr „hnelte.');
delay(2000);
writeln('Er konnte so allerhand, auch ein Portal zu einer fremden Dimension ”ffnen.');
delay(2000);
writeln('Diese andere Dimension ward von nun an als H”lle bekannt.');
delay(2000);
writeln('Und er als F?rst dieser, Diablo...');
delay(3000);
clrscr;
readln;
end.