KRIA REMOTE #1 IF == G.BTNV 0: BRK A + G.BTNY 1; B PN 0 A C + A 4; D G.GBTN.C C IF == D 1: KR.L.ST A B G.BTNX ELSE: $ 3 L 1 4: $ 7 #2 A G.GRPI; B + G.BTNX 1 G.GBTN.V G.GRPI 0; G.BTNV 1 C KR.L.ST A B; D KR.L.LEN A B PN 0 A B L 1 4: $ 7 #3 C KR.L.ST A B; D + G.BTNX 1 IF < C D: KR.L.LEN A B - D C ELSE: KR.L.LEN A B - + D 16 C #4 #5 #6 A KR.POS I PN 0 I G.REC A - I 1 1 1 0 16 #7 IF == I 1: G.CLR B PN 0 I C KR.L.ST I B; D KR.L.LEN I B I - I 1; G.REC C I D 1 0 8 A - + C D 16 IF > A 0: G.REC 0 I A 1 0 8 #8 B * 16 I; C + I 3; D + I 4 G.GBX I B 0 C 1 1 1 2 2 7 1 B * 16 + I 4; I - I 1 G.GBX D B 0 I 1 1 0 2 1 16 1 G.KEY 0 C 1 #M L 1 4: $ 7 L 1 4: $ 6 #I L 1 4: $ 8 M 10 #P 1 0 0 1 1 1 1 1 0 0 0 0 63 63 63 63 0 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 #G 0001111000000000 1000000000000000 1000000000000000 1000000000000000 1000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0