Testat 2 bestanden
This commit is contained in:
parent
d22365bf42
commit
b87fa8a100
|
@ -25,32 +25,50 @@ SEGM equ 90h
|
||||||
|
|
||||||
; 0 1 2 3 4 5 6 7 8 9 A B C D E F
|
; 0 1 2 3 4 5 6 7 8 9 A B C D E F
|
||||||
segtext db 0x3F, 0x6, 0x5B, 0x4F, 0x66, 0x6D, 0x7D, 0x7, 0x7F, 0x6F, 0x77, 0xFF, 0x39, 0xBF, 0x79, 0x71
|
segtext db 0x3F, 0x6, 0x5B, 0x4F, 0x66, 0x6D, 0x7D, 0x7, 0x7F, 0x6F, 0x77, 0xFF, 0x39, 0xBF, 0x79, 0x71
|
||||||
res db 0x0
|
|
||||||
|
|
||||||
|
|
||||||
jmp WDH
|
jmp WDH
|
||||||
|
|
||||||
WDH: in ax, INPUT
|
WDH: in ax, INPUT
|
||||||
mov res, [ax]
|
|
||||||
|
mov bx, ax
|
||||||
and ax, 00001111b;get second nibble
|
and ax, 00001111b;get second nibble
|
||||||
out LED, ax;debug, output to leds
|
;out LED, ax;debug, output to leds
|
||||||
push ax;write result to stack
|
push ax;write result to stack
|
||||||
|
|
||||||
|
|
||||||
mov ax, [res]
|
mov ax, bx
|
||||||
mov cl, 0x4
|
mov cl, 0x4
|
||||||
sar ax, cl;shift right 4 times
|
shr ax, cl;shift right 4 times
|
||||||
;and ax, 00001111b;
|
|
||||||
out LED, ax;debug, output to leds
|
|
||||||
push ax;write result to stack
|
|
||||||
|
|
||||||
|
;out LED, ax;debug, output to leds
|
||||||
pop ax;get from stack
|
|
||||||
pop bx;get from stack
|
pop bx;get from stack
|
||||||
|
|
||||||
sub ax, bx
|
sub ax, bx
|
||||||
|
|
||||||
out LED, ax;output to led
|
out LED, ax;output to led
|
||||||
|
|
||||||
|
;right seven segment display
|
||||||
|
push ax
|
||||||
|
mov bx, segtext
|
||||||
|
and ax, 0000000000001111b
|
||||||
|
add bx, ax
|
||||||
|
|
||||||
|
mov al, [bx]
|
||||||
|
|
||||||
out SEGM, al;output to seven segment display
|
out SEGM, al;output to seven segment display
|
||||||
|
|
||||||
|
;left seven segment display
|
||||||
|
pop ax;get from stack
|
||||||
|
mov cl, 0x4
|
||||||
|
shr ax, cl
|
||||||
|
mov bx, segtext
|
||||||
|
add bx, ax
|
||||||
|
|
||||||
|
mov al, [bx]
|
||||||
|
out SEGM + 0x2, al
|
||||||
|
|
||||||
|
|
||||||
jmp WDH
|
jmp WDH
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue