PUSH -10
PUSH 1
ADD
POKE 1
JNZ 1
STOR IX
POP
PEEK 1
JNZ 6