Форум РадиоКот

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

ATmega32A memory use summary [bytes]:
Segment   Begin    End      Code   Data   Used    Size   Use%
---------------------------------------------------------------
[.cseg] 0x000000 0x000014     20      0     20   32768   0.1%
[.dseg] 0x000060 0x000060      0      0      0    2048   0.0%
[.eseg] 0x000000 0x000000      0      0      0    1024   0.0%

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

; input - r19,r18,r17,r16
; output - r21:r20

; R = A + (B<<3) + (B<<1) 
;       + (C<<6) + (C<<5) + (C<<2)
;       + (D<<9) + (D<<8) + (D<<7) + (D<<6) + (D<<5) + (D<<3);

.def rD = r19
.def rC = r18
.def rB = r17
.def rA = r16

.def rRL = r20
.def rRH = r21

			mov		rRL,	rA		; RES = A
			mov		rRH,	rD		; RES = RES + (D << 8)
			lsl		rD				; D << 9
			add		rRH,	rD		; RES = RES + (D << 9)


			lsl		rB				; B << 1
			add		rRL,	rB		; RES = RES + (B << 1)
			lsl		rB				; B << 2
			lsl		rB				; B << 3
			add		rRL,	rB		; RES = RES + (B << 3)

.undef rB
.def rCH = r17
			clr		rCH

			lsl		rC				; C << 1
			lsl		rC				; C << 2
			add		rRL,	rC		; RES = RES + (C << 2)
			lsl		rC				; C << 3
			lsl		rC				; C << 4

			lsl		rC
			rol		rCH				; C << 5 ; (rCH:rC)

			add		rRL,	rC
			adc		rRH,	rCH		; RES = RES + (C << 5)

			lsl		rC
			rol		rCH				; C << 6

			add		rRL,	rC
			adc		rRH,	rCH		; RES = RES + (C << 6)

.undef rCH
.def rDH = r17
			clr		rDH

			lsl		rD				; D << 1
			lsl		rD				; D << 2
			lsl		rD				; D << 3
			add		rRL,	rD		; RES = RES + (C << 2)
			lsl		rD				; C << 4

			lsl		rD
			rol		rDH				; D << 5 ; (rDH:rD)

			add		rRL,	rD
			adc		rRH,	rDH		; RES = RES + (D << 5)

			lsl		rD
			rol		rDH				; D << 6 ; (rDH:rD)

			add		rRL,	rD
			adc		rRH,	rDH		; RES = RES + (D << 6)

			lsl		rD
			rol		rDH				; D << 7 ; (rDH:rD)

			add		rRL,	rD
			adc		rRH,	rDH		; RES = RES + (D << 7)

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

long int A, B, C, D, E, F, G, H, X;

int main()
{
	A = 9;
	B = 9;
	C = 9;
	D = 9;
	E = 9;
	F = 9;
	G = 9;
	H = 9;
	
	X = A;						// Прибавили еденицы
	X = X + (B<<3) + (B<<1);			// Прибавили десятки
	X = X + (C<<6) + (C<<5) + (C<<2);			// Прибавили сотни
	X = X + (D<<9) + (D<<8) + (D<<7) + (D<<6) + (D<<5) + (D<<3);	// Прибавили тысячи
	X = X + (E<<13) + (E<<10) + (E<<9) + (E<<8) + (E<<4);			// Прибавили десятки тысяч
	X = X + (F<<16) + (F<<15) + (F<<10) + (F<<9) + (F<<7) + (F<<5); 	// Прибавили сотни тысяч
	X = X + (G<<19) + (G<<18) + (G<<17) + (G<<16) + (G<<14) + (G<<9) + (G<<6); // Прибавили миллионы
	X = X + (H<<23) + (H<<20) + (H<<19) + (H<<15) + (H<<12) + (H<<10) + (H<<9) + (H<<7); // Прибавили десятки миллионов
	
    printf ("%d\n", X);

}

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

unsigned int bcd4_int2(unsigned char d, unsigned char c, unsigned char b, unsigned char a) {
  return ( d*1000 + c*100 + b*10 + a );
}

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

unsigned int bcd4_int2(unsigned char d, unsigned char c, unsigned char b, unsigned char a) {

  return ( a + (b<<3) + (b<<1) + (c<<6) + (c<<5) + (c<<2) + (d<<9) + (d<<8) + (d<<7) + (d<<6) + (d<<5) + (d<<3) );
}

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

unsigned int bcd4_int2(unsigned char d, unsigned char c, unsigned char b, unsigned char a) {

unsigned int x;
unsigned int tmp;

	x = a | (d<<8) + (d<<9);
	b = b << 1;
	x+= b;
	b = b << 1;
	b = b << 1;
	x+= b;
	c = c << 1;
	c = c << 1;  // c << 2
	x+= c;
	c = c << 1;  // c << 3
	c = c << 1;  // c << 4

	tmp = c;
	tmp = tmp << 1; // c << 5
	x+= tmp;
	tmp = tmp << 1; // c << 6
	x+= tmp;

	d = d << 1;
	d = d << 1;
	d = d << 1;  // d << 3
	x+= d;
	d = d << 1;  // d << 4
	tmp = d;
	tmp = tmp << 1; // d << 5
	x+= tmp;
	tmp = tmp << 1; // d << 6
	x+= tmp;
	tmp = tmp << 1; // d << 7
	x+= tmp;
  return ( x );
}