An esoteric programming language

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Perturbatio

It took me about 10 minutes, but I've written my first program in it:

w10	'write 10 to cell 1 (counter)
m>	'move right
w1	'write 1

g1	'goto sub 1

'SUB 4
s4	'sub 4
e	'end program

'SUB 1
s1	'begin sub 1
	d>	'duplicate to next cell and move forward
	m<	'move back
	+>	'add to next cell
	p	'print current cell
	d<	'duplicate to previous cell and move back
	m<	'move back to counter
	g2	'goto sub 2 (decrement counter)
	s5	'return point
	m>	'move forward to cell 2 (workspace)
g1	'end of sub 1

'SUB 2
s2	'decrement counter
	m^	'move up
	w1	'write 1
	-v	'subtract 1 from counter and move down
	'p	'print counter
	'p	'print counter again (to highlight for debug)
g3	'end of sub 2 now check counter

'SUB 3
s3	'check the counter
	i5
g4	'end of sub 3

It computes powers of two for 10 loops :)

An esoteric programming language - Fiftween