【導(dǎo)讀】用匯編語言編程設(shè)計一個簡單的動畫程序，實現(xiàn)粒子的運動。握顯示輸出和基本數(shù)據(jù)像素顏色指令的應(yīng)用，進一步提高綜合運用知識的能力?；蚣?，并且種子數(shù)量不斷地增加。目所規(guī)定的要求，可以靈活裁減，設(shè)計出功能更完善程序。1)中文摘要100字,關(guān)鍵詞3-5個。2)實訓(xùn)題目、內(nèi)容、要求。5）數(shù)據(jù)結(jié)構(gòu)設(shè)計描述，各模塊（函數(shù)）的功能介紹，參數(shù)說明等。6）調(diào)試分析（包含各模塊的測試用例，及測試結(jié)果。8)參考文獻、致謝等。[1]李敬兆等編.《匯編語言程序設(shè)計》.合肥：中國科學(xué)技術(shù)大學(xué)出版社，[3]王爽等編.《匯編語言》.北京：清華大學(xué)出版社，華等編.《匯編語言程序設(shè)計》.北京：中國電力出版社，[7]詹仕華等編.《匯編語言程序設(shè)計習(xí)題解答及課程設(shè)計、設(shè)計輔導(dǎo)》.北京：中國電力出版社，[8]宋彩莉等編.《匯編語言程序設(shè)計學(xué)習(xí)指導(dǎo)》.西安：西安交通大學(xué)出版社，并利用計算機提供的軟件調(diào)試工具對所編寫程序進行調(diào)試，記錄下整個。調(diào)試分析的過程與運行結(jié)果。

　　

