s = gets.chomp
cnt = 0
ac = 0
i = 0
while i < s.length-1
  bcc = 0
  if s[i] == "A"
    ac += 1
  elsif s[i] == "B" && s[i+1] == "C"
    bcc = 1
    k = 2
    while i+k <= s.length-2 && s[i+k] == "B" && s[i+k+1] == "C"
      bcc += 1
      k += 2
    end
    bcc.times do |kk|
      s[i-ac+kk*2] = "B"
      s[i-ac+1+kk*2] = "C"
    end
    s[i-ac+bcc*2..i+bcc*2-1] = "A" * ac
    cnt += ac*bcc
  else
    ac = 0
  end
  if bcc == 0
    i += 1
  else
    i = i+bcc*2
  end
end
puts cnt
