Home      Search

datobin xdata 30h uni_dec xdata 31h tcoche data 30h coches_hechos data 20h coches_teoricos data 21h panelt equ p0 panelh equ p2 org 0h jmp inicio org 03h jmp menu org 0bh jmp contarhechos org 013h jmp tiempo org 01bh jmp calcular_deberia org 100h inicio: mov ie,#8fh mov tmod,#17h mov tcon,#1h mov th0,#-1 mov tl0,#-1 call inic_v setb tr0 jmp $ bin2bcd: push acc mov dptr,#30h movx a,@dptr mov b,#10 div ab swap a add a,b mov dptr,#31h movx @dptr,a pop acc ret inic_v: mov coches_hechos,#00h mov coches_teoricos,#00h mov tcoche,#1 ret contarhechos: clr tr0 inc coches_hechos mov a,coches_hechos mov dptr,#30h movx @dptr,a call bin2bcd mov dptr,#31h movx a,@dptr mov a,panelh reti menu: call inic_v mov ip,#04h mov ie,#8eh jb p3.2,$ jnb p3.2,$ mov ie,#8fh mov ip,#0h mov r2,#tcoche mov r1,#60 mov r0,#100 mov th1,#high(-10000) mov tl1,#low(-10000) setb tr1 reti tiempo: mov r5,tcoche cjne r5,#10,sal mov r5,#1 jmp sal sal: inc r5 mov tcoche,r5 reti calcular_deberia: clr tr1 djnz r0,sal1 mov r0,#100 mov th1,#high(-10000) mov tl1,#low(-10000) djnz r1,sal1 mov r1,#60 mov r0,#100 mov th1,#high(-10000) mov tl1,#low(-10000) mov r4,tcoche djnz r4,sal1 inc coches_teoricos mov a,coches_teoricos mov dptr,#30h movx @dptr,a call bin2bcd mov dptr,#31h movx a,@dptr mov a,panelt mov r4,tcoche mov r1,#60 mov r0,#100 mov th1,#high(-10000) mov tl1,#low(-10000) sal1: setb tr1 reti end

Cálculo y visualización del número de coches que se fabrican en una empresa automovilística Uploaded on  7/26/2008 11:07:57 AM Programming Language: microcontrolador 8051 By: josino See more code snippets of josino contador de coches producidos  practica 5 sdp1 telecomunicaciones uvigo

1