资源描述：
《【终极超详细版】数字雨C语言代码.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、直接复制以下代码到编译器上运行便可看到超级炫酷的数字雨效果#include#defineID_TIMER1#defineSTRMAXLEN25//一个显示列的最大长度#defineSTRMINLEN8//一个显示列的最小长度LRESULTCALLBACKWndProc(HWND,UINT,WPARAM,LPARAM);///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
2、/////////////typedefstructtagCharChain//整个当作屏幕的一个显示列,这是个双向列表{structtagCharChain*prev;//链表的前个元素TCHARch;//一个显示列中的一个字符structtagCharChain*next;//链表的后个元素}CharChain,*pCharChain;typedefstructtagCharColumn{CharChain*head,*current,*point;intx,y,iStrLen;//显示列的开始显示的x,y坐标,iStrLen是这个列的长度intiStopTimes,i
3、MustStopTimes;//已经停滞的次数和必须停滞的次数,必须停滞的次数是随机的}CharColumn,*pCharColumn;intmain(HINSTANCEhInstance,HINSTANCEhPrevInstance,PSTRszCmdLine,intiCmdShow){staticTCHARszAppName[]=TEXT("matrix");HWNDhwnd;MSGmsg;WNDCLASSwndclass;wndclass.style=CS_HREDRAW
4、CS_VREDRAW;wndclass.lpfnWndProc=WndProc;wndclass
5、.cbClsExtra=0;wndclass.cbWndExtra=0;wndclass.hInstance=hInstance;wndclass.hIcon=LoadIcon(NULL,IDI_APPLICATION);wndclass.hCursor=LoadCursor(NULL,IDC_ARROW);wndclass.hbrBackground=(HBRUSH)GetStockObject(BLACK_BRUSH);wndclass.lpszMenuName=NULL;wndclass.lpszClassName=szAppName;if(!RegisterClas
6、s(&wndclass)){MessageBox(NULL,TEXT("此程序必须运行在NT下!"),szAppName,MB_ICONERROR);return0;}hwnd=CreateWindow(szAppName,NULL,WS_DLGFRAME
7、WS_THICKFRAME
8、WS_POPUP,0,0,GetSystemMetrics(SM_CXSCREEN),GetSystemMetrics(SM_CYSCREEN),NULL,NULL,hInstance,NULL);ShowWindow(hwnd,SW_SHOWMAXIMIZED);//最大化显示UpdateW
9、indow(hwnd);ShowCursor(FALSE);//隐藏鼠标光标srand((int)GetCurrentTime());//初始化随机数发生器while(GetMessage(&msg,NULL,0,0)){TranslateMessage(&msg);DispatchMessage(&msg);}ShowCursor(TRUE);//显示鼠标光标returnmsg.wParam;}TCHARrandomChar()//随机字符产生函数{return(TCHAR)(rand()%(126-33)+33);//33到之间}intinit(CharColumn*c
10、c,intcyScreen,intx)//初始化{intj;cc->iStrLen=rand()%(STRMAXLEN-STRMINLEN)+STRMINLEN;//显示列的长度cc->x=x+3;//显示列的开始显示的x坐标cc->y=rand()%3?rand()%cyScreen:0;//显示列的开始显示的y坐标cc->iMustStopTimes=rand()%6;cc->iStopTimes=0;cc->head=cc->current=(pCharChain)calloc(cc->iStrLen,siz
