參考資訊:
https://masm32.com/board/index.php
https://www.nasm.us/xdoc/2.13rc9/html/nasmdoc0.html
在Windows視窗程式設計中,當需要文字輸出顯示在視窗上時,一般都會使用自定義的字型,因為系統預設的字型太小,而自定義的字型,除了可以是粗體或者斜體,還可以設定自定義的長寬尺寸,司徒使用一個簡單例子來說明如何建立自定義的字型
main.asm
%include "c:\\nasmx\\inc\\nasmx.inc" %include "c:\\nasmx\\inc\\win32\\msvcrt.inc" %include "c:\\nasmx\\inc\\win32\\windows.inc" %include "c:\\nasmx\\inc\\win32\\gdi32.inc" %include "c:\\nasmx\\inc\\win32\\user32.inc" %include "c:\\nasmx\\inc\\win32\\kernel32.inc" entry start false equ 0 CLEARTYPE_QUALITY equ 5 section .data szCaption declare(NASMX_TCHAR) NASMX_TEXT("main"),0 szFont declare(NASMX_TCHAR) NASMX_TEXT("Arial"),0 szMsg declare(NASMX_TCHAR) NASMX_TEXT("Test"),0 dwMsg equ ($ - szMsg) - 1 hWin dd 0 hInstance dd 0 defWndProc dd 0 CommandLine dd 0 NASMX_ISTRUC msg, MSG NASMX_IENDSTRUC NASMX_ISTRUC ps, PAINTSTRUCT NASMX_IENDSTRUC section .text proc WndProc, dword hWnd, uint_t uMsg, dword wParam, dword lParam locals local hdc, DWORD local font, DWORD endlocals switch dword [argv(.uMsg)] case dword WM_PAINT invoke BeginPaint, [argv(.hWnd)], ps mov [var(.hdc)], eax invoke CreateFont, 48, 0, 0, 0, FW_BOLD, false, false, false, 0, \ OUT_OUTLINE_PRECIS, CLIP_DEFAULT_PRECIS, \ CLEARTYPE_QUALITY, DEFAULT_PITCH | FF_DONTCARE, szFont mov [var(.font)], eax invoke SetTextColor, [var(.hdc)], 0xff invoke SetBkMode, [var(.hdc)], TRANSPARENT invoke SelectObject, [var(.hdc)], [var(.font)] invoke TextOut, [var(.hdc)], 100, 100, szMsg, dwMsg invoke EndPaint, [argv(.hWnd)], ps invoke DeleteObject, [var(.font)] break case dword WM_CLOSE invoke DestroyWindow, [argv(.hWnd)] break case dword WM_DESTROY invoke PostQuitMessage, 0 break default invoke CallWindowProc, [defWndProc], [argv(.hWnd)], [argv(.uMsg)], [argv(.wParam)], [argv(.lParam)] endswitch endproc proc WinMain, dword hInst, dword hPrevInst, dword CmdLine, dword CmdShow locals none invoke CreateWindowEx, WS_EX_LEFT, WC_DIALOG, szCaption, \ WS_OVERLAPPEDWINDOW | WS_VISIBLE, 0, 0, 300, 300, NULL, NULL, NULL, NULL mov [hWin], eax invoke SetWindowLong, [hWin], GWL_WNDPROC, WndProc mov [defWndProc], eax do invoke DispatchMessage, msg invoke GetMessage, msg, NULL, NULL, NULL while eax, !=, 0 mov eax, dword [msg + MSG.wParam] endproc proc start, dword argc, dword argv locals none invoke GetModuleHandle, NULL mov [hInstance], eax invoke GetCommandLine, NULL mov [CommandLine], eax invoke WinMain, [hInstance], NULL, [CommandLine], SW_SHOWNORMAL invoke ExitProcess, NULL endproc
Line 41~44:創造一個大小48、粗體的Arial字型
完成