KbCheckの注意点

function keytest2

clearall;

ListenChar(2);

KbName('UnifyKeyNames');

%myKeyCheck;

while KbCheck; end % どのキーも押されていないことを確認。(KbCheck1)

while 1

    % キーの状態をチェック

    [ keyIsDown, seconds, keyCode ] = KbCheck; %(KbCheck2)

    if keyIsDown

        fprintf('You pressed key %i which is %s\n', find(keyCode), KbName(keyCode));

        if keyCode(KbName('ESCAPE'))

            break;

        end

        while KbCheck; end % １回のキー押しに対して、fprintfが１回呼ばれるためにはこれが必要。 (KbCheck3)

    end

    %while KbCheck; end % ここのKbCheckは不要。これがあるとキー押しを正しく検出できない。 (KbCheck4)

end

ListenChar(0);