Testat 2 bestanden

This commit is contained in:
Johannes Theiner 2018-11-01 11:17:40 +01:00
parent d22365bf42
commit b87fa8a100
8 changed files with 28 additions and 10 deletions

View File

@ -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