[HaBo]

digits = ["", "ein", "zwei", "drei", "vier", "fünf", "sechs", "sieben", "acht", "neun"]
rounds = ["", "tausend", "million", "milliarde", "billion"]

void sayNum(String num)
{
    LinkedList result = new LinkedList()  // Ergebnis-Liste mit den Teilen
    String part                           // der aktuelle 3-stellige Teil
    Integer i = num.size()                // markiert den Anfang des akt. Teils
    Integer r = 0                         // die aktuelle Runde (tausend, million etc.)

    // die Teile von hinten nach vorne bearbeiten
    while ((i -= 3) >= 0) {
        part = getPart(num[i..i+2].toInteger())
        if (part != "")
            result.addFirst(part + rounds[r])
        r++
    }
    // gibt es noch ein Teil mit weniger als 3 Stellen?
    if (i > -3) {
        part = getPart(num[0..i+2].toInteger()) + rounds[r]
        result.addFirst(part)
    }
    
    result.each { println it }
    println ""
}

/** Konvertiert eine 3-stellige Zahl: XXX */
String getPart(Integer p)
{
    Integer p__X = (p % 10)       // die letzte ziffer
    Integer p_XX = (p % 100)      // die letzten 2 ziffern

    Integer pX__ = p.intdiv(100)  // die erste Ziffer
    Integer p_X_ = p.intdiv(10)   // die mittlere Ziffer
    Integer p_X0 = p_XX - p__X    // 10, 20, 30 etc.
    
    // ist die Zahl 3-stellig?
    if (p in 100..999)
        return "${digits[pX__]}hundert${getPart(p_XX)}"

    // Zahl hat 1 oder 2 stellen
    switch (p) {
        case 0..9:    return "${digits[p]}"; break
        case 10:      return "zehn"; break
        case 11:      return "elf"; break
        case 12:      return "zwölf"; break
        case 13..19:  return "${digits[p__X]}zehn"; break
        case 20:      return "zwanzig"; break
        case 30:      return "dreißig"; break
        case 40:      return "vierzig"; break
        case 50:      return "fünfzig"; break
        case 60:      return "sechzig"; break
        case 70:      return "siebzig"; break
        case 80:      return "achtzig"; break
        case 90:      return "neunzig"; break
        default:      return "${digits[p__X]}und${getPart(p_X0)}"              
    }
}

sayNum("18")         // achtzehn
sayNum("35")         // fünfunddreißig
sayNum("2402")       // zweitausend vierhundertzwei
sayNum("32322402")   // zweiunddreißigmillion dreihundertzweiundzwanzigtausend vierhundertzwei
sayNum("2500402")    // zweimillion fünfhunderttausend vierhundertzwei
sayNum("5000402")    // fünfmillion vierhundertzwei
sayNum("250000402")  // zweihundertfünfzigmillion vierhundertzwei