Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Table of Contents
minLevel3
outlinetrue
stylenone

 

Background

Installing V4I4j

View file
nameUCAM_installation.pdf
height250

Hardware Setup

Hardware setup for USB Camera is as simple as plugging in the Camera to a USB port on the micro controller (Raspberry Pi or other).

...

Code Block
languagexml
titleFind TempSensor query
linenumberstrue
<<NewFacetInstance fid="tsm" name="file" type="SffHttpStaticFileFacet">
  <OnActivate>
    <Process>
      <BasePath>[:AppBase:]</BasePath>
      <TailPath>index.html</TailPath>
      <Resource>res</Resource>
    </Process>
  </OnActivate>
</NewFacetInstance>

 

...

Source Code

Import into TQLStudio

ProjectNameImport Link
USB Camera ModelUSBCamera

 

 

Complete Source Code

Code Block
languagexml
titleComplete USBCamera Model
linenumberstrue
collapsetrue
<Namespace Name="Atomiton">
  <Domain Name="Cameras">
    <Def Name="ImageSize">
      <Number Name="Height" Default="0"/>
      <Number Name="Width" Default="0"/>
    </Def>
    <Def Name="CameraConfig">
      <Number Name="Channel" Default="0"/>
      <Number Name="Standard" Default="0"/>
      <Number Name="Brightness" Default="0"/>
      <Number Name="Contrast" Default="0"/>
      <Number Name="Gamma" Default="286"/>
      <Number Name="Saturation" Default="65"/>
      <Number Name="Sharpness" Default="6"/>
      <Number Name="Hue" Default="0"/>
      <Number Name="Gain" Default="0"/>
      <Number Name="Quality" Default="80"/>
    </Def>
    <Def Name="USBCameraParams">
      <ImageSize Name="Size"/>
      <CameraConfig Name="Configuration"/>
      <String Name="SaveToDisk" Default="true"/>
      <String Name="ImageFormat" Default="jpeg"/>
      <String Name="ImageName" Default="usb_camera.jpeg"/>
    </Def>
    <ThingFacet Name="USBCameraFacet">
      <String Name="Image" KnownBy="USBCameraImageAction"/>
      <USBCameraParams Name="USBCameraParameters"/>
      <Action Name="USBCameraImageAction" Documentation="Get the image from USB Camera">
        <Workflow Limit="1" Live="1" Timeout="-1">
          <Task name="Main" while="true">
            <Event name="Argument" as="ActionArgument"/>
            <Invoke name="GetImage" waitFor="ActionArgument" post="ucam://">
              <Message>
                <Value>
                  <USBCameraParameters>
                    <ImageFormat>
                      [%:Event.Argument.USBCameraParameters.ImageFormat.Value:%]
                    </ImageFormat>
                    <SaveToDisk>
                      [%:Event.Argument.USBCameraParameters.SaveToDisk.Value:%]
                    </SaveToDisk>
                    <ImageName>
                      [%:Event.Argument.USBCameraParameters.ImageName.Value:%]
                    </ImageName>
                    <Size>
                      <Height>
                        [%:Event.Argument.USBCameraParameters.Size.Height.Value:%]
                      </Height>
                      <Width>
                        [%:Event.Argument.USBCameraParameters.Size.Width.Value:%]
                      </Width>
                    </Size>
                    <Configuration>
                      <Standard>
                        [%:Event.Argument.USBCameraParameters.Configuration.Standard.Value:%]
                      </Standard>
                      <Quality>
                        [%:Event.Argument.USBCameraParameters.Configuration.Quality.Value:%]
                      </Quality>
                      <Channel>
                        [%:Event.Argument.USBCameraParameters.Configuration.Channel.Value:%]
                      </Channel>
                      <Brightness>
                        [%:Event.Argument.USBCameraParameters.Configuration.Brightness.Value:%]
                      </Brightness>
                      <Contrast>
                        [%:Event.Argument.USBCameraParameters.Configuration.Contrast.Value:%]
                      </Contrast>
                      <Gamma>
                        [%:Event.Argument.USBCameraParameters.Configuration.Gamma.Value:%]
                      </Gamma>
                      <Gain>
                        [%:Event.Argument.USBCameraParameters.Configuration.Gain.Value:%]
                      </Gain>
                      <Sharpness>
                        [%:Event.Argument.USBCameraParameters.Configuration.Sharpness.Value:%]
                      </Sharpness>
                      <Saturation>
                        [%:Event.Argument.USBCameraParameters.Configuration.Saturation.Value:%]
                      </Saturation>
                      <Hue>
                        [%:Event.Argument.USBCameraParameters.Configuration.Hue.Value:%]
                      </Hue>
                    </Configuration>
                  </USBCameraParameters>
                </Value>
              </Message>
            </Invoke>
            <Log Message="******Invoked USBCamera******"/>
            <Output name="Result" as="ActionResult">
              <Value>
                <Image>
                  [%:[%:@Output:%]Invoke.GetImage.Message.Value:%]
                </Image>
              </Value>
            </Output>
          </Task>
        </Workflow>
      </Action>
    </ThingFacet>
    <ThingModel name="USBCameraModel" combines="USBCameraFacet">
      <Sid name="camId"/>
    </ThingModel>
  </Domain>
</Namespace>

...