Troszkę nad tym siedziałem i mam nadzieję że się to komuś przyda.
Jest to program dzielący dwie liczby z dokładnością do dwóch liczb po przecinku, z wygaszanym kursorem po wykonaniu działania.
Kod:
Kod: Zaznacz cały
LJMP START
ORG 100H
START:
LCALL LCD_CLR
LCALL WAIT_KEY
MOV R0,A
LCALL WRITE_HEX
MOV A,#':'
LCALL WRITE_DATA
LCALL WAIT_KEY
MOV R1,A
LCALL WRITE_HEX
MOV A,#'='
LCALL WRITE_DATA
MOV A,R0
MOV B,R1
DIV AB
LCALL WRITE_HEX
MOV A,#','
LCALL WRITE_DATA
MOV A,B
MOV B,R1
DIV AB
MOV A,#10
MUL AB
MOV B,R1
DIV AB
ADD A,#48
LCALL WRITE_DATA
MOV A,B
MOV B,#10
MUL AB
MOV B,R1
DIV AB
ADD A,#48
LCALL WRITE_DATA
MOV A,#12
LCALL WRITE_INSTR
LJMP $Efekt działania w symulatorze Jagoda:
http://img265.imageshack.us/img265/2844/kalkuv2.jpg
