tsg-live-4-golf.wsa

push 0
loop:
push 0 readi
push 0 retrieve
dup push 10 sub jz yes:
dup push 12 sub jz yes:
dup push 14 sub jz yes:
dup push 15 sub jz yes:
dup push 16 sub jz yes:
dup push 18 sub jz yes:
dup push 20 sub jz yes:
dup push 21 sub jz yes:
dup push 24 sub jz yes:
dup push 25 sub jz yes:
dup push 27 sub jz yes:
dup push 28 sub jz yes:
dup push 30 sub jz yes:
dup push 32 sub jz yes:
dup push 35 sub jz yes:
dup push 36 sub jz yes:
dup push 40 sub jz yes:
dup push 42 sub jz yes:
dup push 45 sub jz yes:
dup push 48 sub jz yes:
dup push 49 sub jz yes:
dup push 54 sub jz yes:
dup push 56 sub jz yes:
dup push 63 sub jz yes:
dup push 64 sub jz yes:
dup push 72 sub jz yes:
dup push 81 sub jz yes:
push 0 printi
jmp no:
yes:
push 1 printi
no:
drop
push 1 add
dup push 100 sub jz end:
jmp loop: