9 lines
185 B
PostScript
9 lines
185 B
PostScript
1024
|
|
{
|
|
dup 0 le % check whether still greater than 0
|
|
{ pop exit } % if not, exit the loop
|
|
if
|
|
dup = % print the number
|
|
2 idiv % divide by two
|
|
}
|
|
loop
|