面波处理程序

波处理与面波速度分层剖面软件。面波沿地表传播的频散现象

/****************************************************************************

    PROGRAM: DOGDEMO

    PURPOSE: This application demonstrates how to invoke the Microdog‘s
             API for Win32 Application
             
    Copyright 2000 Rainbow Goldensoft Co.Ltd. All Rights Reserved

****************************************************************************/

#include “windows.h“		    /* required for all Windows applications */
#include “string.h“
#include “stdio.h“
#include “dogdemo.h“                /* specific to this program              */
#include “resource.h“

#include “gsmh.h“


HANDLE hInst;

/****************************************************************************

    FUNCTION: WinMain（HANDLE HANDLE LPSTR int）

****************************************************************************/

int PASCAL WinMain（HANDLE hInstance HANDLE hPrevInstance LPSTR lpCmdLine int nCmdShow）
{

    DLGPROC lpDialogProc;
	HINSTANCE mlib;

	mlib = LoadLibrary（TEXT（“DOGSETUP.dll“））;
		
    if（mlib != NULL）
	  （FARPROC）InstDriver = GetProcAddress（mlib “InstDriver“）;
	else
	{
	  MessageBox（hInstance“DOGSETUP.DLL not found!““Error“MB_OK）;
	  return 0;
	}

    hInst = hInstance;

    lpDialogProc = MakeProcInstance（DemoDlg hInstance）;

    DialogBox（hInstance（LPCSTR）IDD_DIALOG NULLlpDialogProc）;

    FreeProcInstance（lpDialogProc）;

    return 0;
}


/****************************************************************************

    FUNCTION: About（HWND unsigned WORD LONG）

****************************************************************************/

BOOL FAR PASCAL About（HWND hDlg unsigned message WORD wParam LONG lParam）
{
    switch （message）
    {
    case WM_INITDIALOG:
	CenterWindow（hDlg）;
        return （TRUE）;

    case WM_COMMAND:                  
	if （wParam == IDOK|| wParam == IDCANCEL） {
	   EndDialog（hDlg TRUE）;
	   return （TRUE）;
	}
	break;
    }
    return （FALSE）;                       
}




/****************************************************************************

    FUNCTION: OnDialogInit （HWND）

****************************************************************************/

void OnDialogInit（HWND hDlg）
{
	HMENU hSysMenu;

	hSysMenu = GetSystemMenu（hDlgFALSE）;
    AppendMenu （hSysMenuMF_SEPARATOR00）;
    AppendMenu （hSysMenuMF_STRINGIDM_ABOUT“About...“）;
    RemoveMenu （hSysMenuSC_SIZEMF_BYCOMMAND）;
    RemoveMenu （hSysMenuSC_MAXIMIZEMF_BYCOMMAND）;
	RemoveMenu （hSysMenuSC_MINIMIZEMF_BYCOMMAND）;
	
	CenterWindow（hDlg）;
}


/****************************************************************************

    FUNCTION: OnButtonWriteClicked （HWND）

****************************************************************************/

void OnButtonInstDriver（HWND hDlg） 
{
	int RetCode;
	char Message[100];

	RetCode = InstDriver（10）;
	if（RetCode）
	{
		wsprintf （Message “Install dirver fai

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      19456  2001-10-20 13:04  面波处理软件\WIN2000下加密狗使用说明.doc

     文件         69  2001-05-16 14:39  面波处理软件\制作连接盘\CONFIG.SYS

     文件      29136  1994-05-31 06:22  面波处理软件\制作连接盘\HIMEM.SYS

     文件      17197  1994-05-31 06:22  面波处理软件\制作连接盘\INTERLNK.EXE

     文件      19456  2001-05-30 17:26  面波处理软件\制作连接盘\仪器与微机的联接.doc

     文件      32768  2000-07-27 11:43  面波处理软件\加密狗2000驱动\DOGSETUP.DLL

     文件       3958  2000-07-27 11:43  面波处理软件\加密狗2000驱动\DOGSETUP.LIB

     文件      31369  2000-03-01 13:58  面波处理软件\加密狗2000驱动\GSDOG.VXD

     文件      15872  2000-03-09 13:14  面波处理软件\加密狗2000驱动\GSDOGST.EXE

     文件       5767  2000-03-01 13:58  面波处理软件\加密狗2000驱动\HOST95.VXD

     文件       4032  2000-03-01 13:58  面波处理软件\加密狗2000驱动\HOSTNT.SYS

     文件     266240  2000-07-27 11:43  面波处理软件\加密狗2000驱动\INSTDRV.EXE

     文件       9216  2000-03-09 13:14  面波处理软件\加密狗2000驱动\Ioctlvdd.dll

     文件      28576  2000-03-01 13:58  面波处理软件\加密狗2000驱动\Mhdrv.sys

     文件       1723  2000-07-27 11:51  面波处理软件\加密狗2000驱动\README.CHI

     文件      28672  2000-07-27 14:46  面波处理软件\加密狗2000驱动\UNINSDRV.EXE

     文件       4578  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Dogdemo.c

     文件        376  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Dogdemo.h

     文件       6837  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Dogdemo.mak

     文件      40448  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Dogdemo.mdp

     文件       2967  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Dogdemo.rc

     文件        309  2000-07-27 11:49  面波处理软件\加密狗2000驱动\VCSAMPLE\Gsmh.h

     文件        638  2000-03-01 13:58  面波处理软件\加密狗2000驱动\VCSAMPLE\Resource.h

     文件      19456  2001-10-10 12:42  面波处理软件\软件使用说明.doc

     文件       1814  2000-10-27 10:32  面波处理软件\面波处理与速度剖面处理\BkMap00.bmp

     文件     765952  2002-03-19 13:25  面波处理软件\面波处理与速度剖面处理\CCSWSMAP.EXE

     文件    1004544  2002-03-19 13:25  面波处理软件\面波处理与速度剖面处理\CCSWSWIN.bak

     文件    1004545  2011-05-22 17:59  面波处理软件\面波处理与速度剖面处理\CCSWSWIN.EXE

     文件       2970  2000-11-09 10:18  面波处理软件\面波处理与速度剖面处理\ColBtn.bmp

     文件       5152  2001-09-29 13:10  面波处理软件\面波处理与速度剖面处理\CSH00.HTM

............此处省略70个文件信息