VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

ANSI Basic Like Scripting Language and Telnet server

l0r  (3 Submissions)   Complete Applications   Visual Basic 3.0   Intermediate   Wed 3rd February 2021

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 Declarations
EXAMPLE 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 , , , ,