Ensamblador de reloj
Segundo EQU 30H
Minite EQU 31H
Tiempo EQU 32 horas
HORA bit P0.0
MINITEK bit P0.1
SECONDK bit P0.2
DISPBUF EQU 40H
DISPBIT EQU 48H
T2SCNTA EQU 49H
T2SCNTB EQU 4AH
EQU temporal 4BH
Organización 00H
Inicio LJMP
Organización 0BH
LJMP INT_T0
Primera versión: MOV segundo, #00H segundo
MOV Minette, #00H minuto
MOV hora, # 12; /p>
Bit de visualización MOV, #00H
MOV T2SCNTA, #00H
MOV T2SCNTB, #00H
Temperatura MOV, #0FEH p>
Mi nombre es DISP
MOV TMOD, #01H
MOV TH0, #(65536-2000)/256
MOV TL0, No 248
SETB TR0
SETB ET0
SETB Electronic Arts
Peso: JB SECONDK, NK1
LCALL retardo 10 milisegundos
JB SECONDK, NK1
INC segundos
MOV A, segundo
CJNE A, #60, NS60
MOV 2nd, #00H
NS60: LCALL DISP
Escuela secundaria JNB, USD
NK1: JB MINITEK, NK2
LCALL retraso 10 milisegundos
JB MINITEK, NK2
INC MINITE
MINITE·MOV
CJNE A, #60 , NM60
MOV Mini Special, #00H
NM60: Llamar a DISP
JNB Minitech, USD
NK2: JB HOURK, NK3
LCALL retraso 10 milisegundos
JB HOURK, NK3
INC hora
MOV una hora
CJNE A , #24, NH24
Hora MOV, #00H
NH24: LCALL DISP
JNB·Huo gramos, USD
NK3: Peso LJMP
retraso 10 ms:
MOV R6, #10
D1: MOV R7, # 248
DJNZ R7, USD
DJNZ R6, D1
Remojado en agua para suavizar
DISP:
MOV A, #DISPBUF
Agregar un #8
Diciembre A
MOV R1, A
MOV Una Hora
MOV B, #10 p>
División AB
MOV @R1, A
Diciembre R1
MOV A, B
MOV @R1, A
Diciembre R1
MOV A, #10
MOV @R1, A
Diciembre R1
MINIT·MOV
MOV B, #10
División AB
MOV @R1,A
Diciembre R1
MOV A,B
MOV @R1,A
Diciembre R1
MOV A,#10
MOV @R1,A
Diciembre R1
MOV A, 2do
MOV B, #10
División AB
MOV @R1, A p>
Diciembre R1
MOV A, B
MOV @R1, A
Diciembre R1
Remojado en agua para hacer suave
INT_T0:
MOV TH0, #(65536-2000)/256
MOV TL0, número 248
p>
MOV A, #DISPBUF
Agregar uno, mostrar bit
MOV R0, A
MOV A, @R0
MOV·DPTR #Tabla
MOVC A, @A+DPTR
MOV P1, A
MOV A, DISPBIT
MOV DPTR , #tag
MOVC A, @A+DPTR
MOV·P3
Bit de visualización de empresa
MOV A, DISPBIT p>
KNA No. 08H CJNE A
Bit de visualización MOV, #00H
KNA: INC T2SCNTA
MOV A, T2SCNTA
CJNE A, #100, Completo
MOV T2SCNTA, #00H
INC T2SCNTB
MOV A, T2SCNTB
CJNE A, #05H, Completo
MOV T2SCNTB, #00H
INC Segundos
MOV A, Segundo
CJNE A, #60 , siguiente
MOV segundo, #00H
INC MINITE
MINITE·MOV
CJNE A, #60, siguiente
MOV mini especial, #00H
hora INC
MOV una hora
CJNE A, #24, siguiente
Hora MOV, #00H
Siguiente: Mi nombre es DISP
Completo: RETI
Tabla: DB 3FH, 06H, 5BH, 4FH, 66H, 6DH , 7DH, 07H, 7FH, 6FH, 40H
TAB: DB 0FEH, 0FDH, 0FBH, 0F7H, 0EFH, 0DFH, 0BFH, 07FH
Fin