Page 1 of 1

TENVIS PTZ Camera Support - Need help writing Perl module

Posted: Sat Jul 05, 2014 9:04 pm
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

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

Posted: Wed Jul 09, 2014 4:35 pm
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