noch'n BF Interpreter

[himitsu]

Dann will ich auch mal.

Es tut mir wirklich Leid, Daniel, aber dieses Wort kannte Google auch noch nicht, von uns.


Ja, was soll ich noch dazu sagen?
Ihr wisst ja bestimmt schon, worum es geht. *auf FAlter und Co. Schiel*

http://de.wikipedia.org/wiki/Brainfuck
http://en.wikipedia.org/wiki/Brainfuck


- inkl. einiger/vieler Beispielcodes
- BF8.bf erzeugt in der Standardausgabe eine .COM-Datei, welche einen DOS-BF-Interpreter darstellt
- "Keymaker's brainfuck interpreter.bf" ist ein BF-Interpreter in BF geschrieben
als Input einfach irgendein anderes BF-Script angeben
- MiniBF ist ein kleiner/einfacher Konsolen-Interpreter (recht lahmarschig)
- MiniBF2 ist 'ne leicht optimierte Variante davon (beide von mir )



Infos zum "großen" Interpreter
- man kann das BF-Programm in gewisser Weise auch schon etwas Debuggen
- Scripts sind via Drag&Drop ladbar
- im Editor gibt's einige Tastenkodes - Strg+U und Strg+I zum Einrücken - Strg+G und Strg+B formatiert die markierten Zeilen
- "field size" gibt die Speicher-/Rechengröße an (in Bit)
- bitwidth simuliert 'ne größere "field size" (8x2 = 16 Bit und 8x4 = 32 Bit)
- "file input" nutzt byteweise eine Datei statt der Eingabeaufforderung für ","
- Eingaben ohne "inputbox" in das Output-Memo eingeben


Die "Hilfe" wird noch gefüllt, also nicht wundern.
Es kommen auch noch viel mehr Codes dazu
und ein kleines BF-Einmaleins,
sowie ein eigener BF-2-Pascal-BFCode.

Der Anfang läuft schon ... hab nur noch mit dem "IF-THEN" einige Problemchen:

Code:

>>>>>>>>>>>>++++++++++[<<<<<<<<<<<<+++>+++++>++++++>++++>+++
++++++++>+++++++++>+++++++++++>+++++++++>++++>++++++>+>+>>>+
++>>++++++++++>++++++++++>+++++++++++>+++++++++++>++++++++++
++>++++<<<<<<<<<-]<<<<<<<<<<<<+++++>-->+>>->+>++>+++>+>->+++
>>>+>++>>>+++++>>+++++>->----<<<<<<

>>>++.++.---.-<--.++>>-.+<<<---.+++>>-.<<<<.>>>>.+>>++.--<<<
<--.++++.--<<<<<<<.>.>.<.>.>>>>>>>>>++++.---->.<<<<<---.+++>
>++..-->+.->++.--<<++.--<<+.-<<.>>-.+>>+.-.>.<+.---.++<<+.->
>>>++++++.------<<<<<<<<<<.>.<.>.>>>>>>>>>-.+<<<<---.+++>>>-
.+<<<<<<<<<.>.>>>..>>>>-.+<<<<<<<<<-.+>>>>>.>>---.>>>-..+<<<
.+++>>>>++.--<<<<<<<<<<<<<<<.<<<<.--..+++.-......>>>>>>.>>>>
>>>.>>>>+.-<<++.--<<.>>-.+>-.+<---.+++>>>-.+<<<<<<<<<<.>.>.>
>>..>>>>++.--<<<<<<<<<-.+>>>>>.>>>.>.>+.-<<<+.++.--.->>>-.+<
<<<<<<<<<.>.>.<.>.>>>>>--.+++.->--.++.>.<<<<<<<<.>.>>>..>>>>
++.--<<<<.<<<<<-.+<<<<<<<.>>>>>>>>>>>>.<<<<<<<<<<<<<.>>>>>>>
>.>.>.>>>>



[-]<<-[>>+<<-]>>[<<<+>+>>-]<<<[>>..<<-]>>>>+.->>.<<.<<<<<<<<
<<<<<<<--.++>>>>>>>>>.>.

[edit=mkinzler] Mfg, mkinzler[/edit]

[himitsu]

