程序员的小浪漫

程序员的世界里，有的大多是太过理性化的、数字化的，逻辑化的，整天跟电脑代码打交道，人难免变得呆板，如果把这种方式带到生活中，那是相当糟糕的，女人大都是感性的，当理性和感性冲撞到一起，那是相当可怕的，所以作为程序员要学会怎么哄女朋友开心。

那么如何哄她开心那？？写代码呗，写个有些小浪漫的程序！下面我便给出一个例子，效果图如下（无法呈现出动态效果，实际上玫瑰是动态生成的，玫瑰呈现完毕后，那文字是动态一个字一个字输出的，每300毫秒输出一个，嘿嘿，我这里没有背景音乐，你也可以加上个浪漫背景音乐）

这里面的那朵玫瑰是借用西班牙程序员Roman Cortes带来了用纯javascript脚本编写的红色玫瑰花，原址：http://www.romancortes.com/blog/1k-rose/，这里使用VC改写的，至于文字则是利用OnTimer函数向屏幕输出呗。

画玫瑰：

void CMultiRoseDlg::OnPaint()
{
	PAINTSTRUCT ps;
	if (IsIconic())
	{
		CPaintDC dc(this); // 用于绘制的设备上下文

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast(dc.GetSafeHdc()), 0);

		// 使图标在工作矩形中居中
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// 绘制图标
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		if (m_bWrite)
		{
			CDialog::OnPaint();
		}
		else
		{
			HDC hdc = ::BeginPaint(m_hWnd, &ps);
			short	*zBuffer;
			int	 x, y, z, zBufferIndex;
			DOT	 dot;

			// 初始化 z-buffer
			zBuffer = new short[rosesize * rosesize];
			memset(zBuffer, 0, sizeof(short) * rosesize * rosesize);

			for(int j = 0; j < 2000 && !_kbhit(); j++)	// 按任意键退出
			{
				for(int i = 0; i < 10000; i++)	 // 减少是否有按键的判断
					if(calc(double(rand()) / RAND_MAX, double(rand()) / RAND_MAX, rand() % 46 / 0.74, dot))
					{
						z = int(dot.z + 0.5);
						x = int(dot.x * rosesize / z - h + 0.5);
						y = int(dot.y * rosesize / z - h + 0.5);
						if (y >= rosesize) continue;

						zBufferIndex = y * rosesize + x;

						if(!zBuffer[zBufferIndex] || zBuffer[zBufferIndex] > z)
						{
							zBuffer[zBufferIndex] = z;
							// 画点
							int r = ~int((dot.r * h));	 if (r < 0) r = 0;	if (r > 255) r = 255;
							int g = ~int((dot.g * h));	 if (g < 0) g = 0;	if (g > 255) g = 255;
							int b = ~int((dot.r * dot.r * -80));	if (b < 0) b = 0;	if (b > 255) b = 255;
							SetPixel(hdc,x + 50, y - 20, RGB(r, g, b));
						}
					}

					Sleep(1);
			}

			// 退出
			delete []zBuffer;
			::EndPaint(m_hWnd, &ps);
			m_bWrite = TRUE;
			SetTimer(1,300,NULL);
		}
		
	}
}



