using System;
using System.Collections;
using System.Collections.Generic;
using System.Linq;
using System.Text;

class TEST{
	static void Main(){
		Sol mySol =new Sol();
		mySol.Solve();
	}
}

class Sol{
	public void Solve(){
		
		int N=S.Length;
		
		HashSet<ATMTN> D=new HashSet<ATMTN>();
		D.Add(new ATMTN(0,0,0,0,0));
		
		for(int n=0;n<N;n++){
//Console.WriteLine("n={0}",n);
//foreach(var k in D)Console.WriteLine("\t{0},{1},{2},{3},{4}",k.K,k.U,k.R,k.O,k.I);
			HashSet<ATMTN> Dnxt=new HashSet<ATMTN>();
			switch(S[n]){
				case 'K':
					foreach(var a in D){
						var anew=new ATMTN(a);
						//Dnxt.Add(anew);
						if(anew.K<20){
							anew.K++;
							Dnxt.Add(anew);
						}
					}
					break;
				case 'U':
					foreach(var a in D){
						var anew=new ATMTN(a);
						if(anew.K>0&& anew.U<20){
							anew.U++;anew.K--;
							Dnxt.Add(anew);
						}else{
							Dnxt.Add(anew);
						}
					}
					break;
				case 'R':
					foreach(var a in D){
						var anew=new ATMTN(a);
						if(anew.U>0 && anew.R<20){
							anew.R++;anew.U--;
							Dnxt.Add(anew);
						}else{
							Dnxt.Add(anew);
						}
					}
					break;
				case 'O':
					foreach(var a in D){
						var anew=new ATMTN(a);
						if(anew.R>0 && anew.O<20){
							anew.O++;anew.R--;
							Dnxt.Add(anew);
						}else{
							Dnxt.Add(anew);
						}
					}
					break;
				case 'I':
					foreach(var a in D){
						var anew=new ATMTN(a);
						if(anew.O>0 && anew.I<20){
							anew.I++;anew.O--;
							Dnxt.Add(anew);
						}else{
							Dnxt.Add(anew);
						}
					}
					break;
				case '?':
					foreach(var a in D){
						var anew=new ATMTN(a);
						if(anew.O>0 && anew.I<20){
							anew.I++;anew.O--;
							Dnxt.Add(anew);
						} 
						anew=new ATMTN(a);
						if(anew.R>0 && anew.O<20){
							anew.O++;anew.R--;
							Dnxt.Add(anew);
						}
						anew=new ATMTN(a);
						if(anew.U>0 && anew.R<20){
							anew.R++;anew.U--;
							Dnxt.Add(anew);
						}
						anew=new ATMTN(a);
						if(anew.K>0 && anew.U<20){
							anew.U++;anew.K--;
							Dnxt.Add(anew);
						}
						anew=new ATMTN(a);
						if(anew.K<20){
							anew.K++;
							Dnxt.Add(anew);
						}

					}
					break;
		
				default:
					foreach(var a in D){
						var anew=new ATMTN(a);
						Dnxt.Add(anew);
					}
					break;
		
			}
			D=Dnxt;
		}
		
		int ans=0;
		foreach(var k in D){
			ans=Math.Max(ans,k.I);
		}
		Console.WriteLine(ans);
		
		
		
		
	}
	String S;
	public Sol(){
		S=rs();
	}

	struct ATMTN{
		public int K,U,R,O,I;
		public ATMTN(int k,int u,int r,int o,int i){
			K=k;U=u;R=r;O=o;I=i;
		}
		public ATMTN(ATMTN a){
			K=a.K;U=a.U;R=a.R;O=a.O;I=a.I;
		}
	}


	static String rs(){return Console.ReadLine();}
	static int ri(){return int.Parse(Console.ReadLine());}
	static long rl(){return long.Parse(Console.ReadLine());}
	static double rd(){return double.Parse(Console.ReadLine());}
	static String[] rsa(){return Console.ReadLine().Split(' ');}
	static int[] ria(){return Array.ConvertAll(Console.ReadLine().Split(' '),e=>int.Parse(e));}
	static long[] rla(){return Array.ConvertAll(Console.ReadLine().Split(' '),e=>long.Parse(e));}
	static double[] rda(){return Array.ConvertAll(Console.ReadLine().Split(' '),e=>double.Parse(e));}
}