Микроконтроллеры, АЦП, память и т.д Темы касающиеся микроконтроллеров разных производителей, памяти, АЦП/ЦАП, периферийных модулей... |
24.08.2011, 13:14
|
#1
|
Гражданин KAZUS.RU
Регистрация: 03.12.2004
Сообщений: 932
Сказал спасибо: 824
Сказали Спасибо 609 раз(а) в 216 сообщении(ях)
|
Вопрос PIC`оводам: в чем написано?
Доброго дня всем
В далеком 2003-2004 писалась программа на ассемблере.
Код - сохранился,а вот сам транслятор - нет
Подскажите, чем это откомпилировать?
вот кусочек кода:
Код:
|
LIST F=INHX8M,N=75,X=OFF
EXPAND
PROCESSOR 16F84
RADIX DEC ;- Система счисления по умолчанию Десятичная
__CONFIG B'11001' ; RC
; 43210
; B4: CODE PROTECTION, 1=OFF
; B3: POWER UP, 1=TIMED
; B2: WDOG, 1=ON
; B1-0: OSC SELECT, 01=XT, 11=RC
; __IDLOCS H'0001'
include p16f84.inc
; ------------------------------------------------------
;BEEP OUTPUTS Звуковые сигналы
;1*0.5=PROMPT,CHANGE PASSWORD IS OKay Приглашение, пароль изменен
;2*0.5=COMMAND IS OKay Команда принята
;1*1.5=COMMAND IS FAILURE Команда отменена
; EQUATES
CHR_1 EQU 1 ;-------Присвоения
CHR_2 EQU 2
...
CONTROL MACRO Y,N ;CONTROL RELAY1,OFF "Новая команда", управление реле
IF N == 0
BCF PORTB,Y
ELSE
BSF PORTB,Y
ENDIF
ENDM
_BANK MACRO N ;Упрощение переключения банков 1\0
IF N == 0
BCF STATUS,RP0 ; BACK TO LO REGS
ELSE
BSF STATUS,RP0 ; OPTION & TRIS ARE HI REGS
ENDIF
ENDM
...
; interrupt service
ORG 4
BTFSC INTCON,INTF
GOTO READY ;--- Чтение байта из ПРИЁМНИКА
BTFSC INTCON,T0IF
GOTO TIMER
;---
;MEMORY WRITE DONE
RETFIE ;--- выход из прерывания и возврат в точку
;--- из которой вышли в обработку прерывания
...
;************************************************* *********
;********** СТАРТ Настройка регистров и портов *******
; ---------------------------------------------------------
; SETUP
START:
_BANK 1
MOVLW B'01000111'
; 76543210
; B7: RBPU - ENABLE PORT B PULL-UP RES, 0=OFF
; B6: INTEDG - RB0 INT EDGE SEL 0=-VE
; B5: T0CS - TMR0 SOURCE, 0=FOSC/4, 1=RA4 PIN
; B4: T0SE - RA4CLK PIN EDGE SELECT, 0=+VE
; B3: PSA - PRESCALE ASSIGN 0=TIMER, 1=WDG
; B2-0: PS2-0 - PRESCALE RATE 111=256 FOR TIMER (=127 FOR WDT)
MOVWF OPTION_REG
MOVLW B'00000001' ; 0=OUTPUT
MOVWF TRISB
MOVLW B'11111' ; 1=INPUT
MOVWF TRISA
;
_BANK 0
MOVLW B'11111111' ; PORT REGS TO DEFAULTS
; 76543210
MOVWF PORTA
MOVLW B'00000000'
; 76543210
MOVWF PORTB
MOVLW B'11110000'
; 76543210
; B7: GIE - GLOBAL INT ENABLE, 0=OFF
; B6: EEIE - EERAW WRITE DONE INT ENABLE, 0=OFF
; B5: T0IE - TMR0 O/FLOW INT ENABLE, 0=OFF
; B4: INTE - RB0 INT ENABLE, 0=OFF
; B3: RBIE - PORTB CHANGE-OF-STATE INT ENABLE, 0=OFF
; B2: T0IF - TMR0 O'FLOW FLAG, 1=O/FLOW, S/WARE MUST RESET
; B1: INTF - RB0 INT FLAG, ACTIVE HIGH
; B0: RBIF - PORTB CHANGE-OF-STATE FLAG, ACTIVE HIGH
MOVWF INTCON
;-- Закончили настройку
... |
|
|
|
Сказали "Спасибо" aleksandr-zh
|
|
|
24.08.2011, 13:21
|
#2
|
Почётный гражданин KAZUS.RU
Регистрация: 10.05.2005
Адрес: Саратов.ru
Сообщений: 1,548
Сказал спасибо: 384
Сказали Спасибо 737 раз(а) в 417 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
Можно откомпилировать MPASMWIN. Идет в комплекте с Mplab и с протеусом.
Возможно придется поискать старую версию компилятора, ибо в последних мелкочип намудрил новый формат асм с секциями.
Последний раз редактировалось AJScorp; 24.08.2011 в 13:24.
|
|
|
Эти 2 пользователя(ей) сказали Спасибо AJScorp за это сообщение:
|
|
|
24.08.2011, 15:12
|
#3
|
Гражданин KAZUS.RU
Регистрация: 03.12.2004
Сообщений: 932
Сказал спасибо: 824
Сказали Спасибо 609 раз(а) в 216 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
MPASMWIN! точно, помню эту программму !
Спасибо
зы
придется вспоминать ПИКи... И использовать 16F84A - у заказчика их много ))
|
|
|
Сказали "Спасибо" aleksandr-zh
|
|
|
24.08.2011, 19:17
|
#4
|
Гуру портала
Регистрация: 20.11.2004
Сообщений: 10,015
Сказал спасибо: 936
Сказали Спасибо 2,269 раз(а) в 1,563 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
Сообщение от aleksandr-zh
|
зы
придется вспоминать ПИКи... И использовать 16F84A - у заказчика их много ))
|
Александр , окстись...
Заставь заказчика продать раритет и на вырученные деньги купить бОльшее количество 16f88 ....
__________________
Осторожно , злой кот
|
|
|
Сказали "Спасибо" dosikus
|
|
|
24.08.2011, 19:26
|
#5
|
Гражданин KAZUS.RU
Регистрация: 03.12.2004
Сообщений: 932
Сказал спасибо: 824
Сказали Спасибо 609 раз(а) в 216 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
я б с удовольствие заставил продать в музеи, и купить АВР Мега8...
Но они бепринципны
а мне по барабану: вся переделка будет сводиться с удалению некоторых подпрограмм да добавлению в иные места имеющихся (благо комментариев я там наделал на каждый пшик)
ps
если не развалимся в 1 января...
|
|
|
Сказали "Спасибо" aleksandr-zh
|
|
|
24.08.2011, 19:33
|
#6
|
Гуру портала
Регистрация: 20.11.2004
Сообщений: 10,015
Сказал спасибо: 936
Сказали Спасибо 2,269 раз(а) в 1,563 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
aleksandr-zh, Ну что 84 , что AVR - прошлый век .
Что будет делать заказчик лет через 5 когда 84 нигде не будет , а девайсы стали накрываться ?
__________________
Осторожно , злой кот
|
|
|
Сказали "Спасибо" dosikus
|
|
|
24.08.2011, 19:34
|
#7
|
Гражданин KAZUS.RU
Регистрация: 03.12.2004
Сообщений: 932
Сказал спасибо: 824
Сказали Спасибо 609 раз(а) в 216 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
нам бы до этого нового года дожить, а вы про века...
|
|
|
Сказали "Спасибо" aleksandr-zh
|
|
|
24.08.2011, 19:40
|
#8
|
Гуру портала
Регистрация: 20.11.2004
Сообщений: 10,015
Сказал спасибо: 936
Сказали Спасибо 2,269 раз(а) в 1,563 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
Сообщение от aleksandr-zh
|
нам бы до этого нового года дожить, а вы про века...
|
Не каркай .
Конец света перенесли ...
Вроде давно на ты .
__________________
Осторожно , злой кот
|
|
|
Сказали "Спасибо" dosikus
|
|
|
24.08.2011, 19:41
|
#9
|
Гражданин KAZUS.RU
Регистрация: 03.12.2004
Сообщений: 932
Сказал спасибо: 824
Сказали Спасибо 609 раз(а) в 216 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
тьфу ты!
я не про это, а ПРО НАШУ КОНТОРУ
у нас реарганизация\объединение\покупка на носу
|
|
|
Сказали "Спасибо" aleksandr-zh
|
|
|
25.08.2011, 11:00
|
#10
|
Прописка
Регистрация: 29.09.2007
Адрес: Донецк, ????
Сообщений: 199
Сказал спасибо: 21
Сказали Спасибо 19 раз(а) в 15 сообщении(ях)
|
Re: Вопрос PIC`оводам: в чем написано?
Цитата:
|
Что будет делать заказчик лет через 5 когда 84 нигде не будет , а девайсы стали накрываться ?
|
А прямо в девайсе заменить разве нельзя? (84-›8
Цоколевка вроде одна и таже (почти)
Ну разве что в прошивке для 88 тип тактового генератора поменять
|
|
|
Сказали "Спасибо" tolyanv8
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 06:40.
|
|