// 计算点
bool CMultiRoseDlg::calc(double a, double b, double c, DOT &d)
{
	double j, n, o, w, z;

	if(c > 60)	 // 花柄
	{
		d.x = sin(a * 7) * (13 + 5 / (0.2 + pow(b * 4, 4))) - sin(b) * 50;
		d.y = b * rosesize + 50;
		d.z = 625 + cos(a * 7) * (13 + 5 / (0.2 + pow(b * 4, 4))) + b * 400;
		d.r = a * 1 - b / 2;
		d.g = a;
		return true;
	} 

	double A = a * 2 - 1;
	double B = b * 2 - 1;
	if(A * A + B * B < 1)
	{
		if(c > 37)	 // 叶
		{
			j = (int(c) & 1);
			n = j ? 6 : 4;
			o = 0.5 / (a + 0.01) + cos(b * 125) * 3 - a * 300;
			w = b * h; 

			d.x = o * cos(n) + w * sin(n) + j * 610 - 390;
			d.y = o * sin(n) - w * cos(n) + 550 - j * 350;
			d.z = 1180 + cos(B + A) * 99 - j * 300;
			d.r = 0.4 - a * 0.1 + pow(1 - B * B, -h * 6) * 0.15 - a * b * 0.4 + cos(a + b) / 5 + pow(cos((o * (a + 1) + (B > 0 ? w : -w)) / 25), 30) * 0.1 * (1 - B * B);
			d.g = o / 1000 + 0.7 - o * w * 0.000003;
			return true;
		}
		if(c > 32)	 // 花萼
		{
			c = c * 1.16 - 0.15;
			o = a * 45 - 20;
			w = b * b * h;
			z = o * sin(c) + w * cos(c) + 620;

			d.x = o * cos(c) - w * sin(c);
			d.y = 28 + cos(B * 0.5) * 99 - b * b * b * 60 - z / 2 - h;
			d.z = z;
			d.r = (b * b * 0.3 + pow((1 - (A * A)), 7) * 0.15 + 0.3) * b;
			d.g = b * 0.7;
			return true;
		} 

		// 花
		o = A * (2 - b) * (80 - c * 2);
		w = 99 - cos(A) * 120 - cos(b) * (-h - c * 4.9) + cos(pow(1 - b, 7)) * 50 + c * 2;
		z = o * sin(c) + w * cos(c) + 700;

		d.x = o * cos(c) - w * sin(c);
		d.y = B * 99 - cos(pow(b, 7)) * 50 - c / 3 - z / 1.35 + 450;
		d.z = z;
		d.r = (1 - b / 1.2) * 0.9 + a * 0.1;
		d.g = pow((1 - b), 20) / 4 + 0.05;
		return true;
	}
	return false;
} 

上面部分即可在屏幕上绘制出一朵鲜艳欲滴的红玫瑰，不过在文件的头中要加入

// 定义全局变量
int	rosesize = 850;
int	h = -400;

这是来控制玫瑰大小的，可自己调整。

输出文字：

char *pText =   "爱你，就舍不得看到你眼神的忧郁；爱你，就不忘记在你流泪的时候加倍安慰；爱你，就无怨无悔地把我的快乐一勺一勺放进你的心里，让你永远感到甜蜜！！--永远爱你的老公";
void CMultiRoseDlg::OnTimer(UINT_PTR nIDEvent)
{
	// TODO: 在此添加消息处理程序代码和/或调用默认值
	static int iSecond = 0;
	static int iSecond2 = 0;
	static int iSecond3 = 0;
	CString sText;
	sText.Format("%c%c",pText[iSecond],pText[iSecond+1]);
	PaintMonitorStatic(100+iSecond3*30,sText,300,"华文行楷");
	iSecond = iSecond+2;
	iSecond3 = iSecond3+2;
	if (iSecond > strlen(pText))
	{
		KillTimer(1);
	}
	iSecond2++;
	if (iSecond2%10 == 0)
	{
		iSecond3 = 0;
		m_iTextXPos++;
	}
	CDialog::OnTimer(nIDEvent);
}
void CMultiRoseDlg::PaintMonitorStatic(int iYPos,CString sStr,int nFontSize,CString nFontMode)
{
	CSize csize;
	CRect rect;
	CBitmap bitmap;
	CDC dcMemSave;
	CFont font;
	CDC *pDC = GetDC();
	font.CreatePointFont(nFontSize,nFontMode);
	dcMemSave.CreateCompatibleDC(NULL);
	dcMemSave.SelectObject (&font);
	csize = dcMemSave.GetTextExtent(sStr);
	bitmap.CreateCompatibleBitmap(pDC,csize.cx,csize.cy);
	dcMemSave.SelectObject(&bitmap);

	dcMemSave.SetBkMode(OPAQUE);
	dcMemSave.SetBkColor(::GetSysColor(COLOR_BTNFACE));
	dcMemSave.SetTextColor (RGB(255,55,0));
	dcMemSave.TextOut (0,0,sStr);
	font.DeleteObject ();
	GetClientRect(&rect);
	pDC->BitBlt(1000+m_iTextXPos*70,iYPos,csize.cx,csize.cy,&dcMemSave,0,0,SRCCOPY);
	bitmap.DeleteObject();
	dcMemSave.DeleteDC();
}

文字的输出放在是用的双缓冲输出，防止闪烁！

如果用我上篇日志中给出那个小工具箱来配合使用那效果更好！用这个玫瑰程序来锁屏，放着浪漫的音乐，娇艳欲滴的红玫瑰逐渐成现，动人文字一个个跳出，那感觉不错！不错！

源码：点击打开链接