Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2025-02-14 15:31:33 +00:00
Code Issues Projects Releases Wiki Activity

Workaround to fix cursor at login prompt.

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2024-08-11 19:26:35 -04:00
parent d3462b69c2
commit 780a9c751e
2 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
apps/telnet65.s
View File

@ -526,7 +526,7 @@ welcome_2: .byte 14,"x",15," - IP65 (github.com/cc65/ip65) "
.byte 15,13,10
.byte 27,")A"
.byte 27,"[?25l",0
on_connect: .byte 27,"[?25h",0
on_connect: .byte 27,"[?25h",13,10,13,10,13,10,13,10,13,10,0 ; Force a scroll
on_disconnect: .byte 27,"[?25l",27,"[0m",27,"(A",15,0
; initial_telnet_options:

15
drivers/a2vt100.s
View File

@ -2196,13 +2196,22 @@ ExitChar
InitScr
.ifdef videx
lda #$00
sta CV
sta CH
sta BASEL
sta BASEH
sta START
ldx #12 ; Register 12 - MSbyte of start address
stx SL3DEV0
sta SL3DEV1
ldx #13 ; Register 13 - LSbyte of start address
stx SL3DEV0
sta SL3DEV1
sta $cfff ; Turn off any other $c800 shared ROM
sta $c300 ; Select slot 3 ROM to $c800 space
lda #$8c
jsr $c300 ; Initialize Videoterm and clear screen
lda #$00
sta CV
sta CH
.else
; --- turn on 80 col ---
jsr $c300