/b>
szTitleName db ' Це наше вікно ', 0
szClassName db 'ASMCLASS32', 0
szHello db 'Привіт!', 0
szAppName db 'Повідомлення', 0
hMenu dd 0
hsubmenu dd 0
item1 db ' Меню ', 0
item2 db ' Вихід ', 0
item3 db 'Повернення', 0
. code ; перевизначених ім'я, що означає початок
; сегменту коду
start:
push L 0
call GetModuleHandleA
mov [hInst], eax
; ініціалізація структури WndClass
В
mov [wc.clsStyle], CS_HREDRAW + CS_VREDRAW +
CS_GLOBALCLASS
mov [wc.clsLpfnWndProc], offset WndProc
mov [wc.clsCbClsExtra], 0
mov [wc.clsCbWndExtra], 0
mov eax, [hInst]
mov [wc.clsHInstance], eax
push L IDI_APPLICATION
push L 0
call LoadIconA
mov [wc.clsHIcon], eax
push L IDC_ARROW
push L 0
call LoadCursorA
mov [wc.clsHCursor], eax
mov [wc.clsHbrBackground], COLOR_WINDOW + 1
mov dword ptr [wc.clsLpszMenuName], 0
mov dword ptr [wc.clsLpszClassName], offset szClassName
push offset wc
call RegisterClassA
call CreateMenu
mov [hMenu], eax
push L 0; lpParam
push [hInst]; hInstance
push [hMenu]; menu
push L 0; parent hwnd
push L CW_USEDEFAULT; height
push L CW_USEDEFAULT; width
push L CW_USEDEFAULT; y
push L CW_USEDEFAULT; x
push L WS_OVERLAPPEDWINDOW; Style
push offset szTitleName; Title string
push offset szClassName; Class name
push L 0; extra style
call CreateWindowExA
mov [newhwnd], eax
call CreatePopupMenu
mov [hsubmenu], eax
push offset item2
push L IDM_QUIT
push 0
push eax
call AppendMenuA
push offset item3
push L IDM_ABOUT
push 0
push [hsubmenu]; eax
call AppendMenuA
push offset item1
push [hsubmenu]
push MF_POPUP
push [hMenu]
call AppendMenuA
nop
push L SW_SHOWNORMAL
push [newhwnd]
<...
