User:Poolala

From Esolang
Jump to: navigation, search

Hi! I created the languages Brainfact, Commercial, Paintfuck+, Verbose, and Switchy. I found this wiki after finding about Brainfuck.

Stuff by me

Befunge

5 character cat program

>~#,<

Collatz sequence

v           >3*1+v    >.@
>&:.91+,>:2%|    >:1-!|
            >2/  ^
        ^       ,+19.:<

If no newlines show up between the numbers, try the version below, which uses spaces instead of newlines.

v           >3*1+v    >.@
>&:." ",>:2%|    >:1-!|
            >2/  ^
        ^       ," ".:<

Half-Broken Car in Heavy Traffic

Brainfuck translation

Brainfuck instruction HBCIHT instructions

Start of program

  >   v >
>>    v 
^<o>   >  v
>>   v  ^<< 
^ <^<<
   ^ <<
>
>>
<
 >   v>
>>     v
^<<<<^<<
+
>v>
>   v
^<^<<
-
  v>
>>   v
^ <^<<

MarioLANG

Cat program

On the first input, input 0 for ASCII input and 1 for numeric input

       <   <
  =====" =="
;>[;[:[!>,.!
=======#===#

Truth-machine

         >
	 "====
  >-[!+>:<
  "==#====
;[!:
==#=

Pointy

Brainfuck translation

(copied from the Pointy page)

Brainfuck operation(s) Pointy operation(s)
>
INC x
<
DEC x
+
INC *x
-
DEC *x foo
DEC y bar
LBL foo
CPY 255 *x
LBL bar
,
INP *x
.
CPY *x z
OUT *z
[
DEC x foo
LBL bar
INC x
]
DEC x foo
DEC y bar
LBL foo

Underload

Busy beaver (25 characters)

Tested using [1], which is a modified version of the JavaScript interpreter found on [esoteric.voxelperfect.net].

I made two programs, both of which took 532 steps.

()(^)(::):*:*:*:*:*:*:*^^ - 532

()(:!^)(::):*:*:*:*:*:*^^ - 532

Note: after running a program, you will get an unrecognized command error. Just ignore this.

That that is is that that is not is not is that it it is

(attempted) Golf version:

(That )S(that ):S(is )::SS~::SS~:S(not ):S~:S~S:S~S(it ):SSS

Simple version:

(That that is is that that is not is not is that it it is)S

Thanks to User:Oerjan for sending in an improvement of my program:

(That )S(that ):S(is )::SS~::SS~:(not )*:SS:S~S(it ):SSS

Truth-machine

In the first parentheses, use ! for 1 and nothing for 0.

The program below is set to input 1.

(!)((1)S:^)~((0)S)~^:^