mirror of https://github.com/A2osX/A2osX.git
81 lines
1.9 KiB
Plaintext
81 lines
1.9 KiB
Plaintext
NEW
|
||
PREFIX
|
||
AUTO 4,1
|
||
#!/bin/sh
|
||
# This script tests various cursor related commands
|
||
# Clear Screen Function
|
||
FUNCTION CS {
|
||
ECHO \f
|
||
}
|
||
# Title Box Function
|
||
# CALL TBOX Str_Title
|
||
FUNCTION TBOX {
|
||
ECHO -N "\e[1;20H"
|
||
ECHO "\e[7m \e[0m"
|
||
SET LINE = 2
|
||
WHILE [ $LINE -NE 5 ]
|
||
ECHO -N "\e[${LINE};20H"
|
||
ECHO "\e[7m \e[0m \e[7m \e[0m"
|
||
SET LINE = $LINE + 1
|
||
LOOP
|
||
ECHO -N "\e[5;20H"
|
||
ECHO "\e[7m \e[0m"
|
||
ECHO -N "\e[3;22H $1"
|
||
}
|
||
# Print Inverse
|
||
FUNCTION INVERSE {
|
||
ECHO -N "\e[7m$1\e[0m"
|
||
}
|
||
# Print at Screen Location Function
|
||
# CALL PRINTXY Num_Row Num_Column Str_String
|
||
FUNCTION PRINTXY {
|
||
ECHO -N "\e[$1;$2H$3"
|
||
}
|
||
# Print Inverse At X Y
|
||
# CALL INVERSEXY Row Col String
|
||
FUNCTION INVERSEXY {
|
||
ECHO -N "\e[$1;$2H\e[7m$3\e[0m"
|
||
}
|
||
# STATUSLINE Function
|
||
# CALL STATUSLINE Str_Message
|
||
FUNCTION STATUSLINE {
|
||
ECHO -N "\e[24;0H\e[7m "
|
||
ECHO -N " \e[0m"
|
||
ECHO -N "\e[24;2H\e[7m$1\e[0m"
|
||
ECHO -N "\e[24;68H\e[7m"
|
||
TIME | CUT -M 10 -N 20
|
||
# SET DTIME = `TIME | CUT -M 10 -N 20`: ECHO -N ${DTIME}
|
||
ECHO -N "\e[0m"
|
||
}
|
||
# YesNoKeyPress Function
|
||
# CALL YNKP Returns 1(Y) or 0 (N)
|
||
FUNCTION YNKP {
|
||
ECHO Not yet implemented
|
||
}
|
||
# Get String At X Y Function
|
||
# CALL GETXY Num_Row Num_Column Num_Length
|
||
FUNCTION GETXY {
|
||
ECHO Not yet implemented
|
||
}
|
||
# Save Cursor Position
|
||
FUNCTION SAVECURSOR
|
||
{
|
||
ECHO -N "\e7"
|
||
}
|
||
# Restore Cursor Position
|
||
FUNCTION RESTORECURSOR
|
||
{
|
||
ECHO -N "\e8"
|
||
}
|
||
CALL CS
|
||
CALL TBOX " Cursor Tests"
|
||
CALL PRINTXY 10 10 "Before Save:"
|
||
CALL SAVECURSOR
|
||
CALL PRINTXY 15 20 "Randowm line at 15 20"
|
||
CALL RESTORECURSOR
|
||
ECHO "After Save"
|
||
CALL PRINTXY 20 1 "Exiting"
|
||
ECHO
|
||
MAN
|
||
TEXT /MAKE/USR/SHARE/TESTS/CURSORTEST
|