push -58d :SSTTTTSTSL label :LSSL push 1d :SSSTL add :TSSS dup :SLS push 122d :SSSTTTTSTSL add :TSSS putchar :TLSS dup :SLS jle label :LTTL