【正文】 ECK, BST_CHECKED, 0 mov eax, view add eax, IDC_RADIO1+6 invoke SendDlgItemMessage, hDlg, eax, BM_SETCHECK, BST_CHECKED, 0 jmp ItRet0 .elseif uMsg == WM_COMMAND .if wParam == IDOK mov seedxch, 0 invoke getIPs, hDlg, IDC_EDIT01 。 限制移位的范圍 .if eax 10000 mov eax, 10000 .endif .if eax != seed mov seed, eax inc seedxch .endif invoke getIPs, hDlg, IDC_EDIT02 mov astep, eax invoke getIPs, hDlg, IDC_EDIT03 mov speed, eax invoke IsDlgButtonChecked, hDlg, IDC_RADIO2 .if eax mov eax, 1 .endif .if eax != smode mov smode, eax inc seedxch .endifinvoke IsDlgButtonChecked, hDlg, IDC_RADIO4 .if eax mov eax, 1 .else invoke IsDlgButtonChecked, hDlg, IDC_RADIO5 .if eax mov eax, 2 .else invoke IsDlgButtonChecked, hDlg, IDC_RADIO6 .if eax mov eax, 3 .endif .endif .endif mov mf, eax .if mfamp。1 mov ma, 7 .else mov ma, 3 .endif invoke IsDlgButtonChecked, hDlg, IDC_RADIO8 .if eax mov eax, 1 .else invoke IsDlgButtonChecked, hDlg, IDC_RADIO9 .if eax mov eax, 2 .else invoke IsDlgButtonChecked, hDlg, IDC_RADIO10 .if eax mov eax, 3 .endif .endif .endif mov view, eaxinvoke EndDialog, hDlg, wParam mov eax, TRUE jmp ItRet .elseif wParam == IDCANCEL invoke EndDialog, hDlg, wParam mov eax, TRUE jmp ItRet .endif .endif ItRet0: xor eax, eax ItRet: retSyspProc endp。 “關(guān)于”對話框過程About PROC hDlg:DWORD, uMsg:DWORD, wParam:DWORD, lParam:DWORD .if uMsg == WM_INITDIALOG mov eax, TRUE jmp AbRet .elseif uMsg == WM_COMMAND 。 檢查命令消息 .if wParam == IDOK || wParam == IDCANCEL invoke EndDialog, hDlg, wParam mov eax, TRUE jmp AbRet .endif .endif xor eax, eax 。 返回 FALSEAbRet: ret 。 返回About ENDP。 窗口過程_ProcWinMain proc uses ebx edi esi,hWnd,uMsg,wParam,lParam local @stPs:PAINTSTRUCT local @hDc:HDC, _SPEED:DWORD .if uMsg == WM_PAINT 。 PAINT消息完成客戶區(qū)的更新或失效區(qū)域的繪制 invoke BeginPaint,hWnd,addr @stPs mov @hDc,eax 。 在此添加繪制代碼 。 ... ... invoke StretchBlt, @hDc, 0, 0, xClient, yClient, hdcTemp, 0, 0, xClient, yClient, SRCCOPYinvoke EndPaint,hWnd,addr @stPs .elseif uMsg == WM_SIZE invoke DeleteDC, hdcTemp invoke DeleteObject, hBitmapTemp 。 當(dāng)窗口尺寸變化時(shí)，計(jì)算客戶區(qū)尺寸和中心坐標(biāo) mov eax, lParam mov edx, lParam and eax, 0FFFFH shr edx, 16 .if eax 16 mov eax, 16 .endif mov xClient, eax 。 客戶區(qū)窗口寬度 .if edx 16 mov edx, 16 .endif mov yClient, edx 。 客戶區(qū)窗口高度 。 恢復(fù)隨機(jī)數(shù)種子 mov eax, rn mov tn, eax invoke initSeed, seed 。 重新初始化種子 mov eax, xClient mov , eax mov eax, yClient mov , eax invoke CreateCompatibleDC, 0 。 創(chuàng)建后備緩沖區(qū)設(shè)備描述表（HDC） mov hdcTemp, eax invoke CreateDIBSection, hdcTemp, ADDR bmInfo, DIB_RGB_COLORS, ADDR mTemp, 0, 0 mov hBitmapTemp, eax invoke SelectObject, hdcTemp, eax invoke GetObject, hBitmapTemp, sizeof BITMAP, ADDR bitmapTemp invoke bkSetcolor, mTemp, bkcolor 。 重畫內(nèi)存設(shè)備繪圖區(qū)背景 .elseif uMsg == WM_TIMER 。 獲取設(shè)備描述表 invoke GetDC,hWnd mov @hDc,eax 。 繪制當(dāng)前狀態(tài)（向@hDc設(shè)備繪制一點(diǎn)） .if view == 0 invoke bkSetcolor, mTemp, bkcolor .elseif view == 1 invoke bkGrey, mTemp, bkcolor .endif invoke Step,hdcTemp,astep invoke StretchBlt, @hDc, 0, 0, xClient, yClient, hdcTemp, 0, 0, xClient, yClient, SRCCOPY 。 刪除設(shè)備描述表 invoke ReleaseDC,hWnd,@hDc .elseif uMsg == WM_COMMAND movzx eax, WORD PTR wParam .if eax == IDM_RESTART 。 重新開始 mov eax, rn mov tn, eax invoke initSeed, seed invoke bkSetcolor, mTemp, bkcolor .if !ftime mov ftime, 100 invoke SetTimer,hWnd,ftime,speed,NULL .endif .elseif eax == IDM_DELAY 。 暫停 / 繼續(xù) .if ftime invoke KillTimer,hWnd,ftime mov ftime, 0 .else mov ftime, 100 invoke SetTimer,hWnd,ftime,speed,NULL .endif .elseif eax == IDM_SAVEIMG 。 保存圖像 invoke saveBmDlg, OFFSET pathname, OFFSET filename .if eax invoke writeDIB, OFFSET pathname .endif .elseif eax == IDM_EXIT 。 退出 invoke DestroyWindow, hWnd .elseif eax == IDM_SYSPARAM 。 系統(tǒng)參數(shù)設(shè)置 mov eax, speed mov _SPEED, eax invoke DialogBoxParam, hInstance, IDD_SYSPARAM, hWnd, ADDR SyspProc, 0 .if eax == IDOK .if seedxch mov eax, rn mov tn, eax invoke initSeed, seed invoke bkSetcolor, mTemp, bkcolor .endif mov eax, speed .if eax != _SPEED 。 生成速度改變時(shí)重新設(shè)置定時(shí)器 .if ftime invoke KillTimer,hWnd,ftime invoke SetTimer,hWnd,ftime,speed,NULL .endif .endif invoke InvalidateRect, hWnd, NULL, TRUE .endif .elseif eax == IDM_RNDPARAM 。 隨機(jī)數(shù)發(fā)生器參數(shù)設(shè)置 invoke DialogBoxParam, hInstance, IDD_RNDPARAM, hWnd, ADDR RandProc, 0 .if eax == IDOK mov eax, rn mov tn, eax invoke InvalidateRect, hWnd, NULL, TRUE .endif .elseif eax == IDM_BKCOLOR 。 選取背景顏色 invoke SelectColor, offset bkcolor .if eax invoke InvalidateRect, hWnd, NULL, TRUE .endif .elseif eax == IDM_ABOUT 。 關(guān)于 invoke DialogBoxParam, hInstance, IDD_ABOUTBOX, hWnd, ADDR About, 0 .else invoke DefWindowProc, hWnd, uMsg, wParam, lParam ret .endif .elseif uMsg == WM_CREATE invoke fileInitialize, hWnd invoke CreateCompatibleDC, 0 。 創(chuàng)建后備緩沖區(qū)設(shè)備描述表（HDC） mov hdcTemp, eax invoke CreateDIBSection, hdcTemp, ADDR bmInfo, DIB_RGB_COLORS, ADDR mTemp, 0, 0 mov hBitmapTemp, eax invoke SelectObject, hdcTemp, eax invoke GetObject, hBitmapTemp, sizeof BITMAP, ADDR bitmapTemp invoke bkSetcolor, mTemp, bkcolor 。 創(chuàng)建窗口時(shí)設(shè)定一個(gè)定時(shí)器 .if !ftime mov ftime, 100 invoke SetTimer,hWnd,ftime,speed,NULL .endif .elseif uMsg == WM_DESTROY invoke DeleteDC, hdcTemp invoke DeleteObject, hBitmapTemp 。 窗口關(guān)閉時(shí)刪除定時(shí)器 .if ftime invoke KillTimer,hWnd,ftime