I walk away!

From Esolang
Jump to navigation Jump to search

I walk away! Is an esoteric that does a few things, but the main problem being that when you try to do anything, the console's contents, well, walk away. So trying to use a for loop to print "HELLO MORTAL" 75 times would make the message span an entire line.

Or, in other words, your output walks away. You also must add one more space than the previous line at the beginning for it to function. So you own program also looks like it wants to walk away. However the text does not wrap around. So eventually you cannot see any output.

Commands

Seems familiar?

Commands
Command Function
Print["string" Prints the string
Printn["string" Prints a string without newlines
Newline Prints a newline
Printv[var Print var's value
Printvn[var Print var's value without newlines
Define[name,initial value Define a variable called name
Input[prompt,name Asks for input and store into variable called name
Arith[operation,{operands},into Does operation to values in {operands} and store into the variable named into, if the var used already exists, change value
While{value, value, condition}[ While loop, does while value is condition to value (i.e. While{1,1,==} checks for 1 == 1)
For{tempname, start, stop, step}[ For loop, var used to loop is temp name, go up by step (if step not given, step = 1)
If{value, value, condition}[ If statement, does if value is condition to value (i.e. While{2,2,==} checks for 2 == 2)
]Elseif{value, value, condition}[ Elseif if initial condition not met, same stuff
] Closes off all commands

Yea, its pretty obvious it comes from BITWISEBASE64BITWISEBASE64BITWISEBASE64BITWISE.

Examples

Hello World

Still longer than the one in HQ9+ or its siblings.

Print["Hello World!"
 ]

Cat

Input[?:, in
 ]
  Print[in
   ]

Truth Machine

Input[?:, in
 ]
  If{1,in,==}[
   While{1,1,==}[
    Printn["1"
     ]
      ]
       Print["0"
        ]

Yea, it looks like a staircase but........

FizzBuzz

Define[count,1
 ]
  While{1,1,==}[
   Arith[%, {count, 3}, M3
    ]
     Arith[%, {count, 5}, M5
      ]
       If{1,1,==}[
        If{M5,0,==}[
         Print["FizzBuzz"
          ]
           ]Elseif{M3,0,==}[
            Print["Fizz"
             ]
              ]
               ]Elseif{M5,0,==}[
                Print["Buzz
                 ]
                  ]Elseif{1,1,==}[
                   Printv[count
                    ]
                     ]
                      ]
                       Arith[+,{1,count},count
                        ]