#Fizzbuzz
INT n
INT i
INT nfizz
INT nbuzz
INT modfizz
INT modbuzz

SET n 0
SET nfizz 3
SET nbuzz 5
SET modfizz 0
SET modbuzz 0
SET i 1

IN INT n How many?\n

:loop
    OUT \n

    MOD i nfizz modfizz
    JE fizzdo modfizz 0
    MOD i nbuzz modbuzz
    JE buzzdo modbuzz 0
    INC i 1

    JE loop modbuzz 0
    JE loop modfizz 0

    DEC i 1
    OUT $i$
    INC i 1

    JL loop i n
    OUT \n
    END 

:fizzdo
    OUT fizz
    RET

:buzzdo
    OUT buzz
    RET