Advertisement
Guest User

Untitled

a guest
Nov 26th, 2014
132
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.15 KB | None | 0 0
  1. ; #LCD
  2. LCD_CONTROL EQU FFF4h
  3. LCD_WRITE EQU FFF5h
  4. LCD_INI1 EQU 8000h
  5. LCD_INI21 EQU 8010h
  6. LCD_INI22 EQU 8019h
  7. FIM_LINHA EQU '@'
  8.  
  9. ORIG 8000h
  10. LCDL1 STR 'TEMPO MAX:',FIM_LINHA
  11. LCDJ1 STR 'J1:',FIM_LINHA
  12. LCDJ2 STR 'J2:',FIM_LINHA
  13.  
  14. ORIG 0000h
  15. JMP Inicio
  16.  
  17. EscreveLCD1: PUSH R1
  18. PUSH R2
  19. PUSH R3
  20. MOV R1, LCD_INI1
  21. MOV R2, LCDL1
  22. CicloLCD1: MOV R3, M[R2]
  23. CMP R3, FIM_LINHA
  24. BR.Z FimL1
  25. MOV M[LCD_CONTROL], R1
  26. MOV M[LCD_WRITE], R3
  27. INC R2
  28. INC R1
  29. BR CicloLCD1
  30. FimL1: POP R3
  31. POP R2
  32. POP R1
  33. RET
  34.  
  35. EscreveLCD2: PUSH R1
  36. PUSH R2
  37. PUSH R3
  38. EscreveLCD21: MOV R1, LCD_INI21
  39. MOV R2, LCDJ1
  40. CicloLCD21: MOV R3, M[R2]
  41. CMP R3, FIM_LINHA
  42. BR.Z EscreveLCD22
  43. MOV M[LCD_CONTROL], R1
  44. MOV M[LCD_WRITE], R3
  45. INC R2
  46. INC R1
  47. BR CicloLCD21
  48. EscreveLCD22: MOV R1, LCD_INI22
  49. MOV R2, LCDJ2
  50. CicloLCD22: MOV R3, M[R2]
  51. CMP R3, FIM_LINHA
  52. BR.Z FimL2
  53. MOV M[LCD_CONTROL], R1
  54. MOV M[LCD_WRITE], R3
  55. INC R2
  56. INC R1
  57. BR CicloLCD22
  58. FimL2: POP R3
  59. POP R2
  60. POP R1
  61. RET
  62.  
  63. Inicio: CALL EscreveLCD1
  64. CALL EscreveLCD2
  65. BR FIM
  66.  
  67. FIM: BR FIM
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement