function TwatchScrollAscii(&$socket, $text, $delay = -1)
{
$ASCII[space][1] = " ";
$ASCII[space][2] = " ";
$ASCII[space][3] = " ";
$ASCII[space][4] = " ";
$ASCII[a][1] = " __ ";
$ASCII[a][2] = " /__\\ ";
$ASCII[a][3] = " /(__)\\ ";
$ASCII[a][4] = "(__)(__)";
$ASCII[b][1] = " ____ ";
$ASCII[b][2] = "( _ \\ ";
$ASCII[b][3] = " ) _ < ";
$ASCII[b][4] = "(____/ ";
$ASCII[c][1] = " ___ ";
$ASCII[c][2] = " / __)";
$ASCII[c][3] = "( (__ ";
$ASCII[c][4] = " \\___)";
$ASCII[d][1] = " ____ ";
$ASCII[d][2] = "( _ \\ ";
$ASCII[d][3] = " )(_) )";
$ASCII[d][4] = "(____/ ";
$ASCII[e][1] = " ____ ";
$ASCII[e][2] = "( ___)";
$ASCII[e][3] = " )__) ";
$ASCII[e][4] = "(____)";
$ASCII[f][1] = " ____ ";
$ASCII[f][2] = "( ___)";
$ASCII[f][3] = " )__) ";
$ASCII[f][4] = "(__) ";
$ASCII[g][1] = " ___ ";
$ASCII[g][2] = " / __)";
$ASCII[g][3] = "( (_-.";
$ASCII[g][4] = " \\___/";
$ASCII[h][1] = " _ _ ";
$ASCII[h][2] = "( )_( )";
$ASCII[h][3] = " ) _ ( ";
$ASCII[h][4] = "(_) (_)";
$ASCII[i][1] = " ____ ";
$ASCII[i][2] = "(_ _)";
$ASCII[i][3] = " _)(_ ";
$ASCII[i][4] = "(____)";
$ASCII[j][1] = " ____ ";
$ASCII[j][2] = " (_ _)";
$ASCII[j][3] = ".-_)( ";
$ASCII[j][4] = "\\____) ";
$ASCII[k][1] = " _ _ ";
$ASCII[k][2] = "( )/ )";
$ASCII[k][3] = " ) ( ";
$ASCII[k][4] = "(_)\\_)";
$ASCII[l][1] = " __ ";
$ASCII[l][2] = "( ) ";
$ASCII[l][3] = " )(__ ";
$ASCII[l][4] = "(____)";
$ASCII[m][1] = " __ __ ";
$ASCII[m][2] = "( \\/ )";
$ASCII[m][3] = " ) ( ";
$ASCII[m][4] = "(_/\\/\\_)";
$ASCII[n][1] = " _ _ ";
$ASCII[n][2] = "( \\( )";
$ASCII[n][3] = " ) ( ";
$ASCII[n][4] = "(_)\\_)";
$ASCII[o][1] = " _____ ";
$ASCII[o][2] = "( _ )";
$ASCII[o][3] = " )(_)( ";
$ASCII[o][4] = "(_____)";
$ASCII[p][1] = " ____ ";
$ASCII[p][2] = "( _ \\";
$ASCII[p][3] = " )___/";
$ASCII[p][4] = "(__) ";
$ASCII[q][1] = " _____ ";
$ASCII[q][2] = "( _ )";
$ASCII[q][3] = " )(_)( ";
$ASCII[q][4] = "(___/\\\\";
$ASCII[r][1] = " ____ ";
$ASCII[r][2] = "( _ \\";
$ASCII[r][3] = " ) /";
$ASCII[r][4] = "(_)\\_)";
$ASCII[s][1] = " ___ ";
$ASCII[s][2] = "/ __)";
$ASCII[s][3] = "\\__ \\";
$ASCII[s][4] = "(___/";
$ASCII[t][1] = " ____ ";
$ASCII[t][2] = "(_ _)";
$ASCII[t][3] = " )( ";
$ASCII[t][4] = " (__) ";
$ASCII[u][1] = " __ __ ";
$ASCII[u][2] = "( )( )";
$ASCII[u][3] = " )(__)( ";
$ASCII[u][4] = "(______)";
$ASCII[v][1] = " _ _ ";
$ASCII[v][2] = "( \\/ )";
$ASCII[v][3] = " \\ / ";
$ASCII[v][4] = " \\/ ";
$ASCII[w][1] = " _ _ ";
$ASCII[w][2] = "( \\/\\/ )";
$ASCII[w][3] = " ) ( ";
$ASCII[w][4] = "(__/\\__)";
$ASCII[x][1] = " _ _ ";
$ASCII[x][2] = "( \\/ )";
$ASCII[x][3] = " ) ( ";
$ASCII[x][4] = "(_/\\_)";
$ASCII[y][1] = " _ _ ";
$ASCII[y][2] = "( \\/ )";
$ASCII[y][3] = " \\ / ";
$ASCII[y][4] = " (__) ";
$ASCII[z][1] = " ____ ";
$ASCII[z][2] = "(_ )";
$ASCII[z][3] = " / /_ ";
$ASCII[z][4] = "(____)";
$ASCII[dash][1] = " ___ ";
$ASCII[dash][2] = "(___)";
$ASCII[dash][3] = " ";
$ASCII[dash][4] = " ";
$ASCII[underscore][1] = " ";
$ASCII[underscore][2] = " ";
$ASCII[underscore][3] = " _____ ";
$ASCII[underscore][4] = "(_____)";
$ASCII[comma][1] = " ";
$ASCII[comma][2] = " ";
$ASCII[comma][3] = "()";
$ASCII[comma][4] = "/ ";
$ASCII[dot][1] = " ";
$ASCII[dot][2] = " ";
$ASCII[dot][3] = " ";
$ASCII[dot][4] = "()";
$ASCII[plus][1] = " _ ";
$ASCII[plus][2] = " _| |_ ";
$ASCII[plus][3] = "(_ _)";
$ASCII[plus][4] = " |_| ";
$ASCII[emark][1] = "/\\";
$ASCII[emark][2] = ")(";
$ASCII[emark][3] = "\\/";
$ASCII[emark][4] = "()";
$ASCII[qmark][1] = " ___ ";
$ASCII[qmark][2] = "(__ )";
$ASCII[qmark][3] = " (_/ ";
$ASCII[qmark][4] = " (_) ";
$ASCII[at][1] = " __ ";
$ASCII[at][2] = " / \\";
$ASCII[at][3] = "| ()/";
$ASCII[at][4] = " \\__ ";
$ASCII[hash][1] = " | | ";
$ASCII[hash][2] = "-|-|-";
$ASCII[hash][3] = "-|-|-";
$ASCII[hash][4] = " | | ";
$ASCII[0][1] = " ___ ";
$ASCII[0][2] = " / _ \\ ";
$ASCII[0][3] = "( (_) )";
$ASCII[0][4] = " \\___/ ";
$ASCII[1][1] = " __ ";
$ASCII[1][2] = "/ )";
$ASCII[1][3] = " )( ";
$ASCII[1][4] = "(__)";
$ASCII[2][1] = " ___ ";
$ASCII[2][2] = "(__ \\ ";
$ASCII[2][3] = " / _/ ";
$ASCII[2][4] = "(____)";
$ASCII[3][1] = " ___ ";
$ASCII[3][2] = "(__ )";
$ASCII[3][3] = " (_ \\";
$ASCII[3][4] = "(___/";
$ASCII[4][1] = " __ ";
$ASCII[4][2] = " /. | ";
$ASCII[4][3] = "(_ _)";
$ASCII[4][4] = " (_) ";
$ASCII[5][1] = " ___ ";
$ASCII[5][2] = "| __)";
$ASCII[5][3] = "|__ \\";
$ASCII[5][4] = "(___/";
$ASCII[6][1] = " _ ";
$ASCII[6][2] = " / ) ";
$ASCII[6][3] = "/ _ \\";
$ASCII[6][4] = "\\___/";
$ASCII[7][1] = " ___ ";
$ASCII[7][2] = "(__ )";
$ASCII[7][3] = " / / ";
$ASCII[7][4] = "(_/ ";
$ASCII[8][1] = " ___ ";
$ASCII[8][2] = "( _ )";
$ASCII[8][3] = "/ _ \\";
$ASCII[8][4] = "\\___/";
$ASCII[9][1] = " ___ ";
$ASCII[9][2] = "/ _ \\";
$ASCII[9][3] = "\\_ /";
$ASCII[9][4] = " (_/ ";
$text = str_split(strtolower($text));
foreach ($text as $char) {
if ($char == '-') {
$char = 'dash';
} elseif ($char == '+') {
$char = 'plus';
} elseif ($char == '.') {
$char = 'dot';
} elseif ($char == ',') {
$char = 'comma';
} elseif ($char == '@') {
$char = 'at';
} elseif ($char == '#') {
$char = 'hash';
} elseif ($char == '!') {
$char = 'emark';
} elseif ($char == '?') {
$char = 'qmark';
} elseif ($char == '_') {
$char = 'underscore';
} elseif ($char == ' ') {
$char = 'space';
}
if (isset($ASCII[$char])) {
$add = $ASCII[$char];
} else {
$add = $ASCII[space];
}
$rows[1] .= $add[1];
$rows[2] .= $add[2];
$rows[3] .= $add[3];
$rows[4] .= $add[4];
}
return TwatchScrollRows($socket, $rows, $delay);
}
sleep(4); TwatchPrintRows($socket, $printrows1); sleep(4); TwatchPrintRows($socket, $printrows2, 1, 'center'); TwatchClearSCreen($socket); sleep(4); TwatchPrintRows($socket, $align, 1); TwatchClearSCreen($socket); sleep(4); TwatchScrollPage($socket, $scrollpage, 2); TwatchClearSCreen($socket); sleep(4); TwatchPagePage($socket, $pagepage, 5); TwatchClearSCreen($socket); sleep(4); TwatchScrollRows($socket, $scrollrows); TwatchClearSCreen($socket); TwatchPrint($socket, $showtime); sleep(4); TwatchShowTime($socket); TwatchClearSCreen($socket); TwatchPrint($socket, $scrollascii); sleep(4); TwatchScrollAscii($socket, 'hi'); sleep(4); TwatchScrollAscii($socket, 'scroll'); TwatchClearSCreen($socket); sleep(4); TwatchPrintRows($socket, $feedback, 1, 'center'); sleep(10); TwatchBacklightOff($socket);
