clc; clear; format compact;
loop=1; score=0; tmax=5;
%% Round 1
disp('   ')
disp('Round One')
disp('Multiplication')
disp('   ')
pause(1)
while loop==1 & score<20
    a=randi([1 10],1);
    b=randi([1 10],1);
    X = [' what is ',num2str(a),' times ',num2str(b),'? '];
    prompt = X;
    tic
    user_ans = input(prompt);
    tElapsed=toc;
    ans = a*b;
    if user_ans==ans & tElapsed<tmax
        disp('Correct!')
        score=score+1;
    elseif user_ans==ans
        disp('Correct but you took too long to answer')
        loop=0;
    else
        disp('Incorrect!')
          X = ['Correct answer is: ',num2str(a*b),];
        disp(X)
        loop=0;
    end
end
%% Round 2
if loop==1
    pause(1)
    disp('   ')
    disp('Round Two')
    disp('Two Step Multiplication')
    disp('   ')
    pause(1)
end
while loop==1 & score<40
    a=randi([1 5],1);
    b=randi([1 5],1);
    c=randi([1 5],1);
    X = [' what is ',num2str(a),' times ',num2str(b),' times ',num2str(c),'? '];
    prompt = X;
    tic
    user_ans = input(prompt);
    tElapsed=toc;
    ans = a*b*c;
    if user_ans==ans & tElapsed<tmax
        disp('Correct!')
        score=score+1;
    elseif user_ans==ans
        disp('Correct but you took too long to answer')
        loop=0;
    else
        disp('Incorrect!')
          X = ['Correct answer is: ',num2str(a*b*c),];
        disp(X)
        loop=0;
    end
end
%% Round 3
if loop==1
    pause(1)
    disp('   ')
    disp('Round Three')
    disp('Division & Multiplication')
    disp('   ')
    pause(1)
end
while loop==1 & score<60
    a=randi([1 10],1);
    b=randi([1 10],1);
    chance=randi([1 3],1);
    if chance==1
        num=a*b;
         X = [' what is ',num2str(num),' divided by ',num2str(b),'? '];
         prompt = X;
         tic
         user_ans = input(prompt);
         tElapsed=toc;
         ans=num/b;
         if user_ans==ans & tElapsed<tmax
             disp('Correct!')
             score=score+1;
         elseif user_ans==ans
             disp('Correct but you took too long to answer')
             loop=0;
         else
             disp('Incorrect!')
             X = ['Correct answer is: ',num2str(num/b),];
             disp(X)
             loop=0;
         end
    elseif chance==2
         X = [' what is ',num2str(a),' times ',num2str(b),'? '];
         prompt=X;
         tic
         user_ans=input(prompt);
         tElapsed=toc;
         ans = a*b;
         if user_ans==ans & tElapsed<tmax
             disp('Correct!')
             score=score+1;
         elseif user_ans==ans
             disp('Correct but you took too long to answer')
             loop=0;
         else
             disp('Incorrect!')
             X = ['Correct answer is: ',num2str(a*b),];
             disp(X)
             loop=0;
         end
    else
            a=randi([1 5],1);
            b=randi([1 5],1);
            c=randi([1 5],1);
            X = [' what is ',num2str(a),' times ',num2str(b),' times ',num2str(c),'? '];
            prompt = X;
            tic
            user_ans = input(prompt);
            tElapsed=toc;
            ans = a*b*c;
            if user_ans==ans & tElapsed<tmax
                disp('Correct!')
                score=score+1;
            elseif user_ans==ans
                disp('Correct but you took too long to answer')
                loop=0;
            else
                disp('Incorrect!')
                X = ['Correct answer is: ',num2str(a*b*c),];
                disp(X)
                loop=0;
            end

    end
end
%% Round 4
if loop==1
    pause(1)
    disp('   ')
    disp('Lightning Round')
    disp('Answer as many questions as you can in under 30 secounds')
    disp('Correct answers are worth five points')
    disp('Incorrect answers will not count against you')
    disp('   ')
    disp('Order Of Operations')
    disp('   ')
    pause(3)
    disp('3')
    pause(1)
    disp('2')
    pause(1)
    disp('1')
    pause(1)
    disp('   ')
    tmax=30;
    tic
