string type; string code; short() { return "A " + type + " key"; } set_key_data( str) { if ( sscanf(str, "%s %s", type, code) == 2) return 1; return 2; } long() { write("\nThis a " + type + " key, wonder where it fits?\n"); } id( strang) { if ( ( strang == "key" )||( strang == type + " key")||( strang == "H_key") ) return 1; return 0; } get() { return 1; } query_value() { return 10; } query_type() { return type; } query_code() { return code; } set_type( str) { type = str; } set_code( str) { code = str; } init() { } reset( arg) { if(arg) return; type = 0; code = 0; }