by l0r (3 Submissions)
Category: Complete Applications
Compatability: Visual Basic 3.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: 
(2 Votes)
This code will allow you to run a script like text file with simple commands for full control over a telnet client. This code makes ANSI easy. This code was made in less than 24 hours so it may need further work, if you culd add to it please tell me. I plan on developing it further. Simply run it, then connect to localhost port 23 in an ANSI able telnet client. an example program is included. Please before flaming me on this code you might want to understand and appriciate it.
API DeclarationsEXAMPLE PROGRAM: (in my language)
CLS
Color 2, 5, 2
Box 2, 2, 70, 14, 4
Wait 1000
Box 4, 4, 71, 15, 3
Wait 1000
Box 6, 6, 72, 16, 2
Wait 1000
color 6, 4, 3
Box 8, 8, 73, 17, 1
Wait 1000
Move 12, 10
Print "I don't like them... Let's erase."
CLS
Move 2, 2
Print "The current time is: $TIME"
Move 3, 2
Print "The current date is: $DATE"
Wait 2000
Box 10, 30, 18, 3, 2
Move 11, 31
Print "IP: $IP"
Wait 3000
CLS
Move 2, 2
Print "Cool huh?"
Move 5, 30
Print "This session will terminate in: 5"
Move 5, 62
Wait 1000
Print "4"
Move 5, 62
Wait 1000
Print "3"
Move 5, 62
Wait 1000
Print "2"
Move 5, 62
Wait 1000
Print "1"
TERMINATE
End
LANGUAGE EXPLANATION:
Notes:
Color Function: Change the screens color modes. (only some terminals support this)
Color
Extended Attributes Code:
0 Reset all attributes
1 Bright
2 Dim
3 NONE
4 Underscore
5 Blink
6 NONE
7 Reverse
8 Hidden
Background & Foreground Colors
0 Black
1 Red
2 Green
3 Yellow
4 Blue
5 Magenta
6 Cyan
7 White
Box Function: Easy way to create an ansi box.
Box
VBcoders