You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

65 lines
1.5 KiB
Plaintext

19 years ago
#!/usr/bin/env ruby
# HQ9++ is an object-oriented extension of the well-known esoteric language
# HQ9+, created by Cliff L. Biffle.
#
# From: http://www.dangermouse.net/esoteric/hq9plusplus.html
#
# Commands
#
# * H
# Prints "Hello, world!".
# * Q
# Prints the entire text of the source code file.
# * 9
# Prints the complete canonical lyrics to "99 Bottles of Beer on the Wall".
# * +
# Increments the accumulator.
# * ++
# When the sequence ++ is encountered, it (naturally) increments the
# accumulator twice, and also instantiates an object of a new subclass of the
# generic superclass. In line with the best data-hiding principles, there is
# no way to access this object.
plusplus = true
source = gets
def beer(n)
if n == 1
puts "1 bottle of beer on the wall"
puts "1 bottle of beer"
puts "Take one down and pass it around"
puts "No bottles of beer on the wall"
else
puts "#{n} bottles of beer on the wall"
puts "#{n} bottles of beer"
puts "Take one down and pass it around"
puts "#{n-1} bottles of beer on the wall"
puts
beer(n-1)
end
end
accumulator = 0
last_instruction = nil
objects = []
source.split(//).each do |instruction|
case instruction
when "H"
puts "Hello world!"
when "Q"
puts source
when "9"
beer(99)
when "+"
accumulator += 1
if plusplus && last_instruction == "+"
objects << Class.new.new
end
when "\n", " "
else
die "Syntax error"
end
last_instruction = instruction
end