end
while loop==1 & tElapsed<tmax
    a=randi([2 10],1);
    b=randi([2 10],1);
    c=randi([2 10],1);
    d=randi([2 10],1);
    e=randi([2 10],1);
    chance=randi([1 5],1);
    if chance==1
        ans=(a*(b*c-d)+e);
        X = [,num2str(a),'(',num2str(b),'*',num2str(c),'-',num2str(d),')+',num2str(e),' '];
        prompt = X;
        user_ans=input(prompt);
        if user_ans==ans
            disp('Correct!')
            score=score+5;
        else
            disp('Incorrect!')
        end
    elseif chance==2
        ans=((a+b)*(c+d-e));
        X = ['(',num2str(a),'+',num2str(b),')*(',num2str(c),'+',num2str(d),'-',num2str(e),') '];
        prompt = X;
        user_ans=input(prompt);
        if user_ans==ans
            disp('Correct!')
            score=score+5;
        else
            disp('Incorrect!')
        end
    elseif chance==3
        ans=((a-b)*(c+d)+e);
        X = ['(',num2str(a),'-',num2str(b),')*(',num2str(c),'+',num2str(d),')+',num2str(e),' '];
        prompt = X;
        user_ans=input(prompt);
        if user_ans==ans
            disp('Correct!')
            score=score+5;
        else
            disp('Incorrect!')
        end
    elseif chance==4
        ans=((a+b-c)+d+e);
        X = ['(',num2str(a),'+',num2str(b),'-',num2str(c),')+',num2str(d),'+',num2str(e),' '];
        prompt = X;
        user_ans=input(prompt);
        if user_ans==ans
            disp('Correct!')
            score=score+5;
        else
            disp('Incorrect!')
        end
    else
        ans=(a*(b*c+d)-e);
        X = ['(',num2str(a),'+',num2str(b),')*(',num2str(c),'+',num2str(d),'-',num2str(e),') '];
        prompt = X;
        user_ans=input(prompt);
        if user_ans==ans
            disp('Correct!')
            score=score+5;
        else
            disp('Incorrect!')
        end

    end
    tElapsed=toc;
end
%% Round 5
tmax=5;
if loop==1
    disp('   ')
    disp('OUT OF TIME')
    pause(1)
    disp('   ')
    disp('Round Five')
    disp('Infinite')
    disp('Points are now double')
    disp('   ')
    pause(1)
end
while loop==1
    a=randi([1 10],1);
    b=randi([1 10],1);
    chance=randi([1 5],1);
    if chance==1
        num=a*b;
         X = [' what is ',num2str(num),' divided by ',num2str(b),'? '];
         prompt = X;
         tic
         user_ans = input(prompt);
         tElapsed=toc;
         ans=num/b;
         if user_ans==ans & tElapsed<tmax
             disp('Correct!')
             score=score+1;
         elseif user_ans==ans
             disp('Correct but you took too long to answer')
             loop=0;
         else
             disp('Incorrect!')
             X = ['Correct answer is: ',num2str(num/b),];
             disp(X)
             loop=0;
         end
    elseif chance==2
         X = [' what is ',num2str(a),' times ',num2str(b),'? '];
         prompt=X;
         tic
         user_ans=input(prompt);
         tElapsed=toc;
         ans = a*b;
         if user_ans==ans & tElapsed<tmax
             disp('Correct!')
             score=score+1;
         elseif user_ans==ans
             disp('Correct but you took too long to answer')
             loop=0;
         else
             disp('Incorrect!')
             X = ['Correct answer is: ',num2str(a*b),];
             disp(X)
             loop=0;
         end
    elseif chance==3
            a=randi([1 5],1);
            b=randi([1 5],1);
            c=randi([1 5],1);
            X = [' what is ',num2str(a),' times ',num2str(b),' times ',num2str(c),'? '];
            prompt = X;
            tic
            user_ans = input(prompt);
            tElapsed=toc;
            ans = a*b*c;
            if user_ans==ans & tElapsed<tmax
                disp('Correct!')
                score=score+1;
            elseif user_ans==ans
                disp('Correct but you took too long to answer')
                loop=0;
            else
                disp('Incorrect!')
                X = ['Correct answer is: ',num2str(a*b*c),];
                disp(X)
                loop=0;
            end
    elseif chance==4
        a=randi([1 5],1);
        b=randi([1 5],1);
        c=randi([1 5],1);
        X = [' what is (',num2str(b),' times ',num2str(c),') plus ',num2str(a),'? '];
        prompt = X;
        tic
        user_ans=input(prompt);
        tElapsed=toc;
        ans = ((b*c)+a);
        if user_ans==ans & tElapsed<tmax
            disp('Correct!')
            score=score+1
        elseif user_ans==ans
            disp('Correct but you took too long to answer')
            loop=0;
        else
            disp('Incorrect!')
            X = ['Correct answer is: ',num2str(ans),];
            disp(X)
            loop=0;
        end
    else
        a=randi([1 5],1);
        b=randi([1 5],1);
        c=randi([1 5],1);
        X = [' what is (',num2str(b*c),' divided by ',num2str(c),') plus ',num2str(a),'? '];
        prompt = X;
        tic
        user_ans=input(prompt);
        tElapsed=toc;
        ans = (((b*c)/c)+a);
        if user_ans==ans & tElapsed<tmax
            disp('Ccorrect!')
            score=score+1
        elseif user_ans==ans
            disp('Correct but you took too long to answer')
            loop=0;
        else
            disp('Incorrect!')
            X = ['Correct answer is: ',num2str(ans),];
            disp(X)
            loop=0;
        end
    end
end
%% High Score
disp('  ')
exist high_score;
if ans==0
    high_score=score;
    disp('New High Score!')
    high_score
    return
end
if score>high_score;
    high_score=score;
    disp('New High Score!')
    high_score
else
    score
    high_score
end