import std.algorithm;
import std.array;
import std.conv;
import std.math;
import std.range;
import std.stdio;
import std.string;
import std.typecons;

T read(T)() { return readln.chomp.to!T; }
T[] reads(T)() { return readln.split.to!(T[]); }
alias readint = read!int;
alias readints = reads!int;

void main() {
    string t = read!string;

    int len = 0;
    int s = 0;
    foreach (c; t) {
        switch (c) {
        case 'S':
            s++;
            break;
        case 'T':
            if (s > 0) s--;
            else {
                // ペアになれなかった T はそのまま残る(後ろの文字とペアになることはない)
                len++;
            }
            break;
        default:
            break;
        }
    }
    writeln(len + s);
}

