// // time: Tue Jan 14 18:37:33 1997 // // version: 3.0.0 (format), 3.1.2 (DX) // // // Begin MDF // MODULE FileList // CATEGORY Import and Export // DESCRIPTION Returns a list of files given a path and filename mask // INPUT path; value list or string; (no default); // INPUT filename_mask; value list or string; ("*.*"); // OUTPUT list_of_files; object; // End MDF // // comment: FileList // comment: ------ // comment: // comment: (C) Duncan Galloway 1996 // comment: duncang@ibm590.aims.gov.au // comment: // comment: This macro simply acts as a link to the file_list filter. // workspace: width = 317, height = 385 // layout: snap = 0, width = 50, height = 50, align = UL // macro FileList( path ,filename_mask ) -> ( list_of_files ) { // // node Input[1]: x = 110, y = 30, inputs = 0, label = Input // parameter: position = 1, name = 'path', value = '(no default)', descriptive = 1, description = ' ', required = 0, visible = 1 // FileList_Input_1_out_1 = path; // // node Input[2]: x = 274, y = 33, inputs = 0, label = Input // parameter: position = 2, name = 'filename_mask', value = '("*.*")', descriptive = 1, description = ' ', required = 0, visible = 1 // FileList_Input_2_out_1 = filename_mask; // // node Format[2]: x = 170, y = 141, inputs = 3, label = Format // input[1]: defaulting = 0, visible = 1, type = 32, value = "! FILELIST %s \"%s\"" // FileList_Format_2_out_1 = Format( "! FILELIST %s \"%s\"", FileList_Input_1_out_1, FileList_Input_2_out_1 ) [instance: 2, cache: 1]; // // node Import[3]: x = 182, y = 235, inputs = 6, label = Import // input[3]: defaulting = 0, visible = 1, type = 32, value = "dx" // FileList_Import_3_out_1 = Import( FileList_Format_2_out_1, NULL, "dx", NULL, NULL, NULL ) [instance: 3, cache: 1]; // // node Output[1]: x = 194, y = 322, inputs = 1, label = Output // parameter: position = 1, name = 'list_of_files', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1 // list_of_files = FileList_Import_3_out_1; // network: end of macro body } FileList_Input_1_out_1 = NULL; FileList_Input_2_out_1 = NULL; FileList_Format_2_out_1 = NULL; FileList_Import_3_out_1 = NULL;