Ассемблер (ASM) для AVR в вопросах и ответах

[GP1]

пошел копать код.
пока один вопрос:
зачем в исходник вставлять inc-файл? есть же директива .include.

[poff]

to GP1. Традиция.. INC-файл был кривой, компилятор на него ругался. Затащил в тело исходника, исправил, а удалять не стал, та наглядней.

Только-что проверил его в AVR Studio, сформировал HEX, залил в процессор - эфект тотже. Хотя пошаговая симуляция работает как и должно быть.

В любом случае спасибо за поддержку... Жду.

[Liv]

Инфы в инете много , но через int как делать инфы особо нет , либо на Си, разве что товарищь Ридико полуописал как он делал через int на at89с2051

Вот, откопал и на ASM, хотя на нём уже давно не пишу. Почти http://upload.caxapa.ru/RC-5.asm

[MTF]

To Liv спасибо за исходник !!!!

кто нибуть может проконсультировать по поводу динамической индикации , по схеме у меня 2 разряда , мне просто надо выводить цифры от 0 до 99


как загружать 1 разряд через 74LS164 я вроде понял

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

;блок для вывода через 74LS164
	ldi	r17,8		;
74LS:	cbi 	PORTD,5	;
	sbrc	r16,7		;
	sbi 	PORTD,PD5	;
	lsl	r16		;
	sbi 	PORTD,6	;
	cbi 	PORTD,6	;
	dec	r17		;
	brne	74LS		;

возникло несколько вопросов:

какую частоту таймера лучше выбрать для 2 разрядов ???


еще я так понимаю мне надо изобрести некий преобразователь числа в семисегментный код для
74LS164 ???

Основная моя проблема не дошло как работать с двумя разрядами , для загрузки например числа 65 , если не трудно помогите разобратся

[GP1]

возникло несколько вопросов:
какую частоту таймера лучше выбрать для 2 разрядов ???

еще я так понимаю мне надо изобрести некий преобразователь числа в семисегментный код для
74LS164 ???

Основная моя проблема не дошло как работать с двумя разрядами , для загрузки например числа 65 , если не трудно помогите разобратся

1. Длительность свечения 1 разряда должна быть не более 1/25 сек, отсюда и высчитывай частоту.
2. Изобретать преобразователь не надо, надо просто либо во flash либо в EEPROM записать коды семисегментника.
3. Делаешь цикл из 2х проходов, сначала одну цифру, потом вторую

to poff
Честно говоря не догоняю логику работы твоего кода, сорри.

[MTF]

To GP1

с частотой понял 2 * 25 = 50Гц т.е 50 раз в секунду , у меня таймер CK/256 это 0,016 сек думаю подойдет или мне надо сделать именно 0,01сек ???

Если не трудно покажите пожалуйста как мне загрузить во flash либо в EEPROM коды семисегментника , и как потом их выбирать и позиционировать ????

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

.equ	OutPort 	=  PORTB
.def	tmp	    =  r16
.def      tmp1         =  r17 ;

T0_OVF:
.....
.....
;================ INDICATION ===== 

;------------------- OFF IND ------------------------------
         in           tmp ,  portb		;чтение portB 
         ori          tmp ,  0x03		;в 1 pb0 , pb1
         out         portb, tmp		;погасить  индикатор
; вопрос  так можно делать или не надо ????
         sbi         OutPort, (0<<OutPin , 1<<OutPin )

;здесь надо определять что должен показывать индикатор и какой должен светится ???   
        ;в  tmp   код цифры для 74LS164
         

;------------- Вывод в 74LS164 --------------------
         ldi	tmp1 , 8	;8 bits
LS164:
         cbi 	portd , 5	;DATA "0" => 74LS164
         sbrc	tmp  ,  7	;если  bit 7=0    выход 
         sbi 	portd , 5	;DATA "1" => 74LS164
         lsl	tmp		;Shift left r16
         sbi 	portd , 6	;CLOCK strobe for 74LS164
         cbi 	portd,  6	;CLOCK strobe for 74LS164
         dec	tmp1		;dec 
         brne	LS164		;если не 0  то LS164

	;------------------- ON IND ------------------------------
         in	            tmp ,  portb	;
         ...............
         ????????????????????????
         ............... 
         out	portb , tmp	;ON IND

[Gudd-Head]

Если не трудно покажите пожалуйста как мне загрузить во flash либо в EEPROM коды семисегментника , и как потом их выбирать и позиционировать ????

Как вариант во флэш:
С помощью
.CSEG
.ORG $ХХХ
.DW $1234
Записываете во флэш (память программ), начиная с адреса ХХХ двоичные слова (по 2 байта) коды семисегментника, напр. 1234, причём по порядку с нуля по девятку.
Далее при необходимости вывести цифру У:
Загружаете в регистр Z адрес ХХХ со сдвигом на единицу (влево?), т.к. младший байт регистра Z указывает, будет выведен старший или младший байт слова по адрксу ХХХ.
Прибавляете к содержимому Z вашу цифру У.
Командой lpm (или lpm Rd, Z) подгружаете код в регистр R0 (Rd). Далее OUT в порт на вывод

