forked from KolibriOS/kolibrios
TELNET: send 2-byte keycodes to server too, added some public server addresses.
git-svn-id: svn://kolibrios.org@3968 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
a60f033fd1
commit
1f2854e909
@ -257,8 +257,14 @@ thread:
|
|||||||
mcall 40, 0
|
mcall 40, 0
|
||||||
.loop:
|
.loop:
|
||||||
call [con_getch2]
|
call [con_getch2]
|
||||||
mov byte [send_data], al
|
mov [send_data], ax
|
||||||
mcall send, [socketnum], send_data, 1
|
xor esi, esi
|
||||||
|
inc esi
|
||||||
|
test al, al
|
||||||
|
jnz @f
|
||||||
|
inc esi
|
||||||
|
@@:
|
||||||
|
mcall send, [socketnum], send_data
|
||||||
|
|
||||||
call [con_get_flags]
|
call [con_get_flags]
|
||||||
test eax, 0x200 ; con window closed?
|
test eax, 0x200 ; con window closed?
|
||||||
@ -268,7 +274,11 @@ thread:
|
|||||||
; data
|
; data
|
||||||
title db 'Telnet',0
|
title db 'Telnet',0
|
||||||
str1 db 'Telnet for KolibriOS',10,10,\
|
str1 db 'Telnet for KolibriOS',10,10,\
|
||||||
'Please enter URL of telnet server (for example: towel.blinkenlights.nl:23)',10,10,0
|
'Please enter URL of telnet server (host:port)',10,10,\
|
||||||
|
'fun stuff:',10,\
|
||||||
|
'telehack.com - arpanet simulator',10,\
|
||||||
|
'towel.blinkenlights.nl - ASCII Star Wars',10,\
|
||||||
|
'miku.acm.uiuc.edu - Nyan cat',10,10,0
|
||||||
str2 db '> ',0
|
str2 db '> ',0
|
||||||
str3 db 'Connecting to ',0
|
str3 db 'Connecting to ',0
|
||||||
str4 db 10,0
|
str4 db 10,0
|
||||||
@ -316,7 +326,7 @@ i_end:
|
|||||||
|
|
||||||
socketnum dd ?
|
socketnum dd ?
|
||||||
buffer_ptr rb BUFFERSIZE+1
|
buffer_ptr rb BUFFERSIZE+1
|
||||||
send_data rb 1
|
send_data dw ?
|
||||||
|
|
||||||
hostname rb 1024
|
hostname rb 1024
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user