Advertisement
Guest User

Untitled

a guest
Dec 11th, 2018
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.42 KB | None | 0 0
  1. ;RUTINA PROGRAMARE SERIAL 8251
  2.  
  3. MOV AL,0CEH
  4. MOV DX,0DD2H
  5. OUT DX,AL
  6. MOV AL,15H
  7. OUT DX,AL
  8. RET
  9.  
  10. ;RUTINA PROGRAMARE PARALEL 8255
  11.  
  12. MOV AL,81H
  13. MOV DX,0D56H
  14. OUT DX,AL
  15. RET
  16.  
  17. ;RUTINA TRIMITERE CARACTER SERIAL 8251
  18.  
  19. SERIALT:
  20. IN AL,DX
  21. RCR AL,1
  22. JNC SERIALT
  23. MOV AL,CL
  24. MOV DX,0DD0H
  25. OUT DX,AL
  26. RET
  27.  
  28. ;RUTINA PRIMIRE CARACTER SERIAL 8251
  29.  
  30. SERIALP:
  31. IN AL,DX
  32. RCR AL,2
  33. JNC SERIALP
  34. MOV DX,0DD0H
  35. IN AL,DX
  36. MOV CL,AL
  37. RET
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement