16f73 я не занимался, пишу на с.. но вот что выдал компилятор, когда я ввел массив..
15 000E 0782 ADDWF PCL, F
16 000F 3407 RETLW 0x7
17 0010 3406 RETLW 0x6
18 0011 3405 RETLW 0x5
19 0012 3404 RETLW 0x4
20 0013 3403 RETLW 0x3
21 0014 3402 RETLW 0x2
22 0015 3401 RETLW 0x1
23 0016 3400 RETLW 0
24 0017 0782 ADDWF PCL, F
25 0018 34D2 RETLW 0xd2
26 0019 34C0 RETLW 0xc0
27 001A 34BD RETLW 0xbd
28 001B 34B7 RETLW 0xb7
29 001C 34AE RETLW 0xae
30 001D 34A3 RETLW 0xa3
31 001E 349C RETLW 0x9c
32 001F 3498 RETLW 0x98
// это твои 2 массива
1837 072C 3000 MOVLW 0
1838 072D 008A MOVWF PCLATH
1839 072E 082C MOVF z, W
1840 072F 2017 CALL 0x17
1841 0730 118A BCF PCLATH, 0x3
// вот выборка из массива с первым адресом 17
1842 0731 00AD MOVWF 0x2d
1843 0732 082B MOVF temp, W
1844 0733 022D SUBWF 0x2d, W
1845 0734 1803 BTFSC STATUS, 0
// дальше сравнение, неинтересно...
1846 0735 2F38 GOTO 0x738
1847 0736 082B MOVF temp, W
1848 0737 2F3D GOTO 0x73d
// выборка из 2 массива
1849 0738 3000 MOVLW 0
1850 0739 008A MOVWF PCLATH
1851 073A 082C MOVF z, W
1852 073B 200E CALL 0xe
1853 073C 118A BCF PCLATH, 0x3
1854 073D 00AA MOVWF i
// дальше проверка,все 8 чисел выбраны или нет
1855 073E 0AAC INCF z, F
1856 073F 3008 MOVLW 0x8
1857 0740 022C SUBWF z, W
1858 0741 1803 BTFSC STATUS, 0
У тебя проблемы с алгоритмом, то что видно навскидку...
Вгрызаться в даташит 73 и смотреть, почему именно так идет выборка из таблицы,
нет особого желания... Пиши на С, преподу дашь дизассемблированный исходник.