Das nur weil ich mal versuche deutsche Namen zu verwenden.

Matze privat und nicht als DP-Mod

mit "delphi hirnschiss" is die DP bei Google nun echt oben und mit "hirnschiss" auf der Mitte der 1. Seite

Dabei versuch ich doch nur die DP an die Spitze zu bringen
und so bei der Weltherrschaft etwas behilflich zu sein.

[mkinzler]

Wir wollen aber nur positive Publicity. Habe den Titel mal etwas neutraler gefasst

[himitsu]

Zitat von mkinzler:

Wir wollen aber nur positive Publicity. Habe den Titel mal etwas neutraler gefasst

Na gut, aber immerhin hatte ich nicht die Variante, mit dem icken am Ende, verwendet.
Damit wäre man bestimmt sogar an vielen Erotikseiten vorbei, ganz weit nach vorne gekommen.

[FAlter]

Hi,

dein McKing Bestellprogramm funktioniert ja gar nicht. Egal was ich eingebe es wiederholt sich nur das Menü. Ob im 8 oder 64 Bit Modus.
Oder hat mein neuer, optimierender Interpreter nen Bug?

Ansonsten gehört das schon eher zurück nach Open-Source, oder?

[ot] Gehirnfick fände ich ja noch ok, aber sch... klingt eklig und stinkt vermutlich. [/ot]

[himitsu]

Komisch, du hast Recht ... irgendwie funktioniert das Read in der Console nicht richtig.

Read({char}); wartet bei Eingabe auf ein Enter und hört nicht schon nach Eingabe einer Taste auf.
Dann wird anscheinend das erste Zeichen an die Char-Variable übergeben und den Rest merkt sich Delphi für die nächste Eingabe.

Also bei Zeichen+Enter bleibt ein Enter übrig, welches für die nächste Eingabe genutzt wird,
weswegen das nächste Menü gleich wieder abgebrochen wird.

[Mithrandir]

Das Phänomen hat nix mit Delphi zu tun, das ist generell bei Konsolenprogrammen so. Willst du nur ein Zeichen lesen, musst du den Zeilenpuffer wieder leeren. Unter C hat man dafür den Befehlt fflush; Kennt Delphi da kein Äquivalent zu?

[FAlter]

Hi,

Unter (Turbo)Pascal gab es m. W. eine Funktion die nur ein einzelnes Zeichen gelesen hat (in der Crt?). Kennt jemand zufällig den Namen? Vielleicht gibt es das unter FreePascal ja noch?

[edit] ReadKey? [/edit]
[edit=2] Mit ReadKey funzt es besser. Aber achte bitte auf die Umlaute! (Brainfuck dagt eigentlich das es ASCII Ausgaben sind, da gibts keine, und unter der Console hast du andere Codepages als unter ANSI)
Außerdem passiert bei x nichts und ich muss das Programm mit Strg+C abbrechen. [/edit]
[edit=4] Na toll, jetzt funktioniert das Umleiten der Standardeingabe nicht mehr [/edit]
[edit=3] Und heute bezahlt niemand mehr mit DM [/edit]

Gruß
FAlter

[himitsu]

Zitat von FAlter:

[edit] ReadKey? [/edit]

dieses scheint (unter Windows) zu laufen ... hab ich quasi von sakura ReadKey

Delphi-Quellcode:

// initialisieren
H  := GetStdHandle(STD_INPUT_HANDLE);
FlushConsoleInputBuffer(H);

// abfragen
CI.EventType := KEY_EVENT;
Repeat
Until ReadConsoleInput(H, CI, 1, Cardinal(i)) and (i = 1)
  and (CI.Event.KeyEvent.bKeyDown) and (CI.Event.KeyEvent.AsciiChar <> #0);
M[MP] := CI.Event.KeyEvent.AsciiChar;
FlushConsoleInputBuffer(H);

Zitat von FAlter:

[edit=2] Aber achte bitte auf die Umlaute!
[edit=3] Und heute bezahlt niemand mehr mit DM [/edit]

Hatte das Script "nur" aus einem anderem BF-Dialekt übersetzt und versucht es in diesem Dialekt zum Laufen zu bekommen und bezüglich der Textinhalte nichts geändert.