00 { 46-Byte Prgm }
01▸LBL "NTRX"
02 MVAR "D"
03 MVAR "Pp"
04 MVAR "EAN"
05 RCL "D"
06 10
07 ÷
08 1
09 +
10 RCL "EAN"
11 100
12 ÷
13 ×
14 RCL "Pp"
15 -
16 END