cái này dễ ẹt
Số ban đầu là A giá trị từ 0 - 255.
Bước 1 : (A : 10) = B dư C
cộng C với 30H để có mã ASCII tương ứng của nó. rồi gửi ra LCD => chữ số hàng đơn vị
Bước 2 : (B : 10) = D dư E
cộng E với 30H để có mã ASCII tương ứng của nó. rồi gửi ra LCD => chữ số hàng chục
Bước 3 : (B : 10) = 0 dư G
cộng G với 30H để có mã ASCII tương ứng của nó. rồi gửi ra LCD => chữ số hàng trăm
Hàm chia như sau (hàm này không làm việc với số âm được nha). Khi dùng phải nạp số bị chia và số chia. Nhớ rằng : (Số bị chia / số chia) = thương và số dư
HAMCHIA:
;------------------ghi chu--------------------------------------------
; HAM CHIA 8 BIT
; HAM CHIA DUNG 2 BIEN VAO SOBICHIA VA SOCHIA
; 2 BIEN RA LA SODU VA THUONG
; TRUOC KHI GOI HAM NAY PHAI NAP :
; SO BI CHIA VAO BIEN SOBICHIA
; SO CHIA VAO BIEN SOCHIA
;-------------------------------------------------------------------------
;KIEMTRALOICHIACHOSO"0"
CLRF WREG;----------------------WREG = 0
CPFSEQ SOCHIA;-----------------NEU SOCHIA LA "0" THI KHONG CHIA MA THOAT LUON
GOTO BEGINHC;------------------THUC HIEN HAM CHIA NEU KHAC "0"
RETURN;-------------------------THOAT NEU SOCHIA LA 0
;-------------------------------------------------------------------------
BEGINHC:
CLRF SODU
CLRF THUONG
MOVFF SOCHIA, WREG;----------- LUU SO CHIA VAO WREG DE SO SANH
CPFSLT SOBICHIA;--------------- SOBICHIA < SOCHIA ?
GOTO CHIA;---------------------- NEU LON HON THI THUC HIEN CHIA
;--------------------------------- NEU NHO HON THI KHONG THUC HIEN CHIA
GANSODU:
MOVFF SOBICHIA, SODU;---------- NEU NHO HON THI SO DU LA SO BI CHIA
;---------------------------------- THUONG SO VAN LA 0
RETURN;-------------------------- THOAT
;--------------------------------------------------------------------------------------
CHIA:
SUBWF SOBICHIA,1;-------------- SOBICHIA = SOBICHIA - SOCHIA ; VI WREG = SOCHIA
INCF THUONG;------------------- TANG THUONG SO LEN
CPFSLT SOBICHIA;---------------- SOBICHIA < SOCHIA ?
GOTO CHIA;----------------------NEU VAN LON HON HAY BANG SOCHIA THI CHIA TIEP
MOVFF SOBICHIA, SODU ;--------- NEU NHO HON GAN SOBICHIA CHO SODU
;---------------------------------THUONG SO DA CO DO TA TANG LEN MOI LAN TRU
RETURN;--------------------------THOAT
thay đổi nội dung bởi: thundernhut, 30-06-2010 lúc 06:22 PM.
|