[GP1]

to MTF
1. Судя по коду ты собираешься выводить индикацию в обработчике прерывания T0_OVF, ИМХО это ламерство, без обид, в прерывании формируй флаг, а всю обработку в основном теле программы.
2. По коду чуть позже.

[GP1]

to MTF
Ну что-то типа такого, код в симуляторе не гонял возможны косяки

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

.equ   OutPort    =  PORTB
.equ	dg1	=pb1
.equ	dg2	=pb0
.def   tmp       =  r16
.def      tmp1         =  r17 ;
;****************
.equ	pin_dat	=pd5			;*** оч.рекомендую делать именно так
.equ	pin_clk	=pd6
.def	n	=<какой нибудь регистр>
.def	flags	=r19			;*** определяем регистр флагов
	.equ	tind	=7		;*** и назначаем флаг индикации


; main prog
.....
.....
	call	display			;***вызов процедуры индикации

.....
.....
	jmp	<начало>
;=================
T0_OVF:
.....
.....
	sbr	flags,tind			;*** установить бит, время индикации истекло
	reti
;================ INDICATION ===== 
display:

;здесь надо определять что должен показывать индикатор и какой должен светится ???   
        ;в  tmp   код цифры для 74LS164
					;*** для этого нужно организовать еще один цикл 
	ldi	n,2			;*** у нас 2 разряда
	clr	r0			;*** пригодится для сложения
next_digit:

	; вопрос  так можно делать или не надо ????
	;sbi         OutPort, (0<<OutPin , 1<<OutPin )	;*** вообще не понял для чего ЭТО
;*** вот здесь в tmp надо зарузить значение
;*** не знаю как у тебя организовано хранение выводимых значений
;*** поэтому оставляю на твое усмотрение

	;*** вариант если коды размещены во flash-памяти
	ldi	ZL,low(tabl_code*2)
	ldi	ZH,high(tabl_code*2)		;*** теперь Z указывает на начало таблицы с кодами индикатора
;*** находим код нужного нам символа 
	add	ZL, tmp
	adc	ZH,r0			;*** теперь Z указывает на нужный символ
;*** и загружаем семисегментный код в tmp
	lpm	tmp,Z

;------------- Вывод в 74LS164 --------------------
         ldi   tmp1 , 8   ;8 bits
LS164:
;*** с чего ты взял что выводишь здесь свои данные?
;         cbi    portd , 5   ;DATA "0" => 74LS164
;         sbrc   tmp  ,  7   ;если  bit 7=0    выход 
;         sbi    portd , 5   ;DATA "1" => 74LS164
;         lsl   tmp      ;Shift left r16
;****
	cbi	portd,pin_dat		;*** сбрасываем пин в 0
	lsl	tmp			;***выдавливаем бит в СY
	brcc	ls164_0
	sbi	portd,pin_dat		;*** устанавливаем в 1 если CY=1
ls164_0:
         sbi    portd , pin_clk	;CLOCK strobe for 74LS164
         cbi    portd,  pin_clk	;CLOCK strobe for 74LS164
         dec   tmp1      ;dec 
         brne   LS164      ;если не 0  то LS164
;*** в регистре нужный код , приступаем к индикации
;*** сбрасываем флаг индикации
	cbi	flags,tind
	cpi	n,2
	breq	digit2
	cbi	OutPort, dg1		;*** включаем разряд1
      ls_tout1:	sbis	flags,tind		;*** и ждем переполнения счетчика
		rjmp	ls_tout1
		rjmp	ls_next	
digit2:	cbi	OutPort, dg2		;*** включаем разряд2
      ls_tout2:	sbis	flags,tind		;*** и ждем переполнения счетчика
		rjmp	ls_tout2
ls_next:
;------------------- OFF IND ------------------------------
         in           tmp ,  portb      ;чтение portB 		;*** здесь все норм.
         ori          tmp ,  0x03      ;в 1 pb0 , pb1
         out         portb, tmp      ;погасить  индикатор
	dec	n
	brne	next_digit
	ret				;*** выход
;=================
.cseg
tabl_code:
	.db	<код нуля>
	.db	<код 1>
	...............
	; и т.д. максимум 256 кодов

[Pooher]

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

.equ   pin_dat   =pd5         ;*** оч.рекомендую делать именно так

А ещё лучше вот так:

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

#define RS portX,N

Тогда можно обращаться так:

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

sbi RS
cbi RS

[GP1]

+1
эт... дело привычки
у меняу с "детства" не принятие макросов , шутка юмора.

[Pooher]

Я эт сам только неделю назад в хелпе нарыл

[GP1]

Нарыл сам - поделись с котами

[avreal]

