Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; #LCD
- LCD_CONTROL EQU FFF4h
- LCD_WRITE EQU FFF5h
- LCD_INI1 EQU 8000h
- LCD_INI21 EQU 8010h
- LCD_INI22 EQU 8019h
- FIM_LINHA EQU '@'
- ORIG 8000h
- LCDL1 STR 'TEMPO MAX:',FIM_LINHA
- LCDJ1 STR 'J1:',FIM_LINHA
- LCDJ2 STR 'J2:',FIM_LINHA
- ORIG 0000h
- JMP Inicio
- EscreveLCD1: PUSH R1
- PUSH R2
- PUSH R3
- MOV R1, LCD_INI1
- MOV R2, LCDL1
- CicloLCD1: MOV R3, M[R2]
- CMP R3, FIM_LINHA
- BR.Z FimL1
- MOV M[LCD_CONTROL], R1
- MOV M[LCD_WRITE], R3
- INC R2
- INC R1
- BR CicloLCD1
- FimL1: POP R3
- POP R2
- POP R1
- RET
- EscreveLCD2: PUSH R1
- PUSH R2
- PUSH R3
- EscreveLCD21: MOV R1, LCD_INI21
- MOV R2, LCDJ1
- CicloLCD21: MOV R3, M[R2]
- CMP R3, FIM_LINHA
- BR.Z EscreveLCD22
- MOV M[LCD_CONTROL], R1
- MOV M[LCD_WRITE], R3
- INC R2
- INC R1
- BR CicloLCD21
- EscreveLCD22: MOV R1, LCD_INI22
- MOV R2, LCDJ2
- CicloLCD22: MOV R3, M[R2]
- CMP R3, FIM_LINHA
- BR.Z FimL2
- MOV M[LCD_CONTROL], R1
- MOV M[LCD_WRITE], R3
- INC R2
- INC R1
- BR CicloLCD22
- FimL2: POP R3
- POP R2
- POP R1
- RET
- Inicio: CALL EscreveLCD1
- CALL EscreveLCD2
- BR FIM
- FIM: BR FIM
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement