fork(1) download

copy

.386
.model flat, stdcall
option casemap:none
 
include         \masm32\include\windows.inc
include         \masm32\include\user32.inc
include         \masm32\include\kernel32.inc
include         \masm32\include\comctl32.inc
includelib      \masm32\lib\comctl32.lib
includelib      \masm32\lib\user32.lib
includelib      \masm32\lib\kernel32.lib
 
WinMain PROTO :DWORD, :DWORD, :DWORD, :DWORD
 
.CONST
 
IDC_PROGRESS            equ     1
IDC_STATUS              equ     2
IDC_TIMER               equ     3
 
.DATA
 
ClassName               db      "CommonControlWinClass", 0
AppName                 db      "Common Control Demo", 0
ProgressClass           db      "msctls_progress32", 0
Message                 db      "Finished!", 0
TimerID                 dd      0
 
.data?
hInstance               dd      ?
hwndProgress            dd      ?
hwndStatus              dd      ?
CurrentStep             dd      ?
 
.code
start:
        invoke  GetModuleHandle, NULL
        mov     hInstance, eax
        invoke  WinMain, hInstance, NULL, NULL, SW_SHOWDEFAULT
        invoke  ExitProcess, eax
        invoke  InitCommonControls
 
WinMain proc hInst:HINSTANCE, hPrevInst:HINSTANCE, CmdLine:LPSTR, CmdShow:DWORD
 LOCAL wc:WNDCLASSEX
 LOCAL msg:MSG
 LOCAL hwnd:HWND
 
        mov     wc.cbSize, SIZEOF WNDCLASSEX
        mov     wc.style,  CS_HREDRAW or CS_VREDRAW
        mov     wc.lpfnWndProc,  OFFSET WndProc
        mov     wc.cbClsExtra, NULL
        mov     wc.cbWndExtra, NULL
        push    hInst
        pop     wc.hInstance
        mov     wc.hbrBackground, COLOR_APPWORKSPACE
        mov     wc.lpszMenuName, NULL
        mov     wc.lpszClassName, OFFSET ClassName
        invoke  LoadIcon, NULL, IDI_APPLICATION
        mov     wc.hIcon, eax
        mov     wc.hIconSm, eax
        invoke  LoadCursor, NULL, IDC_ARROW
        mov     wc.hCursor, eax
        invoke  RegisterClassEx, addr wc
        invoke  CreateWindowEx, WS_EX_CLIENTEDGE, ADDR ClassName, ADDR AppName,
                                WS_OVERLAPPED + WS_CAPTION + WS_SYSMENU + WS_MINIMIZEBOX + \
                                WS_MAXIMIZEBOX + WS_VISIBLE, CW_USEDEFAULT,
                                CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL,
                                hInst, NULL
        mov     hwnd, eax
        .while TRUE
                invoke  GetMessage, ADDR msg, NULL, 0, 0
                .BREAK  .IF (!eax)
                invoke  TranslateMessage, ADDR msg
                invoke  DispatchMessage, ADDR msg
        .endw
        mov     eax, msg.wParam
        ret
WinMain endp
 
WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
 
        .if uMsg == WM_CREATE
                invoke CreateWindowEx, NULL, ADDR ProgressClass, NULL,
                                        WS_CHILD + WS_VISIBLE + PBS_SMOOTH + PBS_VERTICAL, 100,
                                        200, 300, 20, hWnd, IDC_PROGRESS,
                                        hInstance, NULL
                mov     hwndProgress, eax
 
                invoke  SendMessage, hwndProgress,  PBM_SETBARCOLOR,  0,  0000FFh
                invoke  SendMessage, hwndProgress,  PBM_SETBKCOLOR,  0,  800000h
 
 
                mov     eax, 1000
                mov     CurrentStep, eax
                shl     eax, 16
                invoke  SendMessage, hwndProgress, PBM_SETRANGE, 0, eax
                invoke  SendMessage, hwndProgress, PBM_SETSTEP, 10, 0
                invoke  CreateStatusWindow, WS_CHILD+WS_VISIBLE, NULL, hWnd, IDC_STATUS
                mov     hwndStatus, eax
                invoke  SetTimer, hWnd, IDC_TIMER, 25, NULL
                mov     TimerID, eax
 
 
 
        .elseif uMsg == WM_DESTROY
                invoke  PostQuitMessage, NULL
                .if TimerID != 0
                        invoke KillTimer, hWnd, TimerID
                .endif
        .elseif uMsg == WM_TIMER
                invoke  SendMessage, hwndProgress, PBM_STEPIT, 0, 0
                sub     CurrentStep, 10
                .if CurrentStep == 0
                        invoke  KillTimer, hWnd, TimerID
                        mov     TimerID, 0
                        invoke  SendMessage, hwndStatus, SB_SETTEXT, 0, addr Message
                        invoke  MessageBox, hWnd, addr Message, addr AppName, MB_OK + MB_ICONINFORMATION
                        invoke  SendMessage, hwndStatus, SB_SETTEXT, 0, 0
                        invoke  SendMessage, hwndProgress, PBM_SETPOS, 0, 0
                .endif
        .else
                invoke  DefWindowProc, hWnd, uMsg, wParam, lParam            
                ret
        .endif
        xor     eax, eax
        ret
WndProc endp
 
end start
 

prog.asm:1: error: attempt to define a local label before any non-local labels
prog.asm:2: error: attempt to define a local label before any non-local labels
prog.asm:2: error: parser: instruction expected
prog.asm:3: error: parser: instruction expected
prog.asm:5: error: parser: instruction expected
prog.asm:6: error: symbol `include' redefined
prog.asm:6: error: parser: instruction expected
prog.asm:7: error: symbol `include' redefined
prog.asm:7: error: parser: instruction expected
prog.asm:8: error: symbol `include' redefined
prog.asm:8: error: parser: instruction expected
prog.asm:9: error: parser: instruction expected
prog.asm:10: error: symbol `includelib' redefined
prog.asm:10: error: parser: instruction expected
prog.asm:11: error: symbol `includelib' redefined
prog.asm:11: error: parser: instruction expected
prog.asm:13: error: parser: instruction expected
prog.asm:37: error: parser: instruction expected
prog.asm:39: error: symbol `invoke' redefined
prog.asm:39: error: parser: instruction expected
prog.asm:40: error: symbol `invoke' redefined
prog.asm:40: error: parser: instruction expected
prog.asm:41: error: symbol `invoke' redefined
prog.asm:41: error: parser: instruction expected
prog.asm:43: error: symbol `WinMain' redefined
prog.asm:43: error: parser: instruction expected
prog.asm:44: error: parser: instruction expected
prog.asm:45: error: symbol `LOCAL' redefined
prog.asm:45: error: parser: instruction expected
prog.asm:46: error: symbol `LOCAL' redefined
prog.asm:46: error: parser: instruction expected
prog.asm:48: error: comma, colon or end of line expected
prog.asm:49: error: comma, colon or end of line expected
prog.asm:50: error: comma, colon or end of line expected
prog.asm:57: error: comma, colon or end of line expected
prog.asm:58: error: symbol `invoke' redefined
prog.asm:58: error: parser: instruction expected
prog.asm:61: error: symbol `invoke' redefined
prog.asm:61: error: parser: instruction expected
prog.asm:63: error: symbol `invoke' redefined
prog.asm:63: error: parser: instruction expected
prog.asm:64: error: symbol `invoke' redefined
prog.asm:64: error: parser: instruction expected
prog.asm:66: error: parser: instruction expected
prog.asm:67: error: parser: instruction expected
prog.asm:68: error: parser: instruction expected
prog.asm:70: error: parser: instruction expected
prog.asm:71: error: symbol `invoke' redefined
prog.asm:71: error: parser: instruction expected
prog.asm:72: error: parser: instruction expected
prog.asm:73: error: symbol `invoke' redefined
prog.asm:73: error: parser: instruction expected
prog.asm:74: error: symbol `invoke' redefined
prog.asm:74: error: parser: instruction expected
prog.asm:78: error: symbol `WinMain' redefined
prog.asm:78: error: parser: instruction expected
prog.asm:80: error: parser: instruction expected
prog.asm:82: error: parser: instruction expected
prog.asm:83: error: symbol `invoke' redefined
prog.asm:83: error: parser: instruction expected
prog.asm:84: error: parser: instruction expected
prog.asm:85: error: label or instruction expected at start of line
prog.asm:86: error: symbol `hInstance' redefined
prog.asm:86: error: parser: instruction expected
prog.asm:89: error: symbol `invoke' redefined
prog.asm:89: error: parser: instruction expected
prog.asm:90: error: symbol `invoke' redefined
prog.asm:90: error: parser: instruction expected
prog.asm:96: error: symbol `invoke' redefined
prog.asm:96: error: parser: instruction expected
prog.asm:97: error: symbol `invoke' redefined
prog.asm:97: error: parser: instruction expected
prog.asm:98: error: symbol `invoke' redefined
prog.asm:98: error: parser: instruction expected
prog.asm:100: error: symbol `invoke' redefined
prog.asm:100: error: parser: instruction expected
prog.asm:105: error: parser: instruction expected
prog.asm:106: error: symbol `invoke' redefined
prog.asm:106: error: parser: instruction expected
prog.asm:107: error: parser: instruction expected
prog.asm:108: error: symbol `invoke' redefined
prog.asm:108: error: parser: instruction expected
prog.asm:110: error: symbol `.elseif' redefined
prog.asm:110: error: parser: instruction expected
prog.asm:111: error: symbol `invoke' redefined
prog.asm:111: error: parser: instruction expected
prog.asm:113: error: symbol `.if' redefined
prog.asm:113: error: parser: instruction expected
prog.asm:114: error: symbol `invoke' redefined
prog.asm:114: error: parser: instruction expected
prog.asm:116: error: symbol `invoke' redefined
prog.asm:116: error: parser: instruction expected
prog.asm:117: error: symbol `invoke' redefined
prog.asm:117: error: parser: instruction expected
prog.asm:118: error: symbol `invoke' redefined
prog.asm:118: error: parser: instruction expected
prog.asm:119: error: symbol `invoke' redefined
prog.asm:119: error: parser: instruction expected
prog.asm:120: error: symbol `.endif' redefined
prog.asm:122: error: symbol `invoke' redefined
prog.asm:122: error: parser: instruction expected
prog.asm:124: error: symbol `.endif' redefined
prog.asm:127: error: symbol `WndProc' redefined
prog.asm:127: error: parser: instruction expected
prog.asm:129: error: parser: instruction expected

Standard output is empty