Wieviel Programmzeilen im ersten Projekt?

[hiltwin]

Ich wollt mich auch mal in der Laberecke betätigen ;o)

Frdl. Gruss
Hiltwin

ICH wollte schon noch nen Kreuz für >= 10.000 anbieten, allerdings nicht das Board - das hat die Antwort irgendwie abgeschnitten und editieren der Antworten, wie das funktioniert, hab ich noch nicht gefunden. ;o)

[freedimension]

Mehr als 10000 gibt es als Antwort nicht?

[Macros]

Angeber

Mein erstes Projekt war, dass ich mir denn Weaponez II-Quellcode
vorgenommen habe, zuerst ein bisschen rumgespielt, dann die
Schüsse verbessert, die Screenresolution hochgesetzt Endgegner
eingebaut...
Nur auf die Rechenleistung habe ich nicht geschaut, und die ist letztendlich aus dem Ruder gelaufen.

[freedimension]

Angeber

Nein, ich habe mein Kreuz bei <5000 gemacht. Mir ist das nur aufgefallen, also dass die Umfrage nicht nach oben offen ist

[Macros]

Ich glaube nicht, dass jemand gleich beim ersten Projekt mehr als 10000 Zeilen geschrieben hat.
(Außer er hats gemacht wie mein Freund, der hat ein Programm geschrieben, das für ihn Quellcode schreibt)

edit: auch bei <5000

[freedimension]

(Außer er hats gemacht wie mein Freund, der hat ein Programm geschrieben, das für ihn Quellcode schreibt)

Kann ich auch:

Code: Alles auswählen

  CreateFile(1, "bier.pb")
  For i=2 to 10002
    WriteStringN("Debug " + Str(i) + " Flaschen Bier")
  Next
  CloseFile(1)

[rolaf]

(Außer er hats gemacht wie mein Freund, der hat ein Programm geschrieben, das für ihn Quellcode schreibt)

Kann ich auch:

Code: Alles auswählen

  CreateFile(1, "bier.pb")
  For i=2 to 10002
    WriteStringN(Debug Str(i) + " Flaschen Bier")
  Next
  CloseFile(1)

Da fehlt noch ne abschließende Zeile im KOT

WriteStringN(Debug "Prost...Gluck...Gluck...Gluck")

Edit: <100

[Macros]

Naja,
ein bisschen mehr Sinn sollte es schon haben,
(Für jedes x auf dem Screen ein Pixelturm der Verwaltet wird)
nur leider hat das Programm 1024 mal Mist reingeschrieben.
Und mit dem korrigieren ist das dann nichts geworden.
(Frag mich nicht warum er keine Schleife machen "konnte")

[Kekskiller]

Ich weiß es nicht mehr genau, aber mein erstes Projekt war glaube ich Ace Invaders. Ich hatte viele Kommentare benutzt, daher wurde der Quelltext mit ungefähr 500 Zeilen etwas groß...

[hiltwin]

WriteStringN(Debug "Prost...Gluck...Gluck...Gluck")
Edit: <100

´

CreateFile(1, "bier.pb")
For i=2 to 10002
promille = promille + 1
WriteStringN(Debug Str(i) + " Flaschen Bier")
if promille > 8
debug "achtung verlust führerscheingefahr"
endif
if promille >20
debug "beste programmier-umgebung nun gegeben"
endif
Next
CloseFile(1)

[/quote]