;A highest common factor program
00 NUM 0    ;1st line is unused
01 LDN 30
02 STO 29
03 LDN 31
04 STO 31
05 LDN 31
06 STO 30
07 LDN 29
08 SUB 30
09 CMP
10 JRP 27
11 SUB 31
12 STO 31
13 SUB 28
14 CMP 
15 JMP 00
16 STP      ;stop program an return result
27 NUM -3   ;data for the program
28 NUM 2
29 NUM 0
30 NUM 3141593
31 NUM 5214
