Các bạn cho Mình hỏi :
Trước đây Mình có lập trình chương trình đồng hồ như nội dung dưới đây, nhưng nay do cài đặt lại máy tính Mình đã bị mất phần mềm để chỉnh sửa, cập nhật và biên dịch ra file .hex. Vì Mình là dân ngoại đạo nên giờ Mình không biết phần mềm này tên gì, ở đâu. Vậy Bạn nào biết chỉ giúp cho Minh để Mình download với. Xin cảm ơn nhiều.
;********** CHUONG TRINH DONG HO SO 05/11/2013 ***
INCLUDE 89C51.mc
MAIN:
MOV R1,#0H ;CHUA GIA TRI PHUT
MOV R2,#0H ;CHUA GIA TRI GIO
MOV R3,#60 ;CHUA GIA TRI GIAY
GONHIP:
MOV R0,#148
CALL Nhacchuong
SANGNUAGIAY:
CLR P1.7
CALL HIENTHISO
DJNZ R0,SANGNUAGIAY
JNB P1.0,CHINHPHUT ;Cai dat phut
JNB P1.1,CHINHGIO ;Cai dat gio
MOV R0,#143
TATNUAGIAY:
SETB P1.7
CALL HIENTHISO
DJNZ R0,TATNUAGIAY
DJNZ R3,GONHIP
MOV R3,#60
CHINHPHUT:
INC R1
MOV A,R1
CJNE A,#60,GONHIP
MOV R1,#0
CHINHGIO:
INC R2
MOV A,R2
CJNE A,#24,GONHIP
JMP MAIN
;************************************************* *
Nhacchuong:
MOV A,R1
CJNE A,#1,TATCHUONG
MOV A,R2
CJNE A,#0,TATCHUONG
SETB P3.0
CLR P3.0
RET
TATCHUONG:
SETB P3.0
RET
HIENTHISO:
MOV A,R1
CALL HANGDONVI
MOV P1,#11011111B
CALL HANGCHUC
MOV P1,#10111111B ;HIEN THI SO GIO
MOV A,R2
CALL HANGDONVI
MOV P1,#11110111B
CALL HANGCHUC
MOV P1,#11101111B ;HIEN THI SO PHUT
CALL TAODOTRE
RET
HANGDONVI:
CALL TAODOTRE
MOV B,#10
DIV AB
MOV DPTR,#TBL
MOVC A,@A+DPTR
MOV P2,A
RET
HANGCHUC:
CALL TAODOTRE
MOV A,B
MOVC A,@A+DPTR
MOV P2,A
RET
TBL:
DB C0H,F9H,A4H,B0H,99H,92H,82H,F8H,80H,90H
TAODOTRE:
MOV R6,#6
VONGLAP:
MOV R5,#50
DJNZ R5,$
DJNZ R6,VONGLAP
RET
END
Trước đây Mình có lập trình chương trình đồng hồ như nội dung dưới đây, nhưng nay do cài đặt lại máy tính Mình đã bị mất phần mềm để chỉnh sửa, cập nhật và biên dịch ra file .hex. Vì Mình là dân ngoại đạo nên giờ Mình không biết phần mềm này tên gì, ở đâu. Vậy Bạn nào biết chỉ giúp cho Minh để Mình download với. Xin cảm ơn nhiều.
;********** CHUONG TRINH DONG HO SO 05/11/2013 ***
INCLUDE 89C51.mc
MAIN:
MOV R1,#0H ;CHUA GIA TRI PHUT
MOV R2,#0H ;CHUA GIA TRI GIO
MOV R3,#60 ;CHUA GIA TRI GIAY
GONHIP:
MOV R0,#148
CALL Nhacchuong
SANGNUAGIAY:
CLR P1.7
CALL HIENTHISO
DJNZ R0,SANGNUAGIAY
JNB P1.0,CHINHPHUT ;Cai dat phut
JNB P1.1,CHINHGIO ;Cai dat gio
MOV R0,#143
TATNUAGIAY:
SETB P1.7
CALL HIENTHISO
DJNZ R0,TATNUAGIAY
DJNZ R3,GONHIP
MOV R3,#60
CHINHPHUT:
INC R1
MOV A,R1
CJNE A,#60,GONHIP
MOV R1,#0
CHINHGIO:
INC R2
MOV A,R2
CJNE A,#24,GONHIP
JMP MAIN
;************************************************* *
Nhacchuong:
MOV A,R1
CJNE A,#1,TATCHUONG
MOV A,R2
CJNE A,#0,TATCHUONG
SETB P3.0
CLR P3.0
RET
TATCHUONG:
SETB P3.0
RET
HIENTHISO:
MOV A,R1
CALL HANGDONVI
MOV P1,#11011111B
CALL HANGCHUC
MOV P1,#10111111B ;HIEN THI SO GIO
MOV A,R2
CALL HANGDONVI
MOV P1,#11110111B
CALL HANGCHUC
MOV P1,#11101111B ;HIEN THI SO PHUT
CALL TAODOTRE
RET
HANGDONVI:
CALL TAODOTRE
MOV B,#10
DIV AB
MOV DPTR,#TBL
MOVC A,@A+DPTR
MOV P2,A
RET
HANGCHUC:
CALL TAODOTRE
MOV A,B
MOVC A,@A+DPTR
MOV P2,A
RET
TBL:
DB C0H,F9H,A4H,B0H,99H,92H,82H,F8H,80H,90H
TAODOTRE:
MOV R6,#6
VONGLAP:
MOV R5,#50
DJNZ R5,$
DJNZ R6,VONGLAP
RET
END