99 99 bottles

# 111.
99999 999

# Number of bottles.
999999999 999
999999999 999999999 99
999999999 999999999 9

# Start of 'main loop' address.
9999999999 99
9999999999 9999999999 9
9999999999 9999999999 9
9999999999 9999999999 9

# 0.
999 9 9

# Start of 'bottles of beer' address.
9999999 99
9999999 9999999 999 99
9999999 9999999 999 99
9999999 9999999 9
9999999 9999999 9
9999999 9999999 9

# Start of 'bottles of beer on the wall' address.
999999 99
999999 999999 999 99
999999 999999 999 99
999999 999999 999 99
999999 999999 9
999999 999999 9
999999 999999 9
999999 999999 9
999999 999999 9
999999 999999 9

# 'Return after gosub #1' address.
999999999999 9999999999 999 9

# 'Return after gosub #2' address.
99999999999 999999999999 999 9
99999999999 99999999999 999 9

# 'Return after gosub #3' address.
99999999 999999999999 9
99999999 99999999 9
99999999 99999999 9
99999999 99999999 999 99
99999999 99999999 999 99


# 'Return after gosub #4' address.
999999999999999 999999 999 9

# 11.
9999 99


#############
# MAIN LOOP #
#############

# Print number of bottles.
999999999

# Run the 'bottles of beer on the wall' subroutine.
9999999999999 999999999999                      # Set return address
 999999 999                                     # Gosub #1

# Print ', '
99 9999
99 99 999 9999
99 99 999 9999
99 99 999 9999
99
99 99 9999
99 99 9
99

# Print number of bottles
999999999

# Run the 'bottles of beer' subroutine.
99999999999999 99999999999                      # Set return address
 9999999 999                                    # Gosub #2

# Print '. Take one down, pass it around, '
99 9999
99 99 999 9999
99 99 999 9999
99 99 999 9999
99 99 999 9
99 99 999 9
99                                              # .
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9999
99 99 9999
99 99 9
99 99 9
99 99 9
99 99 9
99 99 9
99                                              # T
99 99999
99 99 9999
99 99 9
99 99 9
99 99 9
99                                              # a
99 99 999 9999
99 99 9
99                                              # k
99 99999
99 99 9999
99 99 999 9
99                                              # e
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99                                              # o
99 99 9
99                                              # n
99 99 9999
99 99 999 9
99 99 999 9
99                                              # e
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9999
99                                              # d
99 99 999 9999
99                                              # o
99 99 999 9999
99 99 9
99 99 9
99 99 9
99                                              # w
99 99 9999
99 99 999 9
99 99 999 9
99                                              # n
99 9999
99 99 999 9999
99 99 999 9999
99 99 999 9999
99                                              # ,
99 99 9999
99 99 9
99                                              # <space>
99 99999
99 99 999 9
99                                              # p
99 99 9999
99 99 9
99 99 9
99 99 9
99 99 9
99                                              # a
99 99999
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # s
99                                              # s
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9
99 99 9
99 99 9
99 99 9
99 99 9
99 99 9
99                                              # i
99 99 999 9999
99                                              # t
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9999
99 99 9
99 99 9
99 99 9
99                                              # a
99 99999
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # r
99 99999
99                                              # o
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # u
99 99999
99 99 9
99                                              # n
99 99999
99 99 9999
99                                              # d
99 9999
99 99 999 9999
99 99 999 9999
99 99 999 9999
99                                              # ,
99 99 9999
99 99 9
99                                              # <space>

# Decrement number of bottles.
999999999 999999999 9

# Print number of bottles.
999999999
# Run 'bottles of beer on the wall' subroutine.
9999999999999 99999999                          # Set return address
 999999 999                                     # Gosub #3

# Print '.\n'
99 9999
99 99 999 9999
99 99 999 9999
99 99 999 9999
99 99 999 9
99 99 999 9
99
99 9999
99 99 9
99

# If number of bottles == 0, goto end. Otherwise, goto start of main loop.
 999999999999999999 999999999
 9999999999 999


################################
# 'BOTTLES OF BEER' SUBROUTINE #
################################

# Print ' bottles of beer'
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9999
99 99 9
99 99 9
99                                              # b
99 99999
99                                              # o
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # t
99                                              # t
99 99999
99 99 9
99 99 9
99 99 9
99                                              # l
99 99999
99 99 9999
99 99 999 9
99                                              # e
99 99 999 9999
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # s
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99                                              # o
99 99 9999
99 99 999 9
99 99 999 9
99                                              # f
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 9999
99 99 9
99 99 9
99                                              # b
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # e
99                                              # e
99 99 999 9999
99 99 999 9
99 99 999 9
99                                              # r

# Return from subroutine.
 99999999999999 999


############################################
# 'BOTTLES OF BEER ON THE WALL' SUBROUTINE #
############################################

# Call 'bottles of beer' subroutine.
99999999999999 999999999999999                  # Set return address
 9999999 999                                    # Gosub #4

# Print ' on the wall'
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99                                              # o
99 99 9
99                                              # n
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99 99 999 9
99                                              # t
99 99 9999
99 99 9
99                                              # h
99 99 9
99 99 9
99 99 9
99                                              # e
99 9999
99 99 999 9999
99 99 999 9999
99 99 9
99                                              # <space>
99 99999
99 99 999 9999
99 99 9
99 99 9
99 99 9
99                                              # w
99 99 9999
99 99 9999
99                                              # a
99 99 999 9999
99                                              # l
99                                              # l

# Return from subroutine.
 9999999999999 999