uClose - automatic way to close uTorrent

'Compiler http://www.lbbooster.com/

   arg$ = lower$(CommandLine$)
    if not(arg$ <> "") then
        print "[error] need the exactly title of the window. E.g. uClose.exe uTorrent 3.3.2"
        end

    else

        if instr(arg$, "utorrent") then
            arg$ = mid$(arg$, 10, 6)
            result$ = "µTorrent ";arg$

        else

            print "0"
            end

        end if

    end if

    CallDLL #user32, "FindWindowA",_
        _NULL as ulong,_
        result$ as ptr,_
        ut as ulong
    if ut = 0 then
        print ut
        end
    end if

    print "find handle " ; arg$ ; " " ; ut

    calldll #user32, "SendMessageA", _
        ut as ulong, _
        _WM_CLOSE as long, _
        result as long

    print arg$ ; " " ; ut ; " closed"
    end