Управление на SONY (SNCRZ25N) камери за Zoneminder-1.24.2
от Илия Няголов на авг..14, 2010, категории Линукс, Мрежата
Още едно кратко постче от морето.
Малко код от скрипта.
sub presetHome
{
my $self = shift;
Debug( „Move Stop“ );
my $cmd = „/command/presetposition.cgi?HomePos=ptz-recall“;
$self->sendCmd( $cmd );
}sub moveAbsUp
{
my $self = shift;
Debug( „Move up“ );
my $cmd = „/command/ptzf.cgi?move=up“;
$self->sendCmd( $cmd );
}
sub moveAbsUpLeft
{
my $self = shift;
Debug( „Move up-left“ );
my $cmd = „/command/ptzf.cgi?move=up-left“;
$self->sendCmd( $cmd );
}
sub moveAbsUpRight
{
my $self = shift;
Debug( „Move up-right“ );
my $cmd = „/command/ptzf.cgi?move=up-right“;
$self->sendCmd( $cmd );
}sub moveAbsDown
{
my $self = shift;
Debug( „Move Down“ );
my $cmd = „/command/ptzf.cgi?move=down“;
$self->sendCmd( $cmd );
}
sub moveAbsDownLeft
{
my $self = shift;
Debug( „Move Down-left“ );
my $cmd = „/command/ptzf.cgi?move=down-left“;
$self->sendCmd( $cmd );
}
sub moveAbsDownRight
{
my $self = shift;
Debug( „Move Down-right“ );
my $cmd = „/command/ptzf.cgi?move=down-right“;
$self->sendCmd( $cmd );
}sub moveAbsLeft
{
my $self = shift;
Debug( „Move Left“ );
my $cmd = „/command/ptzf.cgi?move=left“;
$self->sendCmd( $cmd );
}sub moveAbsRight
{
my $self = shift;
Debug( „Move Right“ );
my $cmd = „/command/ptzf.cgi?move=right“;
$self->sendCmd( $cmd );
}sub zoomRelTele
{
my $self = shift;
# my $params = shift;
# my $step = $self->getParam( $params, ‘step’ );
Debug( „Zoom Tele“ );
my $cmd = „/command/ptzf.cgi?Move=tele,2“;
$self->sendCmd( $cmd );
}sub zoomRelWide
{
my $self = shift;
# my $params = shift;
# my $step = $self->getParam( $params, ‘step’ );
Debug( „Zoom Wide“ );
my $cmd = „/command/ptzf.cgi?Move=wide,2“;
$self->sendCmd( $cmd );
}
Целия файл може да изтеглите от тук. Пробвал съм с камера Sony SNCRZ25N и всичко работеше перфектно.
Дано Ви бъдат полезни и скриншотите.
Няма да навлизам в подробности кое точно как става, но човек който знае какво търси, ще се оправи перфектно :).