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
    MOV CL, 0
s:  BT AL, CL
    JNC next
    MOV CH, CL
    INC CH
    ADD EDI, CH
    RET
next:   INC CL
    CMP CL, 4
    JNZ s
    ROR BL
    JNC z           ;wenn Zeile < 0 -> zurück
    RET