-->
constant threes = tagset(100,0,3),
fives = tagset(100,0,5),
fifteens = tagset(100,0,15)
for i=1 to 100 do
if not find(i,threes) and not find(i,fives) and not find(i,fifteens) then
printf(1,"%d",i)
end if
if find(i,threes) and not find(i,fives) and not find(i,fifteens) then
printf(1,"Fizz")
end if
if not find(i,threes) and find(i,fives) and not find(i,fifteens) then
printf(1,"Buzz",i)
end if
if find(i,threes) and find(i,fives) and find(i,fifteens) then
printf(1,"FizzBuzz")
end if
printf(1,"\n")
end for