TENVIS PTZ Camera Support - Need help writing Perl module

Anything you want added or changed in future versions of ZoneMinder? Post here and there's a chance it will get in! Search to make sure it hasn't already been requested.
Post Reply
hunternet93
Posts: 5
Joined: Sat Feb 26, 2011 6:59 pm

TENVIS PTZ Camera Support - Need help writing Perl module

Post by hunternet93 »

I just bought a couple TENVIS JPT3815W wireless PTZ cameras, they work great in ZM but don't have a PTZ control module yet. I figured out the protocol, but being a Perl noob I haven't figured out how to create the module. If someone could point me to the documentation, or modify one of the existing modules from the specs below, I'd appriciate it.

The cameras use HTTP basic auth, use port 7777 and user/pass admin/admin by default.

Control URL: /media/?action=cmd&code=X&value=X

The code variable supports the following:
code=2 - start moving specified axis
code=3 - stop moving specified axis
code=5 - contrast, value 0-10, default 4
code=6 - brightness, value 0-10 default 5
code=11 - set preset, value is preset 1-6
code=13 - use preset, value is preset 1-6

Camera axes:
1 up
2 down
3 right
4 left
5 up+right
6 up+left
7 down+right
8 down+left
hunternet93
Posts: 5
Joined: Sat Feb 26, 2011 6:59 pm

Re: TENVIS PTZ Camera Support - Need help writing Perl modul

Post by hunternet93 »

After a few hours of head-desking, I managed to get the thing working properly. I've posted the scripts in the User Contributions section, here: http://www.zoneminder.com/forums/viewto ... =9&t=22401
Post Reply