daily pastebin goal
89%
SHARE
TWEET

Untitled

a guest Sep 21st, 2017 50 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. m1: MOV EDI, 0      ;wenn nix gedrückt -> 0
  2.     CALL matr
  3.     MOV AL, EDI     ;nur AL kann IN/OUT
  4.     OUT 5CH, AL     ;LED Reihe Ausgabe
  5.     JMP m1
  6.  
  7. matr:   MOV BL, 8       ;Zeilenregister resetten
  8. z:  MOV AL, BL
  9.     OUT 5AH, AL     ;Zeile der Matrix ausgeben
  10.     IN AL, 5BH      ;Spalte der Matrix abfragen
  11.     MOV EDI, BL
  12.     SHR EDI
  13.     SHL EDI
  14.     SHL EDI
  15.     BT AL, 0        ;1. Spalte testen
  16.     JNC s1
  17.     ADD EDI, 1
  18.     RET
  19. s1: BT AL, 1        ;2. Spalte testen
  20.     JNC s2
  21.     ADD EDI, 2
  22.     RET
  23. s2: BT AL, 2        ;3. Spalte testen
  24.     JNC s3
  25.     ADD EDI, 3
  26.     RET
  27. s3: BT AL, 3        ;4. Spalte testen
  28.     JNC s4
  29.     ADD EDI, 4
  30.     RET
  31. s4: ROR BL
  32.     JNC z           ;wenn Zeile < 0 -> zurück
  33.     RET
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top