AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte BrainFuck Compiler
Thema durchsuchen
Ansicht
Themen-Optionen

BrainFuck Compiler

Ein Thema von Pr0g · begonnen am 4. Mär 2005 · letzter Beitrag vom 6. Mär 2005
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Pr0g
Pr0g
Registriert seit: 21. Mai 2004
Hallo,

ich habe einen kleinen BrainFuck Compiler geschrieben. Was soll ich noch groß dazu sagen, ein paar Beispielcodes liegen auch bei: Download (26.7Kb - .zip)

Einfach Programm starten, dann die Codedatei angeben und einen Namen für die .com Datei, das wars.

Wer nicht weiß was BrainFuck ist kann sich bei Wikipedia schlau machen: Link.


MfG Pr0g
 
Benutzerbild von Rastaman
Rastaman

 
Turbo C++
 
#11
  Alt 6. Mär 2005, 09:00
Weil es C:\hello_world.txt heissen muss.
Wieso macht man sich die Arbeit und schreibt mit Brainfuck Progs, wos doch mit Delphi viiiiiel einfacher geht?
Ok sind viel kleiner aber sonst
Trotzdem cooles Programm
  Mit Zitat antworten Zitat
moritz
 
#12
  Alt 6. Mär 2005, 09:22
Zitat von Gerrit89:
Wieso macht man sich die Arbeit und schreibt mit Brainfuck Progs, wos doch mit Delphi viiiiiel einfacher geht?
Weil 's Spaß macht! Um die Größe geht es da, denke ich, nicht.

Gruß!
  Mit Zitat antworten Zitat
Vader

 
Delphi 6 Enterprise
 
#13
  Alt 6. Mär 2005, 11:04
hallo

peinlich, aber ich sag danke !

mfg vader
  Mit Zitat antworten Zitat
Benutzerbild von Pr0g
Pr0g

 
Delphi 7 Personal
 
#14
  Alt 6. Mär 2005, 13:07
BrainFuck ist wie die anderen esoterischen Sprachen wohl weniger zum effektiven Programmieren geeignet. Sie wurden einfach aus Spaß und Interesse an der Sache erstellt. Das ist das gleiche wie jeder wohl mal mit Delphi nen Rechner gemacht hat. Dort gibts es auch bessere, bspw. den von Windows, aber man macht es als ersten Schritt und weil es Spaß macht. Vielleicht nicht das beste Beispiel aber ihr wisst bestimmt wie ich das meine, bzw. denke. Habe die Sprache ja nicht selber gemacht.
  Mit Zitat antworten Zitat
moritz
 
#15
  Alt 6. Mär 2005, 13:10
Die beste Erklärung der Sprache ist wohl der Name selber
  Mit Zitat antworten Zitat
Benutzerbild von Pr0g
Pr0g

 
Delphi 7 Personal
 
#16
  Alt 6. Mär 2005, 13:32
Habe das Archiv mal um einen etwas komplexeren Beispielcode erweitert:
Code:
===================================================================
======================== OUTPUT STRING ============================
===================================================================
>++++++++[<++++++++>-]<++++++++++++++++.[-]
>++++++++++[<++++++++++>-]<++++++++++++++.[-]
>++++++++++[<++++++++++>-]<+++++.[-]
>++++++++++[<++++++++++>-]<+++++++++.[-]
>++++++++++[<++++++++++>-]<+.[-]
>++++++++++[<++++++++++>-]<+++++++++++++++.[-]
>+++++[<+++++>-]<+++++++.[-]
>++++++++++[<++++++++++>-]<+++++++++++++++++.[-]
>++++++++++[<++++++++++>-]<++++++++++++.[-]
>+++++[<+++++>-]<+++++++.[-]
>++++++++++[<++++++++++>-]<++++++++++++++++.[-]
>++++++++++[<++++++++++>-]<+++++++++++.[-]
>+++++++[<+++++++>-]<+++++++++.[-]
>+++++[<+++++>-]<+++++++.[-]