【正文】 mov [ebx]., ax .endif 。 垂直方向上的越界檢查（也做回繞處理） movsx edx, [ebx]. .if edx SDWORD PTR 0 mov edx, yClient dec edx mov [ebx]., dx .elseif edx = yClient mov edx, 0 mov [ebx]., dx .endif 。 繪制當(dāng)前狀態(tài)（向 @hDc 設(shè)備繪制一點） movzx eax, [ebx]. movzx edx, [ebx]. .if view != 3 invoke SetPixel,hdcT,eax,edx,[ebx]. .endif add ebx, sizeof ATOMST dec _k .endw pop ecx inc ecx .endw .if view == 3 push esi push edi mov esi, offset ats mov edi, offset att mov ebx, seed .while ebx invoke drawLine,[edi].,[edi].,[esi].,[esi].,[esi]. add esi, 8 add edi, 4 dec ebx .endw pop edi pop esi .endif ret Step endp 。 選取背景顏色 SelectColor proc color$:DWORD LOCAL c$:DWORD LOCAL cc:CHOOSECOLOR mov , sizeof CHOOSECOLOR mov , NULL mov , NULL mov eax, color$ mov eax, [eax] lea edx, c$ mov [edx], eax mov [edx+2], al shr eax, 16 mov [edx+0], al mov eax, c$ mov , eax lea eax, crCustColors mov , eax mov , CC_RGBINIT or CC_FULLOPEN mov , 0 mov , NULL mov , NULL invoke ChooseColor, ADDR cc .if eax mov eax, lea edx, c$ mov [edx], eax mov [edx+2], al shr eax, 16 mov [edx+0], al mov edx, c$ mov eax, color$ mov [eax], edx mov eax, TRUE .endif ret SelectColor endp 。 將十進制數(shù)值串轉(zhuǎn)化為無符號整數(shù)的內(nèi)部格式 getV10 proc str$:DWORD, v$:DWORD push edi push ebx mov edi, str$ xor ecx, ecx mov ebx, ecx mov bl, [edi] .while bl = 39。039。 amp。amp。 bl = 39。939。 mov eax, 10 mul ecx sub ebx, 030H mov ecx, eax add ecx, ebx inc edi mov bl, [edi] .endw mov edx, v$ mov [edx], ecx mov eax, edi pop ebx pop edi ret getV10 endp 。 獲取對話框中指定編輯框的整數(shù) getIPs proc hDlg:HWND, uID$:DWORD LOCAL v$:DWORD invoke GetDlgItem, hDlg, uID$ invoke GetWindowText, eax, OFFSET strtemp, 12 invoke getV10, OFFSET strtemp, ADDR v$ lea edx, v$ mov eax, [edx] ret getIPs endp 。 設(shè)置對話框中指定編輯框的初始值 setIPs proc hDlg:HWND, uID$:DWORD, v$:DWORD invoke SendDlgItemMessage, hDlg, uID$, EM_LIMITTEXT, 11, 0 invoke wsprintf, OFFSET strtemp, OFFSET format, v$ invoke GetDlgItem, hDlg, uID$ invoke SetWindowText, eax, OFFSET strtemp ret setIPs endp 。 初始化 ofn fileInitialize proc uses edi hwnd:HWND lea edi, ofn mov ecx, SIZEOF OPENFILENAME xor eax, eax rep stosb mov , SIZEOF OPENFILENAME mov eax, hwnd mov , eax mov , MAX_PATH mov , MAX_PATH ret fileInitialize endp 。 保存位圖文件選擇框，獲取有效的全路徑文件名 saveBmDlgproc fname$:DWORD, tname$:DWORD mov , OFFSET bmFilter mov , OFFSET bmDefExt mov eax, fname$ mov word ptr [eax], 0 mov edx, tname$ mov word ptr [edx], 0 mov , eax mov , edx mov , OFN_OVERWRITEPROMPT invoke GetSaveFileName, OFFSET ofn ret saveBmDlgendp 。 將內(nèi)存設(shè)備位圖寫到文件 writeDIB proc fname$:DWORD LOCAL hFile$:HFILE LOCAL i$:DWORD, w$:DWORD, wbs$:DWORD, p$:DWORD invoke CreateFile, fname$, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL .if eax == INVALID_HANDLE_VALUE mov eax, TRUE ret .endif mov hFile$, eax mov eax, xClient mov ecx, yClient mov , eax mov , ecx shl eax, 2 mul ecx mov , 0 mov w$, eax add eax, 54 mov , eax invoke WriteFile, hFile$, OFFSET bmFile, SIZEOF BITMAPFILEHEADER, ADDR wbs$, NULL invoke WriteFile, hFile$, OFFSET bmInfo, SIZEOF BITMAPINFOHEADER, ADDR wbs$, NULL invoke WriteFile, hFile$, mTemp, w$, ADDR wbs$, NULL invoke CloseHandle, hFile$ xor eax, eax ret writeDIB endp 。 隨機數(shù)發(fā)生器控制數(shù)值設(shè)置對話框過程 RandProc proc hDlg:DWORD, uMsg:DWORD, wParam:DWORD, lParam:DWORD .if uMsg == WM_INITDIALOG invoke setIPs, hDlg, IDC_EDIT01, ra invoke setIPs, hDlg, IDC_EDIT03, rb invoke setIPs, hDlg, IDC_EDIT02, rn invoke setIPs, hDlg, IDC_EDIT04, rs jmp ItRet0 .elseif uMsg == WM_COMMAND .if wParam == IDOK invoke getIPs, hDlg, IDC_EDIT01 or eax, 1 mov ra, eax invoke getIPs, hDlg, IDC_EDIT03 mov rb, eax invoke getIPs, hDlg, IDC_EDIT02 mov rn, eax invoke getIPs, hDlg, IDC_EDIT04 。 限制移位的范圍 .if eax SDWORD PTR 0 mov eax, 0 .elseif eax 28 mov eax, 28 .endif mov rs, eax invoke 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: ret RandProc endp 。 系統(tǒng)參數(shù)設(shè)置對話框過程 SyspProc proc hDlg:DWORD, uMsg:DWORD, wParam:DWORD, lParam:DWORD .if uMsg == WM_INITDIALOG invoke setIPs, hDlg, IDC_EDIT01, seed invoke setIPs, hDlg, IDC_EDIT02, astep invoke setIPs, hDlg, IDC_EDIT03, speed mov eax, smode add eax, IDC_RADIO1 invoke SendDlgItemMessage, hDlg, eax, BM_SETCHECK, BST_CHECKED, 0 mov eax, mf add eax, IDC_RADIO1+2 invoke SendDlgItemMessage, hDlg, eax, BM_SETCHECK, 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 .endif invoke 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_RA