| ;-------------------------------- cnt_work:
 ldi irq,0
 ldi ie,0100b
 ldi tmod,111b;
 ldi tl0,0fh
 ldi th0,0fh
 ldi irq,0
 ldi ie,1010b
 
 orim bzw,01
 
 ldi tmod,001b
 ldi tl0,00h
 ldi th0,0fh
 
 ldi irq,0
 orim ie,1010b
 
 ldi temp,0
 sta 302h
 
 adim sec_1,01h
 daa sec_1
 ldi temp,0h
 
 adcm sec_2,00h
 daa sec_2
 ;sta a_flag
 
 ldi temp ,0h
 
 adcm min_1,00
 daa min_1
 ;sta b_flag
 
 ldi temp,0h
 
 adcm min_2,0
 daa min_2
 ;sta c_flag
 
 ldi temp,0h
 wat_key:
 
 lda pb
 eor pb_bak
 baz wat_key
 
 andim bzw,0000b
 
 jmp main
 |