function kocka
d=input('Zadaj hodnotu Vasho uctu (100-1000): ')
if d<100|d>1000
    error('Zadana hodnota nezotpoveda intervalu')
end    
b=menu('Vklad','10','50','100')
switch b
case 1 
    v=10
case 2 
    v=50
case 3 
    v=100
end
tip=menu('VAS TIP','1','2','3','4','5','6')
switch tip
case 1
    tip=1
case 2
    tip=2
case 3
    tip=3
case 4
    tip=4
case 5
    tip=5
case 6
    tip=6
end
opak=input('Zadaj pocet hodov: ')
pole(1)=d
poc(1)=0
for i=1:opak
    while 1
       hod=round(rand(1)*10) 
       if hod<7&hod>0
           break;
       end      
    end
    pole2(i)=hod
    poc(i+1)=i
    if tip==hod
       d=d+v*6
       pole(i+1)=d
    else
       d=d-v
       pole(i+1)=d
    end
    if d<0 
        disp(['Stav uctu je minusovy'])
        break;
    end
    if d<v
        disp(['Stav uctu nieje dostatocny na dalsi vklad'])
        break;
    end
    
end
pole2
disp(['Stav Vaseho uctu je : ' num2str(d)])
figure(1)
plot(poc,pole,'r-.','linewidth',5)
xlabel('hod','fontsize',13)
ylabel('ucet','fontsize',13)
title('Vas ucet','fontsize',18)
grid on
