display '*********************************';
display 'Du hast das HiLo Spiel gestartet.';
display '*********************************';
display 'Die Spielregeln sind ganz einfach als erstes bestimmst du eine'
display 'positive ganze Zahl die wir p nennen. Danach errechne ich eine'
display 'dir unbekannte Zahl n welche zwischen 0 und p iegt.'
display 'Du darfst diese dan erraten wobei dir nur eine begrenzte Anzahl'
display 'an Versuchen zur Verfuegung stehen. Nach jedem Versuch werde ich'
display 'dir mitteilen ob deine geratene Zahl kleiner,groesser oder gleich'
display 'meiner Zahl ist im letzten Fall haettest du dann gewonnen.'
display ' '
p = input('Gib bitte eine positive ganze Zahl ein: ','s');
p = str2num(p);
if (p > 0)&&((mod(p,2)==1)||(mod(p,2)==0)) && (p~=0)
    disp ' ';
    disp 'die Eingabe war erfolgreich!';
else
    disp ' ';
    disp ' ';
    disp '------------------------------------------------';
    disp 'die eingabe war ung№ltig! Programm wird beendet.';
    disp '------------------------------------------------';
    break
end    
disp ' ';
n= rand(1);
n= n*p;
n= ceil(n);
q= log(p)/log(2);
q= ceil(q);
disp ([num2str(q), ' Versuche hast du um n zu finden']);
disp ' ';
m = q;
for k = 1:(q)
    r = input('Gib bitte deinen Versuch ein: ','s');
    r = str2num(r);
    m = m-1;
    if (m==0)&&(r~=n)
        disp ' ';
        disp ' ';
        disp 'ииииииииииииииииииииииииииииииииииииииииииииииии';
        disp 'Du hast leider verloren :-C versuche es nochmal!';
        disp 'ииииииииииииииииииииииииииииииииииииииииииииииии';
        disp ' ';
        break;
    elseif (r < 0) || ((mod(r,2)~=1)) && ((mod(r,2)~=0))
        disp ' ';
        disp ' ';
        disp '-------------------------------------------';
        disp 'Fehlerhafte Eingabe! Programm wird beendet.';
        disp '-------------------------------------------';
        break;
    elseif (r>n)
        disp ' ';
        disp 'Deine Eingabe war zu hoch!';
        disp ' ';
        disp ([num2str(m), ' Versuche hast du noch um n zu finden']);
        disp ' ';
    elseif (r<n)&&(r>=0)
            disp ' ';
            disp 'Deine Eingabe war zu tief!';
            disp ' ';
            disp ([num2str(m), ' Versuche hast du noch um n zu finden']);
            disp ' ';
    elseif (r==n)&&(r>=0)
                disp ' ';
                disp ' ';
                disp '*******************     ~~~~~~~~~';
                disp 'Du hast gewonnen!!! :-D Jeah Jeah';
                disp '*******************     ~~~~~~~~~';
                disp ' ';
                break;
    elseif m==0;
        disp ' ';
        disp ' ';
        disp 'ииииииииииииииииииииииииииииииииииииииииииииииии';
        disp 'Du hast leider verloren :-C versuche es nochmal!';
        disp 'ииииииииииииииииииииииииииииииииииииииииииииииии';
        disp ' ';
        break;
    end
                
end