require '_h2ph_pre.ph';

unless(defined(&_MAC68K_KEYBOARD_H_)) {
    eval 'sub _MAC68K_KEYBOARD_H_ () {1;}' unless defined(&_MAC68K_KEYBOARD_H_);
    eval 'sub ADBK_LEFT () {0x3b;}' unless defined(&ADBK_LEFT);
    eval 'sub ADBK_RIGHT () {0x3c;}' unless defined(&ADBK_RIGHT);
    eval 'sub ADBK_UP () {0x3e;}' unless defined(&ADBK_UP);
    eval 'sub ADBK_DOWN () {0x3d;}' unless defined(&ADBK_DOWN);
    eval 'sub ADBK_PGUP () {0x74;}' unless defined(&ADBK_PGUP);
    eval 'sub ADBK_PGDN () {0x79;}' unless defined(&ADBK_PGDN);
    eval 'sub ADBK_HOME () {0x73;}' unless defined(&ADBK_HOME);
    eval 'sub ADBK_END () {0x77;}' unless defined(&ADBK_END);
    eval 'sub ADBK_CONTROL () {0x36;}' unless defined(&ADBK_CONTROL);
    eval 'sub ADBK_FLOWER () {0x37;}' unless defined(&ADBK_FLOWER);
    eval 'sub ADBK_SHIFT () {0x38;}' unless defined(&ADBK_SHIFT);
    eval 'sub ADBK_CAPSLOCK () {0x39;}' unless defined(&ADBK_CAPSLOCK);
    eval 'sub ADBK_OPTION () {0x3a;}' unless defined(&ADBK_OPTION);
    eval 'sub ADBK_F () {0x03;}' unless defined(&ADBK_F);
    eval 'sub ADBK_O () {0x1f;}' unless defined(&ADBK_O);
    eval 'sub ADBK_P () {0x23;}' unless defined(&ADBK_P);
    eval 'sub ADBK_Q () {0x0c;}' unless defined(&ADBK_Q);
    eval 'sub ADBK_V () {0x09;}' unless defined(&ADBK_V);
    eval 'sub ADBK_1 () {0x12;}' unless defined(&ADBK_1);
    eval 'sub ADBK_2 () {0x13;}' unless defined(&ADBK_2);
    eval 'sub ADBK_3 () {0x14;}' unless defined(&ADBK_3);
    eval 'sub ADBK_4 () {0x15;}' unless defined(&ADBK_4);
    eval 'sub ADBK_5 () {0x17;}' unless defined(&ADBK_5);
    eval 'sub ADBK_6 () {0x16;}' unless defined(&ADBK_6);
    eval 'sub ADBK_7 () {0x1a;}' unless defined(&ADBK_7);
    eval 'sub ADBK_8 () {0x1c;}' unless defined(&ADBK_8);
    eval 'sub ADBK_9 () {0x19;}' unless defined(&ADBK_9);
    eval 'sub ADBK_0 () {0x1d;}' unless defined(&ADBK_0);
    eval 'sub ADBK_KEYVAL {
        local($key) = @_;
	    eval q((($key) & 0x7f));
    }' unless defined(&ADBK_KEYVAL);
    eval 'sub ADBK_PRESS {
        local($key) = @_;
	    eval q(((($key) & 0x80) == 0));
    }' unless defined(&ADBK_PRESS);
    eval 'sub ADBK_KEYDOWN {
        local($key) = @_;
	    eval q(($key));
    }' unless defined(&ADBK_KEYDOWN);
    eval 'sub ADBK_KEYUP {
        local($key) = @_;
	    eval q((($key) | 0x80));
    }' unless defined(&ADBK_KEYUP);
    eval 'sub ADBK_MODIFIER {
        local($key) = @_;
	    eval q((((($key) & 0x7f) ==  &ADBK_SHIFT) || ((($key) & 0x7f) ==  &ADBK_CONTROL) || ((($key) & 0x7f) ==  &ADBK_FLOWER) || ((($key) & 0x7f) ==  &ADBK_OPTION)));
    }' unless defined(&ADBK_MODIFIER);
    unless(defined(&KEYBOARD_ARRAY)) {
    } else {
    }
}
1;
