segy.rar_c语言读取segy_segy_segy文件格式_sgy读写源代码_读写sgy文件

#define LZX_SEIS_shell #include <X11/Xatom.h> #include <X11/Intrinsic.h> #include <X11/Shell.h> #include <Xm/Xm.h> #include <X11/StringDefs.h> #include <Xm/CascadeB.h> #include <Xm/DialogS.h> #include <Xm/DrawingA.h> #include <Xm/FileSB.h> #include <Xm/Form.h> #include <Xm/Frame.h> #include <Xm/Label.h> #include <Xm/List.h> #include <Xm/MainW.h> #include <Xm/MessageB.h> #include <Xm/PushB.h> #include <Xm/RowColumn.h> #include <Xm/Scale.h> #include <Xm/ScrollBar.h> #include <Xm/SelectioB.h> #include <Xm/TextF.h> #include <Xm/CascadeBG.h> #include <Xm/LabelG.h> #include <Xm/PushBG.h> #include <Xm/SeparatoG.h> #include <stdio.h> #include "LZX_dialog_ok.h" #include "LZX_SEIS_shell.h" typedef struct { Widget parent; char name[24]; Widget popup; } LZX_SEIS_popup; typedef struct { int num; LZX_SEIS_popup p[10]; } LZX_SEIS_total_popup; LZX_SEIS_total_popup pop = {0}; Widget file_select; extern void edit_cutline_panel_ok_cb(Widget, XtPointer, XtPointer) ; extern void seis_draw_panel_ok_cb(Widget, XtPointer, XtPointer) ; extern void line_type_cb(Widget, XtPointer, XtPointer) ; extern void list_select_cb(Widget, XtPointer, XtPointer) ; extern void edit_cutline_cb(Widget, XtPointer, XtPointer) ; extern void file_select_ok_cb(Widget, XtPointer, XtPointer) ; extern void file_select_map_cb(Widget, XtPointer, XtPointer) ; extern void segy_dialog_ok_cb(Widget, XtPointer, XtPointer) ; extern void sgyfile_select_button_cb(Widget, XtPointer, XtPointer) ; extern void drawing_expose_cb(Widget, XtPointer, XtPointer) ; extern void exit_cb(Widget, XtPointer, XtPointer) ; extern void zoom_cb(Widget, XtPointer, XtPointer) ; void LZX_SEIS_set_pop(Widget w,char *name,Widget popup) { int n; n = pop.num; if(n>=10) return; pop.p[n].parent = w; strcpy(pop.p[n].name,name); pop.p[n].popup = popup; pop.num++; } Widget LZX_SEIS_get_pop(Widget w,char *name) { int i; for(i=0; i<pop.num; i++) { if(pop.p[i].parent!=w) continue; if(strcmp(pop.p[i].name,name)) continue; return(pop.p[i].popup); } return(NULL); } void LZX_SEIS_XDmanage_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtManageChild ( client_data ); } void LZX_SEIS_XDunmanage_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtUnmanageChild ( client_data ); } void LZX_SEIS_XDpopup_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtPopup ( client_data, XtGrabNone ); } void LZX_SEIS_XDpopdown_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtPopdown ( client_data ); } void LZX_SEIS_XDmap_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtMapWidget (client_data); } void LZX_SEIS_XDunmap_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtUnmapWidget (client_data); } void LZX_SEIS_XDenable_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data ) XtSetSensitive (client_data, TRUE); } void LZX_SEIS_XDdisable_link ( Widget w, Widget client_data, XtPointer call_data ) { if ( client_data) XtSetSensitive (*(Widget *)client_data, FALSE); } static _xd_initialised = 0; typedef struct FontResources_s { XmFontList label; XmFontList text; } FontResources_t, *FontResources_p; static FontResources_t font_resources; typedef struct PixelResources_s { Pixel background; Pixel forg; } PixelResources_t, *PixelResources_p; static PixelResources_t pixel_resources; static void LZX_SEIS_initialise_objects( Widget parent ) { XrmValue from_value, to_value; /* For resource conversions */ if ( _xd_initialised ) return; _xd_initialised = 1; while ( XtParent ( parent ) ) parent = XtParent ( parent ); from_value.addr = "-misc-fixed-medium-r-normal--14-110-100-100-c-70-iso8859-1=font"; from_value.size = strlen(from_value.addr)+1; to_value.addr = NULL; XtConvertAndStore( parent, XmRString, &from_value, XmRFontList, &to_value); if ( to_value.addr ) font_resources.label = *(XmFontList*)to_value.addr; from_value.addr = "-bitstream-charter-medium-r-normal--14-100-100-100-p-78-iso8859-1=font"; from_value.size = strlen(from_value.addr)+1; to_value.addr = NULL; XtConvertAndStore( parent, XmRString, &from_value, XmRFontList, &to_value); if ( to_value.addr ) font_resources.text = *(XmFontList*)to_value.addr; if (DefaultDepthOfScreen(DefaultScreenOfDisplay(XtDisplay(parent))) != 1) { from_value.addr = "papaya whip"; from_value.size = strlen(from_value.addr)+1; to_value.addr = NULL; XtConvertAndStore( parent, XmRString, &from_value, XmRPixel, &to_value); if ( to_value.addr ) pixel_resources.background = *(Pixel*)to_value.addr; from_value.addr = "light grey"; from_value.size = strlen(from_value.addr)+1; to_value.addr = NULL; XtConvertAndStore( parent, XmRString, &from_value, XmRPixel, &to_value); if ( to_value.addr ) pixel_resources.forg = *(Pixel*)to_value.addr; } } Widget create_cutline_edit_widget (Widget parent) { Widget children[40]; /* Children to manage */ Arg al[64]; /* Arg List */ register int ac = 0; /* Arg Count */ XrmValue from_value, to_value; /* For resource conversion */ XmString xmstrings[16]; /* temporary storage for XmStrings */ Widget cutline_edit_widget = (Widget)NULL; Widget button28 = (Widget)NULL; Widget button29 = (Widget)NULL; Widget form3 = (Widget)NULL; Widget label53 = (Widget)NULL; Widget text79 = (Widget)NULL; Widget label54 = (Widget)NULL; Widget text80 = (Widget)NULL; Widget frame1 = (Widget)NULL; Widget rowcol4 = (Widget)NULL; Widget label75 = (Widget)NULL; Widget label76 = (Widget)NULL; Widget label77 = (Widget)NULL; Widget label78 = (Widget)NULL; Widget label79 = (Widget)NULL; Widget label80 = (Widget)NULL; Widget label81 = (Widget)NULL; Widget label82 = (Widget)NULL; Widget label83 = (Widget)NULL; Widget label84 = (Widget)NULL; Widget text101 = (Widget)NULL; Widget text102 = (Widget)NULL; Widget text103 = (Widget)NULL; Widget text104 = (Widget)NULL; Widget text105 = (Widget)NULL; Widget text106 = (Widget)NULL; Widget text107 = (Widget)NULL; Widget text108 = (Widget)NULL; Widget text109 = (Widget)NULL; Widget text110 = (Widget)NULL; Widget label85 = (Widget)NULL; Widget label86 = (Widget)NULL; Widget label87 = (Widget)NULL; Widget label88 = (Widget)NULL; Widget label89 = (Widget)NULL; Widget label90 = (Widget)NULL; Widget label91 = (Widget)NULL; Widget label92 = (Widget)NULL; Widget label93 = (Widget)NULL; Widget label94 = (Widget)NULL; Widget text111 = (Widget)NULL; Widget text112 = (Widget)NULL; Widget text113 = (Widget)NULL; Widget text114 = (Widget)NULL; Widget text115 = (Widget)NULL; Widget text116 = (Widget)NULL; Widget text117 = (Widget)NULL; Widget text118 = (Widget)NULL; Widget text119 = (Widget)NULL; Widget text120 = (Widget)NULL; XtSetArg(al[ac], XmNdialogStyle, XmDIALOG_PRIMARY_APPLICATION_MODAL); ac++; XtSetArg(al[ac], XmNautoUnmanage, FALSE); ac++; XtSetArg(al[ac], XmNdialogType, XmDIALOG_TEMPLATE); ac++; cutline_edit_widget = XmCreateMessageBox ( parent, "cutline_edit_widget", al, ac ); ac = 0; xmstrings[0] = XmStringCreateLtoR ( " ok ", (XmStringCharSet)XmFONTLIST_DEFAULT_TAG ); XtSetArg(al[ac], XmNlabelString, xmstrings[0]); ac++; XtSetArg(al[ac], XmNfontList, font_resources.text); ac++; button28 = XmCreatePushButton ( cutline_edit_widget, "button28", al, ac ); ac = 0; XmStringFree ( xmstrings [ 0 ] ); xmstrings[0] = XmStringCreateLtoR ( " cancel ", (XmStringCharSet)XmFONTLIST_DEFAULT_TAG ); XtSetArg(al[ac], XmNlabelString, xmstrings[0]); ac++; XtSetArg(al[ac], XmNfontList, font_resources.text); ac++; button29 = XmCreatePushButton ( cut