策略为王源代码分析-信息修改

1.版权信息、注册码修改

G:\stock\Tskingfromgoogle\src\StkLib\Include\StkLib.h

/**********************************************************************
 * OEM 版请去掉#define CLKVER_OEM 前的注释，并修改以下常量，重新编译
 */

// #define	CLKVER_OEM		// OEM版去掉该行注释

#define	OEM_REGKEY_COMPANY	" "// 注册表中的公司代号
#define	OEM_REGKEY_APP		"CLKingOEM"				// 注册表中的软件代号

#define	OEM_SUPPORT_MAILTO	"[email protected]"	// 技术支持邮箱地址
#define	OEM_SERVER_DOMAIN	"www.ninebulls.com"		// 公司网站地址，
													// 注：软件中历史数据下载要从该网址下载

#define	OEM_SEED_STD1		"dc./x"					// 标准版注册机种子1
#define	OEM_SEED_STD2		"sfk%c"					// 标准版注册机种子2
#define	OEM_SEED_PROF1		"78cd2"					// 专业版注册机种子1
#define	OEM_SEED_PROF2		"d6$3#"					// 专业版注册机种子2

/*
 * OEM 版结束
**********************************************************************/

2.数据服务器域名修改，两个地方？ 2019/06/08 by freeman

G:\stock\Tskingfromgoogle\src\StkLib\Src\Profile.cpp

BOOL CStProfile::HasNewVersion( )
{
#ifdef	CLKVER_OEM
	CSPString	strServerDomain = AfxGetProfile().GetMainServerDomain();
	if( 0 == strServerDomain.CompareNoCase( "www.balang.net" )
		|| 0 == strServerDomain.CompareNoCase( "balang.net" )
		|| 0 == strServerDomain.CompareNoCase( "www.zlinker.com" )
		|| 0 == strServerDomain.CompareNoCase( "zlinker.com" )
		|| 0 == strServerDomain.CompareNoCase( "www.ninebulls.com" )
		|| 0 == strServerDomain.CompareNoCase( "ninebulls.com" ) )
	{
		return FALSE;
	}
#endif

	if( !m_strLatestver.IsEmpty() )
	{
		CSPString	strMyVersion = GetVersion();
		double dLatestVer = atof(m_strLatestver);
		double dMyVer = atof(strMyVersion);
		if( dLatestVer - dMyVer > 1e-4 )
			return TRUE;
	}
	return FALSE;
}

G:\stock\Tskingfromgoogle\src\StkUI\Dialog\NetInfoDlg.cpp

////数据服务器域名修改 2019/06/08 by freeman
#ifdef	CLKVER_OEM
	CSPString	strServerDomain = AfxGetProfile().GetMainServerDomain();
	if( 0 == strServerDomain.CompareNoCase( "www.balang.net" )
		|| 0 == strServerDomain.CompareNoCase( "balang.net" )
		|| 0 == strServerDomain.CompareNoCase( "www.zlinker.com" )
		|| 0 == strServerDomain.CompareNoCase( "zlinker.com" )
		|| 0 == strServerDomain.CompareNoCase( "www.ninebulls.com" )
		|| 0 == strServerDomain.CompareNoCase( "ninebulls.com" ) )
	{
		CXFDialog::OnCancel( );
		return FALSE;
	}
#endif

3.

G:\stock\Tskingfromgoogle\src\StkUI\StkUI.rc

BEGIN
    BLOCK "StringFileInfo"
    BEGIN
        BLOCK "080404b0"
        BEGIN
            VALUE "CompanyName", "股搜网（www.stockso.com）"
            VALUE "FileDescription", "策略为王证券决策系统"
            VALUE "FileVersion", "3, 1, 4, 5"
            VALUE "InternalName", "Ninebulls Stock Analysis Platform"
            VALUE "LegalCopyright", "版权所有 (C) 2003"
            VALUE "LegalTrademarks", "九牛投资 策略为王"
            VALUE "OriginalFilename", "StkUI.exe"
            VALUE "ProductName", "策略为王证券决策系统"
            VALUE "ProductVersion", "3, 1, 4, 5"
        END
    END
    BLOCK "VarFileInfo"
    BEGIN
        VALUE "Translation", 0x804, 1200
    END
END