[А ещё лучше вот так:

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

#define RS portX,N

Тогда можно обращаться так:

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

sbi RS
cbi RS

Дело вкуса. Если препроцессор не приделан к ассемблеру "чтобы было" с минимальным функционалом, а нормально поддерживает операцию склейки ## и делает разбор "ну точно как С-шный" (ну или именно С-шный и используется, как в IAR или avr-gcc/WinAVR), то, на мой вкус, так лучше:

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

#define A_PORT(p,b) PORT##p,b
#define PORT(pb) A_PORT(pb)

#define A_PIN(p,b) PIN##p,b
#define PIN(pb) A_PIN(pb)

#define A_DDR(p,b) DDR##p,b
#define DDR(pb) A_DDR(pb)

#define A_MASK(p,b) (1<<b)
#define MASK(pb) A_MASK(pb)

// ну это так, для полнты комплекта, используется редко
#define A_BIT(p,b) (b)
#define BIT(pb) A_BIT(pb)

И используется так:

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

#define KEY		B,0
#define ALARM	B,1
#define LED		B,2
#define SCL		B,4

	 ; можем и маску собрать для одного обращения к DDR
	outi	DDRB, MASK(ALARM) | MASK(LED)
	sbi	DDR(SCL)                 ; и обратиться к биту DDR
	sbic	PIN(KEY)
	sbi	PORT(LED)
	sbi	PIN(ALARM)               ; а это на новых кристаллх - инверсия ноги

Писанины немного больше, зато можно манипулировать всеми характеристиками пина по одному его имени и не задавать толпу определений

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

#define SDA_DDR	DDRB,5
#define SDA_PORT	PORTB,5
#define SDA_PIN	PINB,5

[MTF]

GP1 спасибо за помощь , практически разобрался , загвозка во flash !!!!

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

.cseg
tabl_code:
  .db  0xDB   ; 0
  .db  0x48    ; 1
  .db  0xE3    ; 2
   db  0xEA    ; 3


display:
   ...................
   ...................

   ldi   ZL ,  low(tabl_code*2)
   ldi   ZH ,  high(tabl_code*2)      ;*** теперь Z указывает на начало таблицы с кодами индикатора
;*** находим код нужного нам символа 
   add   ZL ,  tmp
   adc   ZH ,  r0         ;*** теперь Z указывает на нужный символ
;*** и загружаем семисегментный код в tmp
   lpm   tmp , Z

;---------- вывод в 74LS164------------------
   .........
   .........

Допустим мне надо вывести число 18 , в tmp записываю 18

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

   add   ZL ,  tmp

следовательно на индикаторе отобразится , то что у меня записано в tabl_code 18 по счету , т.е
на обоих индикаторах будет одно и тоже число а не 18 ???

можно ли так ???

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

.cseg
tabl_code:
  .db  0xDB   ; 0
  .db  0x48    ; 1
  .db  0xE3    ; 2
  ...........
  ...........
  .db  0x48 , 0xFB   ; 18

тогда надо как то смещать что ли , для показа двух разных чисел , или есть какой то другой метод , а то все 99 чисел надо писать в массив !!!

мне так кажется надо как то расклдывать число 18 например на 1 и 8 и как то по одному числу выводить ????

[Gudd-Head]

тогда надо как то смещать что ли , для показа двух разных чисел , или есть какой то другой метод , а то все 99 чисел надо писать в массив !!!
мне так кажется надо как то расклдывать число 18 например на 1 и 8 и как то по одному числу выводить ????

Естессно, числа, как правило, выводятся по одному десятичному разряду, напр. "1" в десятках и "8" в единицах. Для преобразования 8-битного числа в два (три) (четырёхбитных) надо его преобразовать. Пример есть в аппноте AVR204 (вроде) - bin_to_BCD или как-то так. Тогда в памяти надо хранить коды всего 10 цифр

[GP1]

мне так кажется надо как то расклдывать число 18 например на 1 и 8 и как то по одному числу выводить ????

Правильно мыслишь

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

; в tmp число 18
; гасим одну тетраду, ну скажем младшую
      andi tmp,0xF0
      swap  tmp    ; теперь в tmp получилась 1

по кодам тебе надо создать 10 кодов с 0 по 9

ЗЫ в предыдущем посте Gudd-Head правильно указал, что число надо преобразовать к формату BCD

[MTF]

GP1

экперементировал в avrstudio

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

    ldi     tmp , 18 
    andi  tmp,0x0F  ; гасим старшую
    swap tmp    ;  в tmp почему то не получилось 8  

получилось 32 !!!

может не так что делаю ???

[GP1]

GP1

экперементировал в avrstudio

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

    ldi     tmp , 18 
    andi  tmp,0x0F  ; гасим старшую
    swap tmp    ;  в tmp почему то не получилось 8  

может не так что делаю ???

а если убрать SWAP

[MTF]

убрал получается 2