Netwide Assembler (NASM) >> Assembly (x86) >> Win32 API >> Painting
Create Font
參考資訊:
1. nasm
2. masm32
在Windows視窗程式設計中,當需要文字輸出顯示在視窗上時,一般都會使用自定義的字型,因為系統預設的字型太小,而自定義的字型,除了可以是粗體或者斜體,還可以設定自定義的長寬尺寸,司徒使用一個簡單例子來說明如何建立自定義的字型
main.asm
[bits 32] global _start extern _Arc@36 extern _Pie@36 extern _sprintf extern _Chord@36 extern _LineTo@12 extern _Polygon@12 extern _Ellipse@20 extern _EndPaint@8 extern _MoveToEx@16 extern _FillRect@12 extern _SetPixel@16 extern _TextOutA@20 extern _SetTimer@16 extern _KillTimer@8 extern _SetBkMode@8 extern _Rectangle@20 extern _CreatePen@12 extern _BeginPaint@8 extern _CreateFontA@56 extern _ExitProcess@4 extern _GetMessageA@16 extern _MessageBoxA@16 extern _SetTextColor@8 extern _DeleteObject@4 extern _SelectObject@8 extern _SetScrollPos@16 extern _DestroyWindow@4 extern _SetScrollRange@20 extern _SetWindowTextA@8 extern _SetWindowLongA@12 extern _CallWindowProcA@20 extern _GetCommandLineA@0 extern _CreateWindowExA@48 extern _PostQuitMessage@4 extern _CreateSolidBrush@4 extern _GetModuleHandleA@4 extern _DispatchMessageA@4 %define ARG1 8h %define ARG2 0ch %define ARG3 10h %define ARG4 14h %define Arc _Arc@36 %define Pie _Pie@36 %define sprintf _sprintf %define Chord _Chord@36 %define LineTo _LineTo@12 %define TextOut _TextOutA@20 %define Polygon _Polygon@12 %define Ellipse _Ellipse@20 %define EndPaint _EndPaint@8 %define MoveToEx _MoveToEx@16 %define FillRect _FillRect@12 %define SetPixel _SetPixel@16 %define SetTimer _SetTimer@16 %define KillTimer _KillTimer@8 %define SetBkMode _SetBkMode@8 %define Rectangle _Rectangle@20 %define CreatePen _CreatePen@12 %define BeginPaint _BeginPaint@8 %define GetMessage _GetMessageA@16 %define MessageBox _MessageBoxA@16 %define CreateFont _CreateFontA@56 %define ExitProcess _ExitProcess@4 %define SetTextColor _SetTextColor@8 %define DeleteObject _DeleteObject@4 %define SelectObject _SelectObject@8 %define SetScrollPos _SetScrollPos@16 %define DestroyWindow _DestroyWindow@4 %define SetScrollRange _SetScrollRange@20 %define SetWindowText _SetWindowTextA@8 %define SetWindowLong _SetWindowLongA@12 %define CallWindowProc _CallWindowProcA@20 %define GetCommandLine _GetCommandLineA@0 %define CreateWindowEx _CreateWindowExA@48 %define PostQuitMessage _PostQuitMessage@4 %define CreateSolidBrush _CreateSolidBrush@4 %define GetModuleHandle _GetModuleHandleA@4 %define DispatchMessage _DispatchMessageA@4 %macro CreateMyPen 2 push %2 push %1 push PS_SOLID call CreatePen %endmacro %macro DrawMyLine 6 push %2 push %1 call SelectObject push 0 push %4 push %3 push %1 call MoveToEx push %6 push %5 push %1 call LineTo %endmacro struc RECT .left: resd 1 .top: resd 1 .right: resd 1 .bottom: resd 1 .SIZE: endstruc struc PAINTSTRUCT .hdc: resd 1 .fErase: resd 1 .rcPaint: resb RECT.SIZE .fRestore: resd 1 .fIncUpdate: resd 1 .rgbReserved: resb 32 .SIZE: endstruc struc POINT .x: resd 1 .y: resd 1 .SIZE: endstruc struc MSG .hwnd: resd 1 .message: resd 1 .wParam: resd 1 .lParam: resd 1 .time: resd 1 .pt: resb POINT.SIZE .SIZE: endstruc TRANSPARENT equ 1 false equ 0 FF_DONTCARE equ 0 FW_BOLD equ 700 OUT_OUTLINE_PRECIS equ 8 CLIP_DEFAULT_PRECIS equ 0 CLEARTYPE_QUALITY equ 5 DEFAULT_PITCH equ 0 PS_SOLID equ 0 GWL_WNDPROC equ -4 SB_LINEUP equ 0 SB_LINELEFT equ 0 SB_LINEDOWN equ 1 SB_LINERIGHT equ 1 SB_PAGEUP equ 2 SB_PAGELEFT equ 2 SB_PAGEDOWN equ 3 SB_PAGERIGHT equ 3 SB_VERT equ 1 SW_SHOWNORMAL equ 1h WC_DIALOG equ 8002h WM_PAINT equ 0fh WM_VSCROLL equ 115h WM_TIMER equ 113h WM_MOUSEMOVE equ 200h WM_SYSKEYDOWN equ 104h WM_KEYDOWN equ 100h WM_DESTROY equ 2h WM_CLOSE equ 10h WS_VSCROLL equ 200000h WS_OVERLAPPED equ 0h WS_CAPTION equ 0c00000h WS_SYSMENU equ 80000h WS_THICKFRAME equ 40000h WS_MINIMIZEBOX equ 20000h WS_MAXIMIZEBOX equ 10000h WS_VISIBLE equ 10000000h WS_EX_LEFT equ 00000000h WS_OVERLAPPEDWINDOW equ WS_OVERLAPPED | \ WS_CAPTION | \ WS_SYSMENU | \ WS_THICKFRAME | \ WS_MINIMIZEBOX | \ WS_MAXIMIZEBOX section .drectve info _entry db "/entry:start " _gdi32 db "/defaultlib:c:\\masm32\\lib\\gdi32.lib " _user32 db "/defaultlib:c:\\masm32\\lib\\user32.lib " _msvcrt db "/defaultlib:c:\\masm32\\lib\\msvcrt.lib " _kernel32 db "/defaultlib:c:\\masm32\\lib\\kernel32.lib " segment .data szCaption db "main",0 szFont db "Arial",0 szMsg db "Test",0 dwMsg equ ($ - szMsg) - 1 hWin dd 0 hInstance dd 0 defWndProc dd 0 CommandLine dd 0 hdc dd 0 font dd 0 msg istruc MSG at .hwnd, dd 0 at .message, dd 0 at .wParam, dd 0 at .lParam, dd 0 at .time, dd 0 at .pt, dd 0, 0 iend ps istruc PAINTSTRUCT at .hdc, dd 0 at .fErase, dd 0 at .rcPaint, dd 0, 0, 0, 0 at .fRestore, dd 0 at .fIncUpdate, dd 0 at .rgbReserved, db 0 iend segment .text WndProc: push ebp mov ebp, esp cmp dword [ebp + ARG2], WM_PAINT je .handle_paint cmp dword [ebp + ARG2], WM_CLOSE je .handle_close cmp dword [ebp + ARG2], WM_DESTROY je .handle_destroy jmp .handle_default .handle_paint: push ps push dword [ebp + ARG1] call BeginPaint mov [hdc], eax push szFont push DEFAULT_PITCH | FF_DONTCARE push CLEARTYPE_QUALITY push CLIP_DEFAULT_PRECIS push OUT_OUTLINE_PRECIS push 0 push false push false push false push FW_BOLD push 0 push 0 push 0 push 48 call CreateFont mov [font], eax push 0ffh push dword [hdc] call SetTextColor push TRANSPARENT push dword [hdc] call SetBkMode push dword [font] push dword [hdc] call SelectObject push dwMsg push szMsg push 100 push 100 push dword [hdc] call TextOut push ps push dword [ebp + ARG1] call EndPaint push dword [font] call DeleteObject xor eax, eax jmp .finish .handle_close: push dword [ebp + ARG1] call DestroyWindow xor eax, eax jmp .finish .handle_destroy: push 0 call PostQuitMessage xor eax, eax jmp .finish .handle_default: push dword [ebp + ARG4] push dword [ebp + ARG3] push dword [ebp + ARG2] push dword [ebp + ARG1] push dword [defWndProc] call CallWindowProc .finish: leave ret 16 WinMain: push ebp mov ebp, esp push 0 push 0 push 0 push 0 push 300 push 300 push 0 push 0 push WS_OVERLAPPEDWINDOW | WS_VISIBLE push szCaption push WC_DIALOG push WS_EX_LEFT call CreateWindowEx mov [hWin], eax push WndProc push GWL_WNDPROC push dword [hWin] call SetWindowLong mov [defWndProc], eax .loop: push 0 push 0 push 0 push msg call GetMessage cmp eax, 0 je .exit push msg call DispatchMessage jmp .loop .exit: mov eax, [msg + MSG.wParam] leave ret 16 _start: push 0 call GetModuleHandle mov [hInstance], eax call GetCommandLine mov [CommandLine], eax push SW_SHOWNORMAL push dword [CommandLine] push 0 push dword [hInstance] call WinMain push eax call ExitProcess
Line 243~257:創造一個大小48、粗體的Arial字型
Makefile
export WINEPREFIX=/home/user/.wine_amd64 TARGET=main MYWINE=box86 wine NASM32=/home/user/.wine_amd64/drive_c/nasm MASM32=/home/user/.wine_amd64/drive_c/masm32 all: ${MYWINE} ${NASM32}/bin/nasm.exe -fwin32 ${TARGET}.asm ${MYWINE} ${MASM32}/bin/link.exe /SUBSYSTEM:WINDOWS /MERGE:.rdata=.text ${TARGET}.obj run: ${MYWINE} ${TARGET}.exe clean: rm -rf ${TARGET}.exe ${TARGET}.obj
編譯、執行
$ make $ make run