;Experiment 3 Chris Annis .EQU TIMER, 00H .EQU COUNT, 30H MOV COUNT, #00H ;CLEAR COUNT VALUE MOV TMOD, #01H ;TIMER0 MODE1 DIG1: MOV A, COUNT ADD A, #01H DA A ;DECIMAL ADJUST MOV COUNT, A MOV P1, A SETB P3.0 ;----STOP----- ;This will stop the HOLD1: SETB P2.0 ;counting when port 2.0 JNB P2.0, HOLD1 ;is attached to 5 volts MOV P1, A ;------------- ;----1 SECOND DELAY---- MOV TIMER, #05H DA1: MOV TL0, #00H ;.22 SEC MOV TH0, #00H SETB TR0 ;START DB1: JNB TF0, DB1 CLR TF0 CLR TR0 DJNZ TIMER, DA1 ;5 TIMES ;---------------------- CLR P3.0 MOV A, COUNT ADD A, #01H DA A ;DECIMAL ADJUST MOV COUNT, A MOV P1, A SETB P3.1 ;----STOP----- ;This will stop the HOLD1: SETB P2.0 ;counting when port 2.0 JNB P2.0, HOLD1 ;is attached to 5 volts MOV P1, A ;------------- ;----1 SECOND DELAY---- MOV TIMER, #05H DC1: MOV TL0, #00H ;.22 SEC MOV TH0, #00H SETB TR0 ;START DD1: JNB TF0, DD1 CLR TF0 CLR TR0 DJNZ TIMER, DC1 ;5 TIMES ;---------------------- CLR P3.1 ;----STOP----- ;This will stop the HOLD1: SETB P2.0 ;counting when port 2.0 JNB P2.0, HOLD1 ;is attached to 5 volts MOV P1, A ;------------- SJMP DIG1 .END