Перейти к содержанию

Не стартует Pic16F877A


LiSiY5

Рекомендуемые сообщения

Помогите пожалуйста, что может быть? Код написан на ассемблере, симулятор  работает, все ОК. Прошиваю и нет реакции на смену 1/0 на входах. Выхода работают, моргают, а вход никак.

Код с конфигурацией прилогаю, Help me please)))

LIST p=16F877A
	__CONFIG 3F4Eh; кварц 20MHz
;===============================================================================================
; Определение положения регистров специального назначения. 
;===============================================================================================
OPTION_REG  equ        80h
Status      equ        03h         ; Регистр Status.
PortA       equ        05h         ; Регистр PortA.
TrisA       equ        85h         ; Регистр TrisA - банк 1.
PortB       equ        06h         ; Регистр PortB.
TrisB       equ        86h         ; Регистр TrisB - банк 1.
IntCon      equ        0Bh         ; Регистр IntCon.
ADCON0      equ        1Fh         ; Регистр установок компаратора

;===============================================================================================
; Определение названия и положения регистров общего назачения.
;===============================================================================================

SecH_1      equ        20h         ; старший разряд счетчика
SecL_1      equ        21h         ; младший разряд счетчика
but			equ			22h

;=============================================================================================
; Точка входа в программу.
;=============================================================================================
            org        0           ; Начать выполнение программы 
            goto       Start1      ; с подпрограммы START.

;=============================================================================================
; Инициализация порта А
;=============================================================================================

Start1      clrf       PortA       ; очистить порт А
            movlw      .7          ; Выключить компараторы и активировать порты входа-выхода
            movwf      ADCON0      ; 
			bsf       Status,5    ; Установить банк 1.
            movlw      3FH          ; портА работает на вход
            movwf      TrisA       ; входы 6,7 работают в режиме генератора
;=============================================================================================
; Инициализация порта B
;=============================================================================================
            clrf       TrisB       ; портВ работает на выход

            movlw      0           ; Включить подтягивающие резисторы порта В.
            movwf      OPTION_REG  ; На входе INT прерывания - по заднему фронту.
            bcf        Status,5    ; Установить банк 0.
            bcf        Status,6    ; Установить банк 0.
;--------------------------------------------------------------------------------------------
; анализ кнопки
;--------------------------------------------------------------------------------------------
Start       clrwdt
			btfsc      PortA,1     ; eсли А1=1
            bsf			but,0
			btfsc	   PortA,2
			bcf			but,0
			btfsc		but,0
			goto        pusk
			goto		Start
pusk		bsf        PortB,0     ; включить В0
            call		zad50
            bcf        PortB,0     ; выключить В0
			call		zad50
	    

            goto        Start

;--------------------------------------------------------------------------------------------
; задержка 50 мс 
;--------------------------------------------------------------------------------------------
zad50      movlw      .244        ; Закладка в регистр W константы .244  
            movwf      SecH_1      ; Копирование константы .244 из регистра W в регистр SecH_1.         
                                 
            movlw      .173        ; Закладка в регистр W константы .173
            movwf      SecL_1      ; Копирование константы .173 из регистра W в регистр SecL_1.

PAUSE_D     clrwdt                 ; Сброс сторожевого таймера WDT
                
            decfsz     SecL_1,F    ; Декремент содержимого младшего разряда счетчика SecL_1
            goto       PAUSE_D     ; Если результат декремента не=0, то переход в ПП PAUSE_D.                    
  
            decfsz     SecH_1,F    ; Если результат декремента =0, то инкремент старшего разряда счетчика SecH_1
            goto       PAUSE_D     ; Если результат инкремента не=0, то переход в ПП PAUSE_D.
            return                 ; Если результат инкремента =0, то программа исполняется далее.


            end                    ;конец

 

Изменено пользователем LiSiY5
Ссылка на комментарий
Поделиться на другие сайты

Реклама: ООО ТД Промэлектроника, ИНН: 6659197470, Тел: 8 (800) 1000-321

20% скидка на весь каталог электронных компонентов в ТМ Электроникс!

Акция "Лето ближе - цены ниже", успей сделать выгодные покупки!

Плюс весь апрель действует скидка 10% по промокоду APREL24 + 15% кэшбэк и бесплатная доставка!

Перейти на страницу акции

Реклама: ООО ТМ ЭЛЕКТРОНИКС, ИНН: 7806548420, info@tmelectronics.ru, +7(812)4094849

Похоже на то. Либо какие-то древние инструкции для начинающих.

19 часов назад, LiSiY5 сказал:

Помогите пожалуйста, что может быть?

Для начала исправьте начало файла, не изобретайте велосипед.

В меню МПЛаба (в моей версии Х 5.00 это в Production) имеется пункт Configuration bits. Он автоматически генерирует заголовок, надо только мышкой выставить нужные биты.

; Assembly source line config statements

#include "p16f877a.inc"

