% exit_on_esc.m

esc_key = KbName('esc');
i=0;
while 1
    i = i+1;
    disp(i);
    [key_is_down, secs, key_code] =...
        KbCheck;
    if(key_code(esc_key))
        break;
    end
end
disp('Good Bye');