99bottles.ox

Integer bottles = (|
  (self == 0) if: [|
    "No more bottles"
  ] else: [|
    (self == 1) if: [|
      "1 bottle of beer"
    ] else: [|
      (self to-s) + " bottles of beer"
    ]
  ]
)

(99 to: 1) do: [n|
  (n bottles) + " on the wall, " + (n bottles) + "." puts
  "Take one down, pass it around." puts
  (n - 1) bottles + " on the wall." puts
]