01 VIEW IND 16
 02 STO 01
 03 Y^X
 04 GTO 66
 05 LBL 03
 06 Y^X
 07 RCL 03
 08 STO 03
 09 XEQ 100
 10 LBL 00
 11 RCL 04
 12 END