WienerScript/examples/fizzbuzz/fizzbuzz.ws

STRAWANZ MA (
    OIDA n WENNST MANST 1; n HOIT NET GRESSA 100; n WENNST MANST n AUFI 1
) {
    OIDA out WENNST MANST "";
    WOS WÜSTN (JO EH(n S'RESTL 3))
        out WENNST MANST out AUFI "Fizz";
    WOS WÜSTN (JO EH(n S'RESTL 5))
        out WENNST MANST out AUFI "Buzz";
    I MAN JA NUR (out HOST MI out DANN HOIT NET n);
}