penguin86/pato-z80-home-computer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Working carriage return

Browse Source
This commit is contained in:
Daniele Verducci su MatissePenguin 2021-02-22 20:01:19 +01:00
parent 2b3f9946d9
commit 0697bc3753
2 changed files with 14 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
pat80-io-devices/composite-pal-adapter/software/avr-assembly/character_generator.asm
View File

@ -74,18 +74,19 @@ cursor_pos_home:
; Draws a newline ; Draws a newline
; Moves cursor to start of following screen line ; Moves cursor to start of following screen line
; Takes care of particular cases, i.e. end of screen (shifts all screen up by one line) ; Takes care of particular cases, i.e. end of screen (shifts all screen up by one line)
; draw_carriage_return: draw_carriage_return:
; ; Move cursor to line start ; Move cursor to line start
; ldi POS_COLUMN, 0 ldi POS_COLUMN, 0
; ; Move cursor to next line ; Move cursor to next line
; ldi HIGH_ACCUM, FONT_HEIGHT ldi HIGH_ACCUM, FONT_HEIGHT
; add POS_ROWP, HIGH_ACCUM add POS_ROWP, HIGH_ACCUM
; ; Check if end of screen ; Check if end of screen
; cpi POS_ROWP, SCREEN_HEIGHT cpi POS_ROWP, SCREEN_HEIGHT
; brsh draw_carriage_return_eos brsh draw_carriage_return_eos
; ret ret
; draw_carriage_return_eos: draw_carriage_return_eos:
; call scroll_screen call scroll_screen
ret
; Scrolls the screen by one line (=LINE_COLUMNS*FONT_HEIGHT bytes) ; Scrolls the screen by one line (=LINE_COLUMNS*FONT_HEIGHT bytes)
; and clears the last line (FRAMEBUFFER_END - LINE_COLUMNS*FONT_HEIGHT bytes) ; and clears the last line (FRAMEBUFFER_END - LINE_COLUMNS*FONT_HEIGHT bytes)

1
pat80-io-devices/composite-pal-adapter/software/avr-assembly/main.asm
View File

@ -144,6 +144,7 @@ main:
inc r18 inc r18
cpi r18, 0x5B cpi r18, 0x5B
brne draw_chars brne draw_chars
call draw_carriage_return
jmp dctest jmp dctest