Netwide Assembler (NASM) >> Assembly (x86) >> Win32 API >> Painting

Create Pen


參考資訊:
1. nasm
2. masm32

Pen可以想像成是一隻畫筆,粗細、顏色都可以設定,DC(Device Context)可以透過SelectObject()選擇畫筆

main.asm

    [bits 32]
    global _start

    extern _sprintf
    extern _LineTo@12
    extern _MoveToEx@16
    extern _FillRect@12
    extern _SetPixel@16
    extern _EndPaint@8
    extern _SetTimer@16
    extern _CreatePen@12
    extern _KillTimer@8
    extern _BeginPaint@8
    extern _ExitProcess@4
    extern _GetMessageA@16
    extern _MessageBoxA@16
    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 sprintf          _sprintf
    %define LineTo           _LineTo@12
    %define MoveToEx         _MoveToEx@16
    %define FillRect         _FillRect@12
    %define SetPixel         _SetPixel@16
    %define EndPaint         _EndPaint@8
    %define SetTimer         _SetTimer@16
    %define KillTimer        _KillTimer@8
    %define CreatePen        _CreatePen@12
    %define BeginPaint       _BeginPaint@8
    %define GetMessage       _GetMessageA@16
    %define MessageBox       _MessageBoxA@16
    %define ExitProcess      _ExitProcess@4
    %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
        
    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

    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
hWin        dd 0
szCaption   db "main",0
hInstance   dd 0
defWndProc  dd 0
CommandLine dd 0
hdc         dd 0
pen         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 0ffh
    push 10
    push PS_SOLID
    call CreatePen
    mov [pen], eax

    push dword [pen]
    push dword [hdc]
    call SelectObject

    push 0
    push 0
    push 0
    push dword [hdc]
    call MoveToEx

    push 100
    push 100
    push dword [hdc]
    call LineTo
 
    push ps
    push dword [ebp + ARG1]
    call EndPaint
 
    push dword [pen]
    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 188~192:創造一隻Pen,粗細是10,顏色則是紅色
Line 194~196:選擇要使用的Pen
Line 198~207:畫一條線
Line 213~214:刪除資源

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


返回上一頁