BEGIN Regs: { 00 01 02 03 } { 04 05 } 62 Regs: { 04 01 02 03 } { 02 05 } 45 [2] := [1] | c := !b; -> LOGIC 0 1 1 7F Regs: { 01 02 03 02 } { 05 03 } 55 [3] := [2] | d := !c; -> LOGIC 1 1 1 637D667F62 Regs: { 02 _ 03 _ 05 03 } 0160 [loop [01]] let rec iter0 () = ******* Regs: { 02 _ 03 _ 05 03 } 7F667F6260 Regs: { 01 _ 03 _ 05 04 } 605A [4] := [3] | e := !d; -> LOGIC 1 2 2 617F657D62 Regs: { 02 _ 03 _ 05 02 } 6030 [2] := [2] + [2] | c := add !c !c; -> MATH 1 0 0 6160606060 Regs: { 02 __ 03 __ } { 05 03 } 6047 [3] := [3] xor [2] | d := xor !d !c; -> LOGIC 0 1 3 626A62746C Regs: { 04 __ 03 __ } { 05 03 } 6052 [3] := [3] and [4] | d := !d land !e; 627D637D62 Regs: { 02 _ 03 _ 05 03 } 19 SCIENCE [2] ~7 | if !c <> 0 then iter0 () 68627C7479 Regs: { 01 _ 03 _ 05 03 } 0160 BEGIN LOOP 2 ****************** Regs: { 01 _ 03 _ 05 03 } 617D637D62 Regs: { 00 __ 02 __ } { 05 02 } 6032 [2] := [0] + [2] | c := add !c !a; -> MATH 1 0 2 61637E767F Regs: { 01 __ 03 __ } { 05 01 } 602D [1] := [1] - [3] | b := sub !b !d; -> MATH 0 3 1 6377626167 Regs: { 01 __ 03 __ } { 05 03 } 19 SCIENCE [1] GOTO LOOP2 ******** Regs: { 01 __ 03 __ } { 05 03 } 7F647B62 Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 30303030303030 [0] := [0] + [0] | a := !a lsl 7; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 303030303030 [0] := [0] + [0] | a := !a lsl 6; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 3030303030 [0] := [0] + [0] | a := !a lsl 5; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 30303030 [0] := [0] + [0] | a := !a lsl 4; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 303030 [0] := [0] + [0] | a := !a lsl 3; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 3030 [0] := [0] + [0] | a := !a lsl 2; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 5A [0] := [3] | a := !d; -> LOGIC 1 2 2 30 [0] := [0] + [0] | a := !a lsl 1; -> MATH 1 0 0 04 SCIENCE [0] +4 GOTO NEXT1 | if !a <> 0 then 617561606D Regs { 03 __ 01 __ } { 05 02 } 0760 SCIENCE [0] GOTO NEXT2 6860606000 SCIENCE [0] [0] 01 NEXT2: Regs { 03 __ 01 __ } { 05 02 } 64647C7C61 Regs: { 02 __ 03 __ } { 05 02 } 30 [2] := [2] + [2] | c := add !c !c; --> MATH 1 0 0 61617D717D Regs: { 00 __ 03 __ } { 05 00 } 00FF finish END