mirror of
https://github.com/Noratrieb/GRSBPL.git
synced 2026-01-14 11:45:02 +01:00
19 lines
No EOL
679 B
Text
19 lines
No EOL
679 B
Text
1 &i # init loop counter
|
|
:start # set start label
|
|
@i 100 - not goto finished # if i is 100, finish
|
|
@i 15 % not goto print_fizz_buzz # fizzbuzz
|
|
@i 5 % not goto print_buzz # buzz
|
|
@i 3 % not goto print_fizz # fizz
|
|
@i nout '\n' out # normal number
|
|
:end # go back here after printing
|
|
@i 1 + &i # increment i
|
|
1 goto start # go back to the start
|
|
|
|
:print_fizz_buzz
|
|
"Fizzbuzz\n" out goto end
|
|
:print_fizz
|
|
"Fizz\n" out goto end
|
|
:print_buzz
|
|
"Buzz\n" out goto end
|
|
|
|
:finished 0 |