?? lv20x0.bas
字號:
Public Const LV_STATUS_SET_1_B1 = &H89 ' Set camera status - part 1
' - byte 2 - bits as byPublic Const LV_GET_STATUS_1
Public Const LV_STATUS_SET_2_B1 = &H8A ' Set camera status - part 1
' - byte 2 - bits as byPublic Const LV_GET_STATUS_2
' *** CAMERA POWER ON/OFF *****************************************************
' ~~~ LV2000 ~~~
Public Const LV_POWER_SET_ON = &H3A000000 ' Camera Power ON
Public Const LV_POWER_SET_OFF = &H3E000000 ' Camera Power OFF
' *** MASKING PRIVACY ZONE ****************************************************
' ~~~ LV2010~~~
Public Const LV_MASK_SET_PAGE_B1 = &H82 ' Set the page of privacy zone - byte 1
' byte 2 - page number 0..5
Public Const LV_MASK_SET_DISPLAY_ON = &H8B010000 ' Set Mask display to ON
Public Const LV_MASK_SET_DISPLAY_OFF = &H8B000000 ' Set Mask display to OFF
Public Const LV_MASK_CLEAR_PAGE_B1 = &H83 ' Clear the page of privacy zone - byte 1
' byte 2 - page number 0..5
Public Const LV_MASK_SET_BLOCK_B1 = &H81 ' Set the block of masking privacy zone
' byte 2 - block number 0..35 (3 cols, 12 rows)
' byte 3 - bits 1=mask, 0=not mask the 1/8 subblock
' *****************************************************************************
' *** Key Actions *************************************************************
' Each Key command must be stopped by LV_KEY_STOP command
Public Const LV_KEY_NOT = &H5F000000 ' Do not do anything
Public Const LV_KEY_STOP = &H5F0C0000 ' Stop all key actions being performed
Public Const LV_KEY_ZOOM_TELE = &H5F010000 ' Zoom to Tele
Public Const LV_KEY_ZOOM_TELE_QUICK = &H5F020000 ' Zoom to Tele quickly
Public Const LV_KEY_ZOOM_WIDE = &H5F030000 ' Zoom to Wide
Public Const LV_KEY_ZOOM_WIDE_QUICK = &H5F040000 ' Zoom to Wide quickly
Public Const LV_KEY_TOGGLE_DIGIZOOM = &H5F220000 ' Toggle Digital Zoom mode ON/OFF
Public Const LV_KEY_FOCUS_FAR_QUICK = &H5F080000 ' Move focus to far quickly
Public Const LV_KEY_FOCUS_NEAR_QUICK = &H5F090000 ' Move focus to near quickly
Public Const LV_KEY_FOCUS_FAR_STEP = &H5F0A0000 ' Move focus to far by one step
Public Const LV_KEY_FOCUS_NEAR_STEP = &H5F0B0000 ' Move focus to near by one step
Public Const LV_KEY_TOGGLE_FOCUS_MODE = &H5F510000 ' Toggle between "Manual/Auto" and "Push Auto" modes
' LV2020: Toggle between "Manual/Auto" and "OneShot" modes
Public Const LV_KEY_IRIS_UP = &H5F420000 ' Increase iris
Public Const LV_KEY_IRIS_DN = &H5F430000 ' Decrease iris
Public Const LV_KEY_AGC_UP = &H5F440000 ' Increase AGC level
Public Const LV_KEY_AGC_DN = &H5F450000 ' Decrease AGC level
Public Const LV_KEY_WB_RED_UP = &H5F480000 ' Increase red level in special WB mode
Public Const LV_KEY_WB_RED_DN = &H5F490000 ' Decrease red level in special WB mode
Public Const LV_KEY_WB_BLUE_UP = &H5F4A0000 ' Increase blue level in special WB mode
Public Const LV_KEY_WB_BLUE_DN = &H5F4B0000 ' Decrease blue level in special WB mode
Public Const LV_KEY_TOGGLE_PUSH_WB = &H5F4E0000 ' Toggle Push White Balance mode ON/OFF
Public Const LV_KEY_MENU_SEL_UP = &H5F4F0000 ' Scroll the menu selection up
Public Const LV_KEY_MENU_SEL_DN = &H5F500000 ' Scroll the menu selection down
Public Const LV_KEY_MENU_DATA_UP = &H5F270000 ' Increase the data of the selected menu item
Public Const LV_KEY_MENU_DATA_DN = &H5F280000 ' Decrease the data of the selected menu item
Public Const LV_KEY_TOGGLE_MENU = &H5F250000 ' Toggle Menu ON/OFF
Public Const LV_KEY_TOGGLE_BACKLIGHT = &H5F1A0000 ' Toggle Backlight mode ON/OFF
Public Const LV_KEY_TOGGLE_FLICKERLESS = &H5F1B0000 ' Toggle Flickerless mode ON/OFF
Public Const LV_KEY_TOGGLE_NEGATIVE = &H5F1E0000 ' Toggle Negative mode ON/OFF
Public Const LV_KEY_TOGGLE_MONO = &H5F210000 ' Toggle Monochrome mode ON/OFF
Public Const LV_KEY_TOGGLE_DISPLAY = &H5F240000 ' Toggle On Screen Display (OSD) Key function ON/OFF
Public Const LV_KEY_TOGGLE_POWER = &H5F320000 ' Toggle camera power ON/OFF
' ~~~ LV2000 ~~~
Public Const LV_KEY_FOCUS_PUSH_AUTO = &H5F3F0000 ' In Push Auto mode, push the focus
' In Manual/Auto, toggle between Manual/Auto
Public Const LV_KEY_SHUTTER_UP = &H5F400000 ' Increase shutter speed
Public Const LV_KEY_SHUTTER_DN = &H5F410000 ' Decrease shutter speed
Public Const LV_KEY_BRIGHTNESS_UP = &H5F460000 ' Increase brightness
Public Const LV_KEY_BRIGHTNESS_DN = &H5F470000 ' Decrease brightness
Public Const LV_KEY_HUE_UP = &H5F4C0000 ' Increase hue
Public Const LV_KEY_HUE_DN = &H5F4D0000 ' Decrease hue
Public Const LV_KEY_SHARPNESS_UP = &H5F530000 ' Increase sharpness level
Public Const LV_KEY_SHARPNESS_DN = &H5F540000 ' Decrease sharpness level
Public Const LV_KEY_RESET_SETTINGS = &H5F520000 ' Reset the camera mode to default
Public Const LV_KEY_FOCUS_FAR = &H5F380000 ' Move focus to far slowly
Public Const LV_KEY_FOCUS_NEAR = &H5F390000 ' Move focus to near slowly
' ~~~ LV2010 ~~~
Public Const LV_KEY_SHUTTER_AE_INC = &H5F290000 ' Increase shutter speed (in all AE modes)
Public Const LV_KEY_SHUTTER_AE_DEC = &H5F3A0000 ' Decrease shutter speed (in all AE modes)
Public Const LV_KEY_MOVE_ZOOM_REPEAT = &H5F560000 ' Move Zoom position repeatedly x1->x8->x1
Public Const LV_KEY_FOCUS_PUSHAUTO_MODE = &H5F570000 ' Push_auto mode in focus mode
Public Const LV_KEY_SWITCH_LIGHT = &H5F580000 ' Turn light ON/OFF
' ~~~ LV2010, LV2020 ~~~
Public Const LV_KEY_FOCUS_SWITCH_MODE = &H5F050000 ' In Auto/Manual mode switch between Auto/Manual
' In Focus OneShot mode make focus
Public Const LV_KEY_FOCUS_SWITCH_AUTMAN = &H5F060000 ' If in Auto/Manual mode, switch between Auto/Manual
Public Const LV_KEY_FOCUS_IN_PUSHAUTO = &H5F070000 ' LV2010: If in Focus PushAuto mode, make focus
' LV2020: If in Focus OneShot mode, make focus
Public Const LV_KEY_DIGEFF_SWITCH = &H5F0E0000 ' Switch between 7 digital effect modes
Public Const LV_KEY_SHUTTER_INC = &H5F0F0000 ' Increase shutter speed (in shutter fix or manual mode)
Public Const LV_KEY_SHUTTER_DEC = &H5F100000 ' Decrease shutter speed (in shutter fix or manual mode)
Public Const LV_KEY_WB_SWITCH_UP = &H5F110000 ' Switch between 5 White Balance modes up
Public Const LV_KEY_WB_SWITCH_DN = &H5F120000 ' Switch between 5 White Balance modes up
Public Const LV_KEY_WB_HUE_INC = &H5F130000 ' Increase hue in manual WB mode
Public Const LV_KEY_WB_HUE_DEC = &H5F140000 ' Decrease hue in manual WB mode
Public Const LV_KEY_BRIGHTNESS_INC = &H5F150000 ' Increase brightness in auto, shut.fix or AGC fix mode
Public Const LV_KEY_BRIGHTNESS_DEC = &H5F160000 ' Decrease brightness in auto, shut.fix or AGC fix mode
Public Const LV_KEY_SHARPNESS_INC = &H5F170000 ' Increase sharpness level
Public Const LV_KEY_SHARPNESS_DEC = &H5F180000 ' Decrease sharpness level
Public Const LV_KEY_SWITCH_IRIS = &H5F190000 ' Switch between Auto/Manual Iris mode
Public Const LV_KEY_DIGEFF_SWITCH_ART = &H5F1C0000 ' Switch ART digital effect ON/OFF
Public Const LV_KEY_DIGEFF_SWITCH_MIR = &H5F1D0000 ' Switch MIRROR digital effect ON/OFF
Public Const LV_KEY_DIGEFF_SWITCH_NEG = &H5F1E0000 ' Switch 100% NEGATIVE digital effect ON/OFF
Public Const LV_KEY_DIGEFF_SWITCH_WIDE = &H5F200000 ' Switch WIDE digital effect ON/OFF
Public Const LV_KEY_DIGEFF_SWITCH_MONO = &H5F210000 ' Switch MONOCHROME digital effect ON/OFF
Public Const LV_KEY_FACTORY_DEFAULTS = &H5F230000 ' Return to factory default state
Public Const LV_KEY_SWITCH_OSD_MODE = &H5F550000 ' Switch operating OSD Display modes
Public Const LV_KEY_SWITCH_AE_MODE_UP = &H5F590000 ' Switch autoexposure modes up
Public Const LV_KEY_SWITCH_AE_MODE_DN = &H5F5A0000 ' Switch autoexposure modes down
' ~~~ LV2020 ~~~
Public Const LV_KEY_DIGEFF_SWITCH_NEG90 = &H5F1F0000 ' Switch 80% NEGATIVE digital effect ON/OFF
Public Const LV_KEY_SWITCH_DAY_NIGHT = &H5F570000 ' Switch Day&Night mode ON/OFF
Public Const LV_KEY_SWITCH_FREEZE = &H5F580000 ' Switch freeze mode ON/OFF
Public Const LV_KEY_SET_INTEGRATION = &H5F5B0000 ' Set integration mode
' ----------------------------------------------------------------------------
Public Declare Sub Lv20x0ControlDlg Lib "Lv20x0" _
(ByVal iCameraType As Long, _
ByVal iComPort As Long, ByVal iCameraId As Long)
Public Declare Sub Lv20x0ControlDlgEx Lib "Lv20x0" _
(ByVal iCameraType As Long, _
ByVal iComPort As Long, ByVal iCameraId As Long, _
ByVal iLeft As Long, ByVal iTop As Long)
Public Declare Function LvCloseComm Lib "Lv20x0" () As Long
Public Declare Function LvOpenComm Lib "Lv20x0" _
(ByVal ucCommPort As Byte) As Long
Public Declare Function LvOpenCommEx Lib "Lv20x0" _
(ByVal ucCommPort As Byte, _
ByVal iSpeed As Long) As Long
Public Declare Function LvSendByteCmd Lib "Lv20x0" _
(ByVal ucSend1 As Byte, ByVal ucSend2 As Byte, _
ByVal ucSend3 As Byte, ByVal ucCameraID As Byte) As Long
Public Declare Function LvSendByteCmdEx Lib "Lv20x0" _
(ByVal ucSend1 As Byte, ByVal ucSend2 As Byte, _
ByVal ucSend3 As Byte, ByVal ucCameraID As Byte, _
ByRef ucReturn1 As Byte, ByRef ucReturn2 As Byte, _
ByRef ucReturn3 As Byte, ByRef ucReturn4 As Byte) As Long
Public Declare Function LvSendCmd Lib "Lv20x0" (ByVal dwCmd As Long) As Long
Public Declare Function LvSendCmdEx Lib "Lv20x0" _
(ByVal dwCmd As Long, _
ByRef ucReturn1 As Byte, ByRef ucReturn2 As Byte, _
ByRef ucReturn3 As Byte, ByRef ucReturn4 As Byte) As Long
Public Declare Function LvSendCmdWithStop Lib "Lv20x0" _
(ByVal dwCmd As Long) As Long
' Helper functions
Public Declare Function LvGetFocusLensPos Lib "Lv20x0" _
(ByRef wFocus As Integer, ByVal ucCameraID As Byte) As Long
Public Declare Function LvGetZoomLensPos Lib "Lv20x0" _
(ByRef wZoom As Integer, ByRef ucDigiZoom As Byte, _
ByVal ucCameraID As Byte) As Long
Public Declare Function LvGetAutoExpAreaWeights Lib "Lv20x0" _
(ByRef ucAreaWeight1 As Byte, _
ByRef ucAreaWeight2 As Byte, _
ByVal ucCameraID As Byte) As Long
Public Declare Function LvSetAutoExpAreaWeights Lib "Lv20x0" _
(ByVal ucAreaWeight1 As Byte, _
ByVal ucAreaWeight2 As Byte, _
ByVal ucCameraID As Byte) As Long
' ~~~ LV2000, LV2010 ~~~
Public Declare Function LvMemorizeZoom Lib "Lv20x0" _
(ByVal ucIndex As Byte, _
ByVal wZoom As Integer, _
ByVal ucCameraID As Byte) As Long
Public Declare Function LvMemorizeFocus Lib "Lv20x0" _
(ByVal ucIndex As Byte, _
ByVal wFocus As Integer, _
ByVal ucCameraID As Byte) As Long
' ~~~ LV2010, LV2020 ~~~
Public Declare Function LvSetShutter Lib "Lv20x0" _
(ByVal ucShutter As Byte, _
ByVal ucCameraID As Byte) As Long
Public Declare Function LvGetShutter Lib "Lv20x0" _
(ByRef ucShutter As Byte, _
ByVal ucCameraID As Byte) As Long
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -