STM8(S/L), первые впечатления

[kison]

Если нет, то какой тип присваивается вашей переменной по умолчанию?

int - 16 бит. У меня возврат uint32_t прекрасно работает.

[luxin]

int - 16 бит. У меня возврат uint32_t прекрасно работает.

А никто и не говорит, что плохо работают.

Человек писал:

нет, после вызова функции сразу вызывается c_itolx, то есть слово в Х расширяется в long, старшие 16бит пропадают.

т.е. результат получается 16р.(старшие уже потеряны разряды), а потом просто происходит преобразование типов. Поэтому спросил какой тип по умолчанию b32.

[qwerky]

какой тип по умолчанию b32

извиняюсь, пропустил
static volatile unsigned long b32;

У меня возврат uint32_t прекрасно работает.

а где там stdint.h ? я не нашел

[qwerky]

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

32-битный BIN-BCD (сдвиг + коррекция):

U32 bin2bcd_U32(U32 bin) {
	#asm
	        clrw X     ; result in stack
		pushw X
		pushw X
		push #32   ; bit counter
		
	bin2bcd_U32_01:    ; bit shift loop
		
		; BCD correction
		add SP,#5  ; SP points to result MSB
		ldw X,#4   ; result byte counter
	bin2bcd_U32_02:
		ld A,#0x33
		add A,(0,SP)
		bcp A,#0x08
		jrne bin2bcd_U32_03
		sub A,#0x03
	bin2bcd_U32_03:
		bcp A,#0x80
		jrne bin2bcd_U32_04
		sub A,#0x30
	bin2bcd_U32_04:
		push A
		decw X ; decrement byte counter
		jrne bin2bcd_U32_02
		sub SP,#1

		; shift bits
		sll (11,SP) ; bin
		rlc (10,SP)
		rlc (9,SP)
		rlc (8,SP)
		rlc (5,SP)  ; bcd
		rlc (4,SP)
		rlc (3,SP)
		rlc (2,SP)
		
		dec (1,SP) ; decrement bit counter
		jrne bin2bcd_U32_01
		
		pop A
		popw X      ; copy result to c_lreg
		ldw c_lreg,X
		popw X
		ldw c_lreg+2,X
	#endasm
}

[kison]

а где там stdint.h ? я не нашел

Нету. Пришлось сделать.

[luxin]

U32 bin2bcd_U32(U32 bin) {
#asm clrw X ; result in stack
pushw X
pushw X
push #32 ; bit counter
bin2bcd_U32_01: ; bit shift loop ; BCD correction
add SP,#5 ; SP points to result MSB

А не стремно так делать? Я понимаю, что со стеком очень хорошо работает данный контроллер, но ...
Как вы думаете, как Ваша функция выполнится, если произойдет вызов прерывания?

[qwerky]

Как вы думаете, как Ваша функция выполнится, если произойдет вызов прерывания?

прерывание должно сохранить состояние регистров и стека, нет ?
а, понял. прерывание может затереть данные на вершине стека.

[luxin]

а, понял. прерывание может затереть данные на вершине стека.

Молодец

Тоже произойдет, если вы захотите внутри добавить вызов какой-то функции. Возможно была у Вас проблема подобного типа

[qwerky]

модификация:

U32 bin2bcd_U32(U32 bin) {
	#asm
	        clrw X     ; result in stack
		pushw X
		pushw X
		ldw X,SP
		push #32   ; bit counter
		
	bin2bcd_U32_01:
		
		push #4    ; byte counter
		; BCD correction
	bin2bcd_U32_02:
		ld A,#0x33
		add A,(1,X)
		bcp A,#0x08
		jrne bin2bcd_U32_03
		sub A,#0x03
	bin2bcd_U32_03:
		bcp A,#0x80
		jrne bin2bcd_U32_04
		sub A,#0x30
	bin2bcd_U32_04:
		ld (1,X),A
		incw X
		
		dec (1,SP)
		jrne bin2bcd_U32_02
		subw X,#4
		pop A

		; shift bits
		sll (11,SP) ; bin
		rlc (10,SP)
		rlc (9,SP)
		rlc (8,SP)
		rlc (5,SP)  ; bcd
		rlc (4,SP)
		rlc (3,SP)
		rlc (2,SP)
		
		dec (1,SP)
		jrne bin2bcd_U32_01
		
		pop A
		popw X      ; copy result to c_lreg
		ldw c_lreg,X
		popw X
		ldw c_lreg+2,X
	#endasm
}

p.s.достали глюки отладчика - не всегда правильно отображает регистры и память

[luxin]

p.s.достали глюки отладчика - не всегда правильно отображает регистры и память

Я тоже заметил. Пробовал Raisonance - были глюки. Попробовал STVD - тоже. Я как понял причина в том, что локальные переменные находятся в стеке. Когда SP изменяется, то и локальные переменные некорректно отображаются