Sčítání – Assembler – Fórum – Programujte.com

TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Trvalé přihlášení

Zapomněl jsi heslo?

Sčítání – Assembler – Fórum – Programujte.com

Rozšířené hledání ›

Nejnovější témata ve fóru

16:45, HTML / XHTML Anti-kukíkový zákon

16:26, Assembler šachový program

22:06, Startupy Megastroj.cz – Vše na jednom místě: půjčovna, bazar a inze…

21:17, Inzerce FPGA vývojová deska XILINX VIRTEX 5 ML507

20:59, OS - GNU / Linux Ubuntu a OpenSuse

21:47, Offtopic Digitalizace v Česku

Stavba Laser Arény
Laser Game Brno

Sčítání

sXe

~ Anonymní uživatel
~ 31 příspěvků

15. 10. 2009 #1

Zdravím, ve škole jsme dostali domácí úkol který zní:

Sečtěte hodnoty na adresách jejiž začátek je v R3 a konec v R4. R3=5, R4=15

Vyřešil jsem jej tímto způsobem:



	org 0

	mov R0,3

	mov 16H,R4

start:	add A,@R0

	inc R0

	cjne R0,#16H,start

	mov P0,A

	jmp $

	end

Jde o to že nevím jak bych vyřešil situaci kdyby v R4 byla hodnota FFH.. To bych neměl místo kam si uložit adresu z R4, v CJNE nemůžu použít dva R registry.. Je to nějak řešitelné? Jedná se o assembler 8051.

Nahlásit jako SPAM

IP: 217.197.36.–

sXe

~ Anonymní uživatel
~ 31 příspěvků

15. 10. 2009 #2

Pro úplnost dopsal jsem tam uložení hodnot do R3 a R4.



	org 0

	mov R3,#5H

	mov R4,#15H

	mov R0,3

	mov 16H,R4

start:	add A,@R0

	inc R0

	cjne R0,#16H,start

	mov P0,A

	jmp $

	end

Nahlásit jako SPAM

IP: 217.197.36.–

KIIV

~ Moderátor

+43

God of flame

15. 10. 2009 #3

asi bych klidne vyuzil treba xrl pro porovnani a jnz pak na samotny skok

Nahlásit jako SPAM

IP: 77.237.136.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

sXe

~ Anonymní uživatel
~ 31 příspěvků

15. 10. 2009 #4

KIIV napsal:
asi bych klidne vyuzil treba xrl pro porovnani a jnz pak na samotny skok

Mohl bys sem hodit kod?

Nahlásit jako SPAM

IP: 217.197.36.–

KIIV

~ Moderátor

+43

God of flame

15. 10. 2009 #5

To sXe : kod z hlavy ne.. sem v tom assembleru nedelal uz 2 roky ;)
princip je takovy:
hodim aktualni pozici v pameti do akumulatoru.. pomoci xoru porovnam s koncovou pozici...
xor pokud sou oba argumenty stejne vrati nulu.. podle ty pak skocis bud na dalsi pricteni nebo skoncis..

Nahlásit jako SPAM

IP: 77.237.136.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

KIIV

~ Moderátor

+43

God of flame

16. 10. 2009 #6

nebo me jeste napadlo: do jednoho registru dat rozdil koncove a pocatecni adresy.. pak odecitat dokud neni nula...
adresu kterou pricitas zvetsovat samostatne pomoci inc.. asi by to bylo nejjednodussi
tusim ze je tam instrukce djnz idealni pro tento ucel

Nahlásit jako SPAM

IP: 77.237.136.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

sXe

~ Anonymní uživatel
~ 31 příspěvků

16. 10. 2009 #7

KIIV napsal:
nebo me jeste napadlo: do jednoho registru dat rozdil koncove a pocatecni adresy.. pak odecitat dokud neni nula...
adresu kterou pricitas zvetsovat samostatne pomoci inc.. asi by to bylo nejjednodussi
tusim ze je tam instrukce djnz idealni pro tento ucel

Tohle je asi nejlepší řešení, díky moc. Přikládám kod.



	org 0

	clr C

	mov A,R4

	subb A,R3

	inc A

	mov R2,A

	clr A

start:mov R0,3

	add A,@R0

	inc R3

	djnz R2,start

	mov P0,A

	jmp $

	end

Nahlásit jako SPAM

IP: 217.197.36.–

KIIV

~ Moderátor

+43

God of flame

16. 10. 2009 #8

To sXe : jen jeste bacha jak se to bude chovat kdyz v tom prvnim registru bude vetsi adresa nez v druhem.. rozdil samozrejme pujde ale secte to vse krom tech adres :)

Nahlásit jako SPAM

IP: 77.237.136.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

sXe

~ Anonymní uživatel
~ 31 příspěvků

16. 10. 2009 #9

To KIIV : Jasné no, a jak by to šlo vyřešit nevíš?

Nahlásit jako SPAM

IP: 217.197.36.–

KIIV

~ Moderátor

+43

God of flame

16. 10. 2009 #10

To sXe : dela se to obvykle odectenim.. a pak kontrolou jestli to nevyslo zaporne

Nahlásit jako SPAM

IP: 77.237.136.–

_{Program vždy dělá to co naprogramujete, ne to co chcete...}

sXe

~ Anonymní uživatel
~ 31 příspěvků

19. 10. 2009 #11

Díky za rady, zde je kod:

	org 0

	clr C

	mov A,R4

	subb A,R3

	jnc zacR3

	clr C

	mov A,R4

	xch A,R3

	mov R4,A

	subb A,R3

zacR3:	inc A

	mov R2,A

	clr A

start:	mov R0,3

	add A,@R0

	inc R3

	djnz R2,start

	mov P0,A

	jmp $

	end