Skip to content

Instantly share code, notes, and snippets.

@andkerosine
Created September 6, 2012 22:07
Show Gist options
  • Save andkerosine/3660728 to your computer and use it in GitHub Desktop.
Save andkerosine/3660728 to your computer and use it in GitHub Desktop.
push 0
dup
inum
load
dup
push 20
div
0:
dup
push 20
mul
copy 2
swap
sub
push 12
div
push 3
mul
push 1
add
copy 1
sub
jn 1
push 1
add
onum
pop
push 10
ochr
exit
1:
push 1
sub
jump 0
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment