Форум РадиоКот

Проверьте код пожалуйста.Компиляция проходит но на симуляции не загораются светодиоды.


List P=16f84A
__CONFIG 03FF1H
STATUS equ 03h
PortB equ 06h ; ???? B
TRISB equ 06h ; ??????? Tris B - ????1
TRISA equ 05h
Porta equ 05h
; ??????? Status.
MY_REG EQU 0x0F

RegL equ 0Ch ; ??????? ???????? ??????? 1-?? ??????????.
RegH equ 0Eh ; ??????? ???????? ??????? 1-?? ??????????.
TimerL equ 1Ch ; ??????? ???????? ??????? 2-?? ??????????.
TimerH equ 1Eh ; ??????? ???????? ??????? 2-?? ??????????.
; ??????????? ????? ?????????? ??????????? ????????.
;========
W equ 0 ; ????????? ????????? ? ???????????.
F equ 1 ; ????????? ????????? ? ???????.

;========
; ???????????? ????? ????????.
;========
C equ 0 ; ??? ????? ????????-?????.
Z equ 2 ; ??? ????? ???????? ??????????.
ORG 0
goto STARTe ; ? ???????????? START.
;*************************************************************

STARTe
BSF STATUS,5
Movlw B'11111111'
MOVWF TRISB

BCF STATUS,5
goto start

;=====================
;SVET
;====================
start

;opros knopki 10
btfsc PortB,0
goto odin
goto zero
odin
movlw .1
movwf RegH
goto dva
zero
movlw 0
movwf RegH
goto dva
;---------------------------------------------------------------------------------------------------------------------------
dva
btfsc PortB,1
goto oneq
goto zeroq
oneq
movlw .1
movwf RegL
goto thre
zeroq
movlw 0
movwf RegL
goto thre
;----------------------------------------------------------------------------------------------------------------------------------
thre
btfsc PortB,2
goto onew
goto zerow
onew
movlw .1
movwf TimerH
goto four
zerow
movlw 0
movwf TimerH
goto four
;-------------------------------------------------------------------------------------------------------------------------------------
four
btfsc PortB,3
goto onew
goto zerow
onee
movlw .1
movwf TimerL
goto dokonca
zeroe
movlw 0
movwf TimerL
goto dokonca


dokonca
btfsc PortB,4
goto SRAVN
goto dokonca










SVET
BSF Porta,3

miganVD2
BSF Porta,0
MOVLW 0Xff;
MOVWF MY_REG;
LOOPVD21 DECFSZ MY_REG,1;
GOTO LOOPVD21;
BCF Porta,0
MOVLW 0Xff;
MOVWF MY_REG;
LOOPVD2 DECFSZ MY_REG,1;
GOTO LOOPVD2;
GOTO miganVD2 ;

miganVD3
BSF Porta,1
MOVLW 0XFF;
MOVWF MY_REG;
LOOP1 DECFSZ MY_REG,1;
GOTO LOOP1;
BCF Porta,1
MOVLW 0XFF;
MOVWF MY_REG;
LOOP2 DECFSZ MY_REG,1;
GOTO LOOP2;
GOTO miganVD3 ;

osnova
;=========
;??????
;==============





;========
; ?????????
;========
SRAVN
Movf RegH,w
Subwf TimerH,w
Btfss STATUS,Z
Goto neravenstvo
Goto mladshie

neravenstvo
Movf RegH,w
Subwf TimerH,w
Btfss STATUS,C
Goto miganVD3
Goto miganVD2 ; ???? ??? ? 2 =1, ?? ????????? ???????????
; ???????? TimerH ? ??????????? ??????????
; ? ??? ??.
mladshie
Movf RegL, w
Subwf TimerL,w
Btfss STATUS,Z
Goto neravenstvoL
Goto SVET

neravenstvoL
Movf RegL, w
Subwf TimerL,w
Btfss STATUS,C
Goto miganVD3
Goto miganVD2

;-----------------------------------------------------------------------






END

STARTe
BSF STATUS,5
Movlw B'11111111'
MOVWF TRISB
Это настройка порта В. А где порт А ?

Первое, что не увидел - инициализацию PORTA. Вы не перевели его в режим выходов, сбросив регистр TRISA. После любого сброса все выводы - входы, т.е. в регистре TRISA записано b'11111' , а должны быть нули.

[uquote="Vovan555",url="/forum/viewtopic.php?p=3321213#p3321213"]Первое, что не увидел - инициализацию PORTA. Вы не перевели его в режим выходов, сбросив регистр TRISA. После любого сброса все выводы - входы, т.е. в регистре TRISA записано b'11111' , а должны быть нули.[/uquote]
Исправил,все равно не горят

Ну.... Ещё, как вариант, полярность питания.
И в качестве придирки - назначить бы кнопкам разные горячие клавиши.
Вообще говоря, какое у вас задание?

Раздели задачу.
Для начала отработай индикацию.
Затем добавь кнопки.
И на кой ... пёс на вывод программирования подано 12 вольтей???

Нормальный симулятор должен перевести ПИК в режим программирования!

СТУДЕНЬ однако...

На основе микроконтроллера разработать устройство, выполняющее следующие функции:
Сравнения 2-х двухразрядных двоичных чисел, поступающих на микроконтроллер. Процедура
сравнения активизируется нажатием на кнопку SB1. Если поступающие числа равны –
активизируется светодиод VD1, если первое число больше второго – мигает светодиод VD2, если
второе больше первого – мигает светодиод VD3. Числа задавать с помощью кнопок с
фиксированным нажатием – первое число S10, S11; второе число – S20, S21.

Согласно указанной в начале (http://radiokot.ru/forum/download/file.php?id=304938) схемы устройство НЕРАБОТОСПОСОБНО.
Для начала требуется исправить схему относительно вывода RESET, а уж затем дальше разговор вести.