Прокомментируйте часть кода

#WM_CAP_START = #WM_USER
 
#WM_CAP_SET_CALLBACK_ERROR = #WM_CAP_START + 2
#WM_CAP_SET_CALLBACK_STATUS = #WM_CAP_START + 3
#WM_CAP_SET_CALLBACK_YIELD = #WM_CAP_START + 4
#WM_CAP_SET_CALLBACK_FRAME = #WM_CAP_START + 5
#WM_CAP_SET_CALLBACK_VIDEOSTREAM = #WM_CAP_START + 6
#WM_CAP_SET_CALLBACK_WAVESTREAM = #WM_CAP_START + 7
 
#WM_CAP_DRIVER_CONNECT        =  #WM_USER + 10
#WM_CAP_DRIVER_DISCONNECT     =  #WM_USER + 11
#WM_CAP_DRIVER_GET_CAPS = #WM_CAP_START + 14
 
#WM_CAP_DLG_VIDEOFORMAT = #WM_CAP_START + 41
#WM_CAP_DLG_VIDEOSOURCE = #WM_CAP_START + 42
#WM_CAP_DLG_VIDEODISPLAY = #WM_CAP_START + 43
 
#WM_CAP_SET_PREVIEW = #WM_CAP_START + 50
#WM_CAP_SET_PREVIEWRATE = #WM_CAP_START + 52
#WM_CAP_GET_STATUS = #WM_CAP_START + 54
 
#WM_CAP_FILE_SAVEDIB          =  #WM_USER + 25
#WM_CAP_SET_SCALE             =  #WM_USER + 53
 
#WM_CAP_SET_CALLBACK_CAPCONTROL = #WM_CAP_START + 85;Непонятные константы которых можно и не знать
 
Structure VIDEOHDR;Это возвращается камерой
  lpData.l;Данные(кадр)
  dwBufferLength.l;Размер буфера
  dwBytesUsed.l;Количество использованных байт в буфере
  dwTimeCaptured.l
  dwUser.l;Что это?
  dwFlags.l;А это?
  dwReserved.l[3];А вот это?
EndStructure
 
Procedure FrameCallback(lwnd.l, *lpVHdr.VIDEOHDR);Процедура принимающая кадр и сведения о нём
  For k=0 To *lpVHdr\dwBufferLength-1;цикл количеством интеграций в длину буфера
    Color = PeekB(*lpVHdr\lpData+k);Присвоение переменной значения цвета из байт
    PokeB(*lpVHdr\lpData+k, RGB(Blue(Color), Green(Color), Red(Color)));разложение цвета на составляющие
;Я конечно понимаю что ето в демонстративных целях, только интересно поему дебаггер не выводит значение переменной?
    ;Данные представлены в буфере одномерным массивом из байт? А чему равна длинна этого массива, площади кадра? как определить ширину и высоту картинки? как внести данные Color в другой, многомерный массив размерностью с картинку - получить из одномерного массива байт или просто из всего этого многомерный массив цветовых значений соответсвующий XY изображения.
Картинку хочется обработать, но не понятно как мне по ней циклами работать. For на длинну и For на ширину.
  Next
EndProcedure
 
hWnd = OpenWindow(0, 0, 0, 500, 300, "WebCamTest", #PB_Window_SystemMenu | #PB_Window_ScreenCentered);Получаем указатель на окно.
 
If OpenLibrary(0, "AVICAP32.DLL")
 
  hWebcam = CallFunction(0, "capCreateCaptureWindowA", 0, #WS_VISIBLE + #WS_CHILD, 10, 10, 200, 160, hWnd, 0);Собственно окошко с картинкой, хочется его убрать, но используется его хэдл, что с ним делать не представляю. Подсказать можете?
 
  CallFunction(0, "capSetCallbackOnFrame", hWebcam, @FrameCallback());Вызов процедуры с передачей ей структуры, вроде.
 
  SendMessage_(hWebcam, #WM_CAP_DRIVER_CONNECT          , 0 , 0);Подключение устройства, литературы по функциям не нашёл, по этому одни загадки и догадки.
;Но предполагаю что первый ноль ето порядковый номер подключаемого устройства, только от изменения цифры показывать отказывается.
  SendMessage_(hWebcam, #WM_CAP_SET_SCALE               , 1 , 0);Вписывает в видеоокошко изображение, если первый параметр 0 то выводит как есть
  SendMessage_(hWebcam, #WM_CAP_SET_PREVIEWRATE         , 10, 0);Задержка в милисекундах
  SendMessage_(hWebcam, #WM_CAP_SET_PREVIEW             , 1 , 0)
  SendMessage_(hWebcam, #WM_CAP_SET_CALLBACK_FRAME      , 1 , @FrameCallback());передача библиотеке указателя на процедуру принимающую структуру
;Интересно зачем вторые нолики и что делают остальные непрокомментированные функции
 
  Repeat
    Event = WindowEvent()
    Select Event
      Case #PB_Event_CloseWindow
        Quit = 1
    EndSelect
  Until Quit = 1
  SendMessage_(hWebcam, #WM_CAP_DRIVER_DISCONNECT, 0, 0);Отключение устройства
  CloseWindow(0)
  CloseLibrary(0)
EndIf

Procedure FrameCallback(lwnd.l, *lpVHdr.VIDEOHDR)
  For k=0 To *lpVHdr\dwBufferLength-1
    Color = PeekB(*lpVHdr\lpData+k)
    PokeB(*lpVHdr\lpData+k, RGB(Blue(Color), Green(Color), Red(Color)))
  Next
EndProcedure