===================================================================
======================== INPUT NUMBER ============================
===================================================================
+                          cont=1
[
 -                         cont=0
 >,
 ======SUB10======
 ----------
 
 [                         not 10
  <+>                     cont=1
  =====SUB38======
  ----------
  ----------
  ----------
  --------

  >
  =====MUL10=======
  [>+>+<<-]>>[<<+>>-]<    dup

  >>>+++++++++
  [
   <<<
   [>+>+<<-]>>[<<+>>-]<   dup
   [<<+>>-]
   >>-
  ]
  <<<[-]<
  ======RMOVE1======
  <
  [>+<-]
 ]
 <
]
>>[<<+>>-]<<

===================================================================
======================= PROCESS NUMBER ===========================
===================================================================

==== ==== ==== ====
numd numu teid teiu
==== ==== ==== ====

>+<-
[
 >+
 ======DUP======
 [>+>+<<-]>>[<<+>>-]<

 >+<--

 >>>>>>>>+<<<<<<<<  isprime=1

 [
  >+

  <-

  =====DUP3=====
  <[>>>+>+<<<<-]>>>>[<<<<+>>>>-]<<<

  =====DUP2=====
  >[>>+>+<<<-]>>>[<<<+>>>-]<<< <


  >>>


  ====DIVIDES=======
  [>+>+<<-]>>[<<+>>-]<  DUP i=div
 
  <<
  [
    >>>>>+               bool=1
    <<<
    [>+>+<<-]>>[<<+>>-]< DUP
    [>>[-]<<-]          IF i THEN bool=0
    >>
    [                    IF i=0
      <<<<
      [>+>+<<-]>>[<<+>>-]< i=div
      >>>
      -                  bool=0
    ]
    <<<
    -                    DEC i
    <<
    -
  ]
 
  +>>[<<[-]>>-]<<        
  >[-]<                 CLR div
  =====END DIVIDES====


  [>>>>>>[-]<<<<<<-]    if divides then isprime=0


  <<

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

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

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

  >>




  ===================================================================
  ======================== OUTPUT NUMBER ===========================
  ===================================================================
  [>+<-]>
 
  [
   ======DUP======
   [>+>+<<-]>>[<<+>>-]<
 
 
   ======MOD10====
   >+++++++++<
   [
    >>>+<<             bool= 1
    [>+>[-]<<-]        bool= ten==0
    >[<+>-]            ten = tmp
    >[<<++++++++++>>-] if ten=0 ten=10
    <<-                 dec ten    
    <-                  dec num
   ]
   +++++++++            num=9
   >[<->-]<            dec num by ten
 
   =======RROT======
      [>+<-]
   < [>+<-]
   < [>+<-]
   >>>[<<<+>>>-]
   <
 
   =======DIV10========
   >+++++++++<
   [
    >>>+<<               bool= 1
    [>+>[-]<<-]          bool= ten==0
    >[<+>-]              ten = tmp
    >[<<++++++++++>>>+<-] if ten=0 ten=10  inc div
    <<-                   dec ten    
    <-                    dec num
   ]
   >>>>[<<<<+>>>>-]<<<<  copy div to num
   >[-]<                 clear ten
 
   =======INC1=========
   <+>
  ]
 
  <
  [
   =======MOVER=========
   [>+<-]
 
   =======ADD48========
   +++++++[<+++++++>-]<->
 
   =======PUTC=======
   <.[-]>
 
   ======MOVEL2========
   >[<<+>>-]<
 
   <-
  ]
 
  >++++[<++++++++>-]<.[-]
 
  ===================================================================
  =========================== END FOR ===============================
  ===================================================================


  >>>>>>>
 ]
 <<<<<<<<



 >[-]<
  [-]
 <<-
]
 
======LF========
 
++++++++++.[-],
Damit lassen sich Primzahlen berechnen und zuvor kommt eine Abfrage, bis zu welcher Zahl diese errechnet werden sollen.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:32 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz