From 0b0d98f88c7b1b056cf8422b0906ef1db4be1e0b Mon Sep 17 00:00:00 2001 From: Oliver Schmidt Date: Mon, 5 Jun 2017 17:24:26 +0200 Subject: [PATCH] Disable IP65 abort key during active connection. It might be welcome to be able to abort DHCP, DNS and TCP connect operations. However while we're connected to the remote host we need full control over the keyboard. If TCP send operations don't work immediately the user will just have to wait until they do (or the timeout). --- apps/telnet65.s | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/apps/telnet65.s b/apps/telnet65.s index 1e95bc2..4039e1d 100644 --- a/apps/telnet65.s +++ b/apps/telnet65.s @@ -6,6 +6,9 @@ .export start +.import abort_key +.importzp abort_key_default +.importzp abort_key_disable .import drv_init .importzp drv_init_default .import get_filtered_input @@ -183,6 +186,8 @@ telnet_main_entry: sta connection_closed sta data_received sta iac_response_buffer_length + lda #abort_key_disable + sta abort_key ldax #cursor_on jsr print_vt100 @@ -208,7 +213,9 @@ telnet_main_entry: jmp :++ : lda connection_closed beq :++ -: ldax #cursor_off +: lda #abort_key_default + sta abort_key + ldax #cursor_off jsr print_vt100 ldax #disconnected jsr print_ascii_as_native