HQ9+

From Esolang
(Redirected from HQ9 Plus)
Jump to navigation Jump to search

HQ9+ is a joke language with four instructions:

Although the language is not of serious interest by itself, it can be useful to implement HQ9+ in a new esoteric programming language, since doing so proves that all the tasks above, except the quine, are possible. (Implementing Q proves instead that a cat program is possible.) HQ9+ was created in 2001 by Cliff L. Biffle.

Given that the original description of the language includes an example program containing a lowercase "q", it seems reasonable to assume that instructions in HQ9+ are case-insensitive.

Implementations

User:A was here and here is an implementation (in C):

#include <stdio.h>
int main()
{
    unsigned long accumulator = 0;
    char c[1000];
    for(int i=0;;i++)
    {
        scanf("%c",&c[i]);
        if(c[i]=='\n') break;
    }
    for(int i=0;c[i]!='\0';i++)
    {
        if(c[i]=='H') printf("Hello, World!\n");
        else if(c[i]=='Q') printf("%.*s", (int)sizeof c, c);
        else if(c[i]=='9')
        {
                for(int j=99;j>0;j--)
                {
                    printf("%d bottles of beer on the wall,\n%d bottles of beer.\n", j, j);
                    printf("Take one down, pass it around,\n%d bottles of beer on the wall.\n", j-1);
                }
                printf("1 bottle of beer on the wall,\n1 bottle of beer.\nTake one down, pass it around,\nno more bottles of beer on the wall.\n");
        }
        else if(c[i]=='+') accumulator++;
    }

    return 0;
}

Lanmonster fixed the Q instruction and added the + instruction. Qh4os fixed the 9 instruction. Chris Pressey also fixed the 9 instruction.

A python intepreter by User:Esolanger12345:

accumulator=0
cmds=input(">>> ")
for cmd in cmds:
    if cmd.lower() == "h":
        print("Hello, world!")
    elif cmd.lower() == "q":
        print(cmds)
    elif cmd == "9":
        for i in range(99, 2, -1):
            print(str(i)+" bottles of beer on the wall, "+str(i)+" bottles of beer.\nTake one down, pass it around, "+str(i-1)+" bottles of beer on the wall.")
        print("2 bottles of beer on the wall, 2 bottles of beer.\nTake one down, pass it around, 1 bottle of beer on the wall.")
        print("1 bottle of beer on the wall, 1 bottle of beer.\nTake one down, pass it around, No bottles of beer on the wall.")
        print("No bottles of beer on the wall, No bottles of beer.\nGo to the store, buy some more, 99 bottles of beer on the wall.")
    elif cmd == "+":
        accumulator+=1
input()

An interpeter made by User:Yes in BASIC

10 PRINT "HQ9+ INTERPETER"
20 LET A=0
30 INPUT ">>>";A$
40 FOR X=1 TO LEN(A$)
50 IF MID$(A$,X,1)="H" THEN PRINT "HELLO, WORLD!"
60 IF MID$(A$,X,1)="Q" THEN PRINT A$
70 IF MID$(A$,X,1)="9" THEN GOTO 110
80 IF MID$(A$,X,1)="+" THEN LET A=A+1
90 NEXT X
100 END
110 FOR B=99 TO 1 STEP -1
120 PRINT B;" BOTTLES OF BEER ON THE WALL,":PRINT B;" BOTTLES OF BEER":PRINT "TAKE ONE DOWN,":PRINT "PASS IT AROUND":PRINT B-1;" BOTTLES OF BEER ON THE WALL"
130 NEXT B
140 PRINT "0 BOTTLES OF BEER ON THE WALL":PRINT "0 BOTTLES OF BEER": PRINT "GO TO THE STORE AND BUY SOME MORE,":PRINT "99 BOTTLES OF BEER ON THE WALL"
150 GOTO 90

Note: This was made in an Applesoft BASIC interpeter here: [1]

See also

  • HQ9++, an object-oriented extension of HQ9+.
  • HQ9+-, an extension of HQ9++ with the - operator for debugging purposes.
  • HQ9+~, an extension of HQ9+ which is Turing-complete.
  • HQ9F+, an extension of HQ9+ with the F operator for FizzBuzz.
  • FHQ9+-, an extension of HQ9+- with the F operator for FizzBuzz.
  • CHIQRSX9+, another HQ9+ extension supposedly Turing complete.
  • HQ9+B, an ℒ-complete extension of HQ9+.
  • HQ9+2D, a 2-D extension of HQ9+.
  • H9+, with one fewer instruction but still capable of all of the tasks.
  • FISHQ9+, HQ9+ and deadfish combined.
  • HI9+, which replaces Q with an instruction that prints the interpreter's source code.
  • +, where there is only +, and other characters are ignored.
  • Hq9eFuck, HQ9+, brainfuck and Deep Thought combined.
  • BrainfisHQ9+, HQ9+, brainfuck and deadfish combined.
  • ACHEQUEUENINETHOUSANDPLUS, a more powerful derivative.
  • AHQ9+-, a derivative where the accumulator actually has a use.

External resources