%%HP: T(1)A(R)F(.);
« # 0h NEWOB DUP
# 806F8h # 6595Ah
SYSEVAL 10 +
# 6595Ah SYSEVAL
# FFFFFh AND SWAP
DROP
»