Execute Brain****: Difference between revisions

m
m (→‎{{header|Phix}}: added syntax colouring the hard way)
Line 1,409:
target: last vstack
chop 'vstack
set jumphash \[target]: instrPointer
set jumphash \[instrPointer]: target
]
]
Line 1,435:
command: get split Code InstructionPointer
case [command=]
when? ["+"] -> set Tape \[DataPointer]: (Tape \ [DataPointer)]+1
when? ["-"] -> set Tape \[DataPointer]: (Tape \ [DataPointer)]-1
when? [">"] [
inc 'DataPointer
Line 1,442:
]
when? ["<"] -> dec 'DataPointer
when? ["."] -> prints to :string to :char Tape \ [DataPointer]
when? [","][
inp: to :integer input ""
1,532

edits