; CONFIG
; __config 0xFFFA
 __CONFIG _FOSC_HS & _WDTE_OFF & _PWRTE_OFF & _BOREN_ON & _LVP_ON & _CPD_OFF & _WRT_OFF & _CP_OFF

;===============================================================================================
; Определение названия и положения регистров общего назачения.
;===============================================================================================

SecH_1      equ        20h         ; старший разряд счетчика
SecL_1      equ        21h         ; младший разряд счетчика
but			equ			22h

Строка с #include ведет на файл, в котором уже прописаны адреса всех регистров. А конфигурационные биты надо писать именно в таком развернутом виде, чтобы всем было понятно, что там вкл, а что выкл.

Кроме того нет необходимости вручную переключать банки. Достаточно перед обращением к регистру написать banksel TRISA (или любой другой регистр или переменная). В процессе компиляции переключение банка компилятор добавит сам. Так вы точно не ошибетесь с банками и избавите себя от лишних поисков.

И потом, зачем вам на начальном этапе понадобился WDT? Добейтесь нормальной работы без него, а потом можете и с ним поиграться (если это так важно).

Изменено пользователем Zhuk72
Ссылка на комментарий
Поделиться на другие сайты

Организация питания на основе надежных литиевых аккумуляторов EVE и микросхем азиатского производства

Качественное и безопасное устройство, работающее от аккумулятора, должно учитывать его физические и химические свойства, профили заряда и разряда, их изменение во времени и под влиянием различных условий, таких как температура и ток нагрузки. Мы расскажем о литий-ионных аккумуляторных батареях EVE и нескольких решениях от различных китайских компаний, рекомендуемых для разработок приложений с использованием этих АКБ. Представленные в статье китайские аналоги помогут заменить продукцию западных брендов с оптимизацией цены без потери качества. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

.7 надо записывать не в ADCON0, а в ADCON1. И это не отключение компараторов, а отключение выводов порта от АЦП.

Кроме того .7 нужно также прописать и в CMCON. Это и будет отключение компараторов. А что вы делаете с кнопками мне совершенно непонятно.

Изменено пользователем Zhuk72
Ссылка на комментарий
Поделиться на другие сайты

Сравнительное тестирование аккумуляторов EVE Energy и Samsung типоразмера 18650

Инженеры КОМПЭЛ провели сравнительное тестирование аккумуляторов EVE и Samsung популярного для бытовых и индустриальных применений типоразмера 18650. 

Для теста были выбраны аккумуляторы литий-никельмарганцевой системы: по два образца одного наименования каждого производителя – и протестированы на двух значениях тока разряда: 0,5 А и 2,5 А. Испытания проводились в нормальных условиях на электронной нагрузке EBD-USB от ZKEtech, а зарядка осуществлялась от лабораторного источника питания в режиме CC+CV в соответствии с рекомендациями в даташите на определенную модель. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

3 часа назад, Zhuk72 сказал:

.7 надо записывать

 в 877 вообще нет регистра CMCON

 нет разницы ADCON0(1Fh) или ADCON1(9Fh) обращение определяется битами регистра STATUS, хотя в коде ТС запись действительно идет в регистр ADCON0.

Ссылка на комментарий
Поделиться на другие сайты

Литиевые аккумуляторы EVE Energy и решения для управления перезаряжаемыми источниками тока (материалы вебинара)

Опубликованы материалы вебинара Компэл, посвященного литиевым аккумуляторам EVE Energy и решениям для управления перезаряжаемыми источниками тока.

На вебинаре мы представили информацию не только по линейкам аккумуляторной продукции EVE, но и по решениям для управления ею, что поможет рассмотреть эти ХИТ в качестве дополнительной альтернативы для уже выпускающихся изделий. Также рассмотрели нюансы работы с производителем и сервисы, предоставляемые Компэл по данной продукции. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

У 877 нет, но у вопрос касается 877А, у которого компаратор есть.

Программа начинается с строк

Start1      clrf       PortA       ; очистить порт А
            movlw      .7          ; Выключить компараторы и активировать порты входа-выхода
            movwf      ADCON0      ;

Обращение идет к порту, а следом к ADCON0. Они оба в одном банке, а поскольку программа только стартанула, следовательно в нулевом.

Изменено пользователем Zhuk72
Ссылка на комментарий
Поделиться на другие сайты

Литиевые батарейки и аккумуляторы от мирового лидера  EVE в Компэл

Компания Компэл, официальный дистрибьютор EVE Energy, бренда №1 по производству химических источников тока (ХИТ) в мире, предлагает продукцию EVE как со склада, так и под заказ. Компания EVE широко известна в странах Европы, Америки и Юго-Восточной Азии уже более 20 лет. Недавно EVE была объявлена поставщиком новых аккумуляторных элементов круглого формата для электрических моделей «нового класса» компании BMW.

Продукция EVE предназначена для самого широкого спектра применений – от бытового до промышленного. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.

Гость
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Ответить в этой теме...

×   Вставлено с форматированием.   Восстановить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...
  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...