ConwayLife.com

Code: Select all

#!/usr/bin/python
#
# Brainfuck Interpreter
# Copyright 2011 Sebastian Kaspari
#
# Usage: ./brainfuck.py [FILE]
#
# Naszvadi P modified dependency: s/getch/os/, minor tweaks, 2017

import os, sys

def execute(filename):
  f = open(filename, "r")
  evaluate(f.read())
  f.close()


def evaluate(code):
  code     = cleanup(list(code))
  bracemap = buildbracemap(code)

  cells, codeptr, cellptr = [0], 0, 0

  while codeptr < len(code):
    command = code[codeptr]

    if command == ">":
      cellptr += 1
      if cellptr == len(cells): cells.append(0)

    elif command == "<":
      cellptr = 0 if cellptr <= 0 else cellptr - 1

    elif command == "+":
      cells[cellptr] = cells[cellptr] + 1 if cells[cellptr] < 255 else 0

    elif command == "-":
      cells[cellptr] = cells[cellptr] - 1 if cells[cellptr] > 0 else 255

    elif command == "[" and cells[cellptr] == 0: codeptr = bracemap[codeptr]
    elif command == "]" and cells[cellptr] != 0: codeptr = bracemap[codeptr]
    elif command == ".": sys.stdout.write(chr(cells[cellptr]))
    elif command == ",": cells[cellptr] = ord(os.read(0, 1)[0])

    codeptr += 1


def cleanup(code):
  return filter(lambda x: x in ['.', ',', '[', ']', '<', '>', '+', '-'], code)


def buildbracemap(code):
  temp_bracestack, bracemap = [], {}

  for position, command in enumerate(code):
    if command == "[": temp_bracestack.append(position)
    if command == "]":
      start = temp_bracestack.pop()
      bracemap[start] = position
      bracemap[position] = start
  return bracemap


def main():
  if len(sys.argv) == 2: execute(sys.argv[1])
  else: print "Usage:", sys.argv[0], "filename"

if __name__ == "__main__": main()

Code: Select all

# ./npbf.py gol.bf
 abcdefghij
a----------
b----------
c----------
d----------
e----------
f----------
g----------
h----------
i----------
j----------
bb
> abcdefghij
a----------
b-*--------
c----------
d----------
e----------
f----------
g----------
h----------
i----------
j----------
bc
> abcdefghij
a----------
b-**-------
c----------
d----------
e----------
f----------
g----------
h----------
i----------
j----------
cb
> abcdefghij
a----------
b-**-------
c-*--------
d----------
e----------
f----------
g----------
h----------
i----------
j----------
de
> abcdefghij
a----------
b-**-------
c-*--------
d----*-----
e----------
f----------
g----------
h----------
i----------
j----------
ed
> abcdefghij
a----------
b-**-------
c-*--------
d----*-----
e---*------
f----------
g----------
h----------
i----------
j----------
ee
> abcdefghij
a----------
b-**-------
c-*--------
d----*-----
e---**-----
f----------
g----------
h----------
i----------
j----------

> abcdefghij
a----------
b-**-------
c-**-------
d---**-----
e---**-----
f----------
g----------
h----------
i----------
j----------

> abcdefghij
a----------
b-**-------
c-*--------
d----*-----
e---**-----
f----------
g----------
h----------
i----------
j----------
q
>#