Помогите с прошивкой на pic16f628a на асм или на micropascal

[posina]

Вообщем нужна программа на microPASCAL'е или на assmemler для pic16f628a
Вот как она должна выглядеть
1. сначала цикл проверки кнопки
2.если кнопка нажата то перейти в sleep
3.если нажата ДРУГАЯ кнопка или эта же то выйти из sleep(пока pic в sleep).
ПОЖАЛУЙСТА ПОМОГИТЕ

[Аlex]

А помочь то чем ? Забыли ним сказать

[posina]

Что такое "НИМ" а помочь с программой вводящая в sleep микроконтроллер pic16F628A и все.

Ой,не все еще надо что-бы с помощью другой кнопки(А можно и с помощью этой же) выводить его из этого состояния.

[otest]

помочь с программой вводящая в sleep микроконтроллер

Ответ в вопросе
...........
sleep
.......

[posina]

Нет мне нужна программа-пример.

[Vadim_vv]

а даташит почитать на мк не судьба?

[posina]

Я читал но не понял.

[iGraphicsS]

...........
sleep
.......

Мог бы и поторговаться...
А так на будущее: если вы не умеете или не хотите что то делать, вы платите другому, чтобы он сделал за вас. Чтобы сделать бутерброд с маслом, вы же покупаете хлеб и масло! Я не вижу, чтобы вы сами хотели разобраться, не о какой помощи речи и не идёт. Вам, как я понял, надо уже откомпилированное. У меня на работе ставка 350 рублей/час. Я думаю за 100 рублей, это по божески

Вот спросите по другому, всё расскажу и покажу бесплатно, а так...

[posina]

Нельзя просто взять и помочь?

Нет надо просто помочь разобраться в этой фигне,мне не нужны откомпилированные коды.

[otest]

А если почитать ?

[Dmitry Dubrovenko]

ПОЖАЛУЙСТА ПОМОГИТЕ

Вот Вам программа, на которой я когда-то учился программированию (еле нашёл).
Там, при нажатии на первую кнопку, включается один светодиод, на вторую - два, и т.д.
Когда кнопки не нажимаются, светодиоды сперва выключены, затем некоторое время "бегущий огонь", затем переход в слип.
Выход из слипа по нажатию кнопки.
В архиве исходник, хекс, схема и проект Протеуса.
Исходник пришлось восстанавливать деассемблером. Версия Протеуса была, разумеется, древняя. С новыми может глючить.

[dosikus]

на которой я когда-то учился программированию

Весьма эпично ...
Учиться "программированию" по листингу дизасма, писанного на С .

[Dmitry Dubrovenko]

дизасма, писанного на С

Лёш, ты сам-то понял, что написАл?

[posina]

Ну нельзя просто привести ПРОСТОЙ пример входа и выхода из sleep.
Маленький кусочек кода на ассамблере или на pascal .
Более и не требуется!

[Vadim_vv]

приведите вы ТС бан, чтоб красным шрифтом не маячил. а вообще нечего пары прогуливать.
иди, неуч, читай

[posina]

Я и не прогуливаю,но все равно не получается вот код.

Код: Выделить всё

    processor 16F628A
    #include <P16F628A.INC>
    __config 0x2138
;   _CP_OFF & _DATA_CP_OFF & _LVP_OFF & _BODEN_OFF & _MCLRE_ON & _PWRTE_OFF & _WDT_OFF 
;   & _INTOSC_OSC_NOCLKOUT 

; RAM-Variable
OPTION_TMR0    EQU 0X01;
PORTA_TRISA    EQU 0X05;
PORTB_TRISB    EQU 0X06;
CMCON          EQU 0X1F;
INTCON         EQU 0X0B;
; Program

    Org 0x0000
    CLRW;
    BCF STATUS,RP0
    BCF STATUS,RP1
    MOVLW 0x07           ;  
    MOVWF CMCON;компоратор выключить
    BSF STATUS,RP0       ;банк
    BCF STATUS,RP1       ; 1
    MOVLW 0XC0 
    MOVWF OPTION_TMR0; подтягивающие резисторы отключены и прерывание по переднему фронту.
    CLRW
    MOVLW 0X00
    MOVWF PORTA_TRISA; Порты А на выход
    MOVLW 0XFF
    MOVWF PORTB_TRISB;порты B на вход
    BCF   INTCON,7 ;При выходе из Sleep не идти в вектор прерывания.
    CLRW;
    SLEEP;спим
    GOTO MET
MET BCF STATUS,RP0       ;
    BCF STATUS,RP1
    BSF PORTA_TRISA,0;включить порт а1
LADR_0x0019;зацикливание
    GOTO LADR_0x0019

    End

[pyzhman]

Ну нельзя просто привести

Можно просто включить телек. Но, зараза, для этого его надо сначала купить.

[otest]

Какой ужас. Ты сам понимаеш что пишеш?

; RAM-Variable
OPTION_TMR0 EQU 0X01;
PORTA_TRISA EQU 0X05;
PORTB_TRISB EQU 0X06;
CMCON EQU 0X1F;
INTCON EQU 0X0B;

Вот это зачем нужно ?

MOVLW 0XC0
MOVWF OPTION_TMR0

Это зачем ? Прерывания выключены.

Микроконтроллер выйдет из режима SLEEP по одному из следующих событий:
1. внешний сброс по сигналу на входе -MCLR;
2. переполнение сторожевого таймера WDT (если он разрешен);
3. периферийное прерывание (по сигналу INT, изменение уровня сигнала на входах RB7:RB4 и др.).

Какое из этих условий выполняется у тебя в программе?

[posina]

Насчет этого
OPTION_TMR0 EQU 0X01;
PORTA_TRISA EQU 0X05;
PORTB_TRISB EQU 0X06;
CMCON EQU 0X1F;
INTCON EQU 0X0B;

нет вопросов это проверенно и работает 100% ,а

MOVLW 0XC0
MOVWF OPTION_TMR0

это для отключения подтягивающих резисторов внутренних.

[otest]

Насчет этого нет вопросов это проверенно и работает 100%

Если это выкинуть и написать нормальный текст, тоже будет работать.
Если нет вопросов ? О чём тема?.

это для отключения подтягивающих резисторов

Мягко говоря , это заблуждение.