BTW Downloadlink is German
BTW This the .Net version
BTW It Compiles into VB .Net an then into CIL
BTW Have fun

CAN I HAS System

HAI BottleModule

I HAS A BOTTLE ITZ NUMBR
I HAS A QUESTION ITZ YARN
I HAS A B ITZ NUMBR

PLZSTART
  BOTTLE IZ 99
  B IZ 1
  SING()
KTHXEND

HOW DUZ I SING()

  IM IN YR LOOP TIL B IZ 0 TO 99

    O RLY? BOTTLE > 1 YA!
      VISIBLE:BOTTLE & " BOTELS OF BEER ON TEH WAL, " & BOTTLE & " BOTELS OF
      BEER ON TEH WAL":KTHX
      VISIBLE:"TAEK ONE DOWN AN PAS IT ROUND, " & BOTTLE DIFF 1 & " BOTELS OF
      BEER ON TEH WAL":KTHX
    MEBBE? BOTTLE IZ 1 YA!
      VISIBLE:"1 BOTEL OF BEER ON TEH WAL, 1 BOTEL OF BEER":KTHX
      VISIBLE:"TAEK ONE DOWN AN PAS IT ROUND, NO MOR BOTELS OF BEER ON TEH
      WAL":KTHX
      VISIBLE:"NO MOR BOTELS OF BEER ON TEH WAL, NO MOR BOTELS OF BEER":KTHX
      VISIBLE:"GO TO TEH STOR AN BUI SOME MOR, 99 BOTELS OF BEER ON TEH
      WAL":KTHX
      BOTTLE IZ 99
    OIC!

    BOTTLE IZ BOTTLE DIFF 1

  IM OUTTA YR LOOP B
  B IZ 1

  VISIBLE:"WANNA SING AGAN THEN TYPE ""YEAH""")
  QUESTION IZ GIMMEH:KTHX

IF U SAY SO

HOW DUZ I ASK()

  O RLY? QUESTION IZ "YEAH" YA!
    SING()
  NO WAI
    VISIBLE:"U SUXX!":KTHX
    GIMMEH:KTHX
  OIC!

IF U SAY SO

KTHXBYE