BTFSS PORTA,1; проверка первой ноги на лог."1", если есть, то пропускаем след. команду
GOTO m1; переход по метке
INCF 1F,F; инкремент регистра
m1 BTFSS PORTA,2; проверка второй ноги на лог."1", если есть, то пропускаем след. команду
GOTO m2; переход по метке
INCF 1F,F; инкремент регистра
m2 BTFSS PORTA,3; проверка третьей ноги на лог."1", если есть, то пропускаем след. команду
GOTO prog; переход по метке
INCF 1F,F; инкремент регистра
prog MOVF 1F, W; перетаскиваю из регистра-счетчика в аккумулятор
MOVWF PORTB; из аккумулятора подаю на выход
END;
CQlCVEZTUyBQT1JUQSwxOwnQv9GA0L7QstC10YDQutCwINC/0LXRgNCy0L7QuSDQvdC+0LPQuCDQvdCwINC70L7Qsy4iMSIsINC10YHQu9C4INC10YHRgtGMLCDRgtC+INC/0YDQvtC/0YPRgdC60LDQtdC8INGB0LvQtdC0LiDQutC+0LzQsNC90LTRgwoJCUdPVE8gbTE7CdC/0LXRgNC10YXQvtC0INC/0L4g0LzQtdGC0LrQtQoJCUlOQ0YgMUYsRjsg0LjQvdC60YDQtdC80LXQvdGCINGA0LXQs9C40YHRgtGA0LAKCQkKbTEJCUJURlNTIFBPUlRBLDI7INC/0YDQvtCy0LXRgNC60LAg0LLRgtC+0YDQvtC5INC90L7Qs9C4INC90LAg0LvQvtCzLiIxIiwg0LXRgdC70Lgg0LXRgdGC0YwsINGC0L4g0L/RgNC+0L/Rg9GB0LrQsNC10Lwg0YHQu9C10LQuINC60L7QvNCw0L3QtNGDCgkJR09UTyBtMjsg0L/QtdGA0LXRhdC+0LQg0L/QviDQvNC10YLQutC1CgkJSU5DRiAxRixGOyDQuNC90LrRgNC10LzQtdC90YIg0YDQtdCz0LjRgdGC0YDQsAoKbTIJCUJURlNTIFBPUlRBLDM7INC/0YDQvtCy0LXRgNC60LAg0YLRgNC10YLRjNC10Lkg0L3QvtCz0Lgg0L3QsCDQu9C+0LMuIjEiLCDQtdGB0LvQuCDQtdGB0YLRjCwg0YLQviDQv9GA0L7Qv9GD0YHQutCw0LXQvCDRgdC70LXQtC4g0LrQvtC80LDQvdC00YMKCQlHT1RPIHByb2c7INC/0LXRgNC10YXQvtC0INC/0L4g0LzQtdGC0LrQtQoJCUlOQ0YgMUYsRjsg0LjQvdC60YDQtdC80LXQvdGCINGA0LXQs9C40YHRgtGA0LAKCnByb2cJTU9WRiAxRiwgVzsg0L/QtdGA0LXRgtCw0YHQutC40LLQsNGOINC40Lcg0YDQtdCz0LjRgdGC0YDQsC3RgdGH0LXRgtGH0LjQutCwINCyINCw0LrQutGD0LzRg9C70Y/RgtC+0YAKCQlNT1ZXRiBQT1JUQjsg0LjQtyDQsNC60LrRg9C80YPQu9GP0YLQvtGA0LAg0L/QvtC00LDRjiDQvdCwINCy0YvRhdC+0LQKCQlFTkQ7