m1: MOV EDI, 0      ;wenn nix gedrückt -> 0
    CALL matr
    MOV AL, EDI     ;nur AL kann IN/OUT
    OUT 5CH, AL     ;LED Reihe Ausgabe
    JMP m1

matr:   MOV BL, 8       ;Zeilenregister resetten
z:  MOV AL, BL
    OUT 5AH, AL     ;Zeile der Matrix ausgeben
    IN AL, 5BH      ;Spalte der Matrix abfragen
    MOV EDI, BL
    SHR EDI
    SHL EDI
    SHL EDI
    BT AL, 0        ;1. Spalte testen
    JNC s1
    ADD EDI, 1
    RET
s1: BT AL, 1        ;2. Spalte testen
    JNC s2
    ADD EDI, 2
    RET
s2: BT AL, 2        ;3. Spalte testen
    JNC s3
    ADD EDI, 3
    RET
s3: BT AL, 3        ;4. Spalte testen
    JNC s4
    ADD EDI, 4
    RET
s4: ROR BL
    JNC z           ;wenn Zeile < 0 -> zurück
    RET