Schaut mal Leute, was ich hier ausgegraben habe! Zu Pascalzeiten habe ich mal ein Spielchen geschrieben, welches nur mit Lineto() und PutPixel() gearbeitet hat. Ziel war es auch ohne nennenswerte Grafik ein spassiges Game zu haben, welches man zu mehreren an einem Rechner spielen konnte. Also mir und meinen Freunden hat es damals immer irren Spass gemacht, vielleicht euch auch. Alleine macht es kaum Freude, auch wenn ich eine 8-Zeilen KI für Bots eingefügt habe
.
Das Spiel ist eine Art 2D-Dogfight. Zwei bis vier Schiffchen (Dreiecke, muhaha) versuchen sich gegenseitig abzuknallen. Dabei haben sie verschiedene "Waffen" (fliegende Punkte) zur Verfügung. Von der einfachen Machinegun bis zur Railgun (hab ich 2000 beim Portieren nach Delphi hinzugefügt, oh Gott, dieser schlampige Code!) ist alles vorhanden.
Schiesst auf ein Projektil, so wird es weiss und kann von da an allen schaden. Ist vorallem bei der Homing Missile nützlich, so kann man durch geschicktes Maneuvrieren den Spiess umdrehen.
Dann gibt es noch die sogenannten Bänne (grosse Kreise), wie z.B. den Todesbann. Dieser zieht alle an und man stirbt sofort, wenn man in ihn gerät. Natürlich können sich die Schiffchen gegenseitig schucken, um sich in die Bänne zu befördern.
Gewonnen hat, wer zum Schluss die wenigstens Verrecks(tm) hat.
rapidshare.de/files/.../Schwar2000.zip.html
