CAMremote et CHDK

Les radios commandes, déclencheurs divers et variés. Les circuits électroniques et autres bidouillages.

CAMremote et CHDK

Messagede Deltakap le Mer 31 Octobre 2012, 14:31

Pour faire suite à la conversation de Nicolas commencée ici: viewtopic.php?f=3&t=4427&start=40#p48749, j'ouvre ce nouveau sujet pour discuter de la commande d'un canon avec chdk depuis un camremote (parce que là bas, je ne m'y retrouve plus moi-même :mrgreen: )

Donc le script http://vp-systems.eu/download/cr.bas fonctionne mais ne fait qu'afficher les commandes, rien d'autre ne se passe.

Nicolas, tu as quel apn ?
Dernière édition par Deltakap le Ven 02 Novembre 2012, 13:20, édité 3 fois.
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede Deltakap le Mer 31 Octobre 2012, 15:16

En attendant, j'ai trafiqué "un peu" le script d'origine pour ne garder pour l'instant que le déclenchement, le zoom in et le zoom out .
Tous les autres boutons afficheront le nom de la commande suivi de "(unused)" (on verra plus tard ce qu'on en fait)

Nicolas, peux-tu essayer ce script ?
Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()


print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
print c
if c>67 then gosub "pwroff"
if c>58 then gosub "stop_video"
if c>53 then gosub "tvdn"
if c>48 then gosub "tvup"
if c>40 then gosub "avdn"
if c>35 then gosub "avup"
if c>28 then gosub "rec_video"
if c>21 then gosub "zout"
if c>13 then gosub "zin"
if c>8 then gosub "focusoff"
if c>5 then gosub "focus"
if c>0 then gosub "shoot"
wend
end

:shoot
c=0
print "shoot"
shoot
sleep 1500
return

:rec_video
c=0
print "rec_video (unused)"
return

:stop_video
c=0
print "stop_video (unused)"
return

:focus
c=0
print "focus (unused)"
return

:focusoff
c=0
print "release (unused)"
return

:zin
c=0
z=z+n
if z>m then z=m
set_zoom z
print"zoomin (z=";z;")"
sleep 1000
return

:zout
c=0
z=z-n
if z<0 then z=0
set_zoom z
print "zoomout (z=";z;")"
sleep 1000
return

:avup
c=0
print ":Av+= (unused)"
return

:avdn
c=0
print "Av-= (unused)"
return

:tvup
c=0
print "Tv+ (unused)"
return

:tvdn
c=0
print "Tv-= (unused)"
return

:pwroff
c=0
print "poweroff(unused)"
return
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Mer 31 Octobre 2012, 19:33

Heu ben grand MERCI Gilbert
car maintenant j ai la possibilité de zoomer in et out fois 10
seul HIC, je ne peux plus prendre de photos ...
avant j'appuyais sur la touche 7
mais la rien
et les autres touches non plus malheureusement
aurais tu une idée ?

Merci
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Mer 31 Octobre 2012, 21:07

nicoger a écrit:je ne peux plus prendre de photos ...
avant j'appuyais sur la touche 7
mais la rien

Normalement quand tu appuies sur cette touche 7, tu dois avoir un nombre qui s'affiche en bas de l'écran de l'apn suivi éventuellement d'un message genre "shoot", "rec_video", etc...
Peux-tu me donner ce numéro ?

nicoger a écrit:et les autres touches non plus malheureusement
aurais tu une idée ?

Là oui, j'ai tout viré sauf le déclenchement et le zoom, donc c'est normal ;)
Peux-tu d'ailleurs me donner tous les numéros affichés sur l'apn pour chaque touche de la télécommande ?
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Mer 31 Octobre 2012, 23:30

Deltakap a écrit:
nicoger a écrit:je ne peux plus prendre de photos ...
avant j'appuyais sur la touche 7
mais la rien

Normalement quand tu appuies sur cette touche 7, tu dois avoir un nombre qui s'affiche en bas de l'écran de l'apn suivi éventuellement d'un message genre "shoot", "rec_video", etc...
Peux-tu me donner ce numéro ?

nicoger a écrit:et les autres touches non plus malheureusement
aurais tu une idée ?

Là oui, j'ai tout viré sauf le déclenchement et le zoom, donc c'est normal ;)
Peux-tu d'ailleurs me donner tous les numéros affichés sur l'apn pour chaque touche de la télécommande ?


Merci a toi
mais la j ai un souci
sur mon retour vidéo, les bords sont un peu rognés et je ne vois qu'une partie des chiffres
pour la touche 7 il me semble que ça se termine par un 0
et pour la touche 8 par un 3
mais ma lipo 11V qui gère mon écran et recepteur se décharge en qq minutes
donc galère pour voir ça
c est d'ailleurs un sujet que je vais devoir ouvrir dans le forum
pourquoi une lipo quasi neuve se décharge en qq mn comme ça ?
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Mer 31 Octobre 2012, 23:37

nicoger a écrit:sur mon retour vidéo, les bords sont un peu rognés et je ne vois qu'une partie des chiffres

En ajoutant "set_backlight(1)" dans les premières lignes du script, tu devrais avoir l'affichage de l'apn allumé ;)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 0:01

Deltakap a écrit:
nicoger a écrit:sur mon retour vidéo, les bords sont un peu rognés et je ne vois qu'une partie des chiffres

En ajoutant "set_backlight(1)" dans les premières lignes du script, tu devrais avoir l'affichage de l'apn allumé ;)

dans les premières lignes ou ça ?
avant n=1 ?
car j ai essayé comme ça et rien ...
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 0:11

Oups!...
set_backlight 1
devrait mieux fonctionner

Oui, juste avant n=1 par exemple
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 9:53

ben malheureusement ça n affiche rien a l écran
et comme mon cordon USB gère la vidéo aussi
dès que je branche je perd l'écran de l APN ...

c est bien set_backlight 1 qu il faut mettre ?
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 10:26

nicoger a écrit:ben malheureusement ça n affiche rien a l écran
et comme mon cordon USB gère la vidéo aussi
dès que je branche je perd l'écran de l APN ...

c est bien set_backlight 1 qu il faut mettre ?

Oui, c'est bien ça.
Le set_backlight 0 pour éteindre et set_backlight 1 pour allumer avaient été testés avec succès sur le S95 par rdd, mais sans doute sans le mini-usb branché. Et là visiblement le branchement de la prise prend le dessus sur cette instruction :?

Bon sinon, si c'est un problème de lecture sur les bords, tu peux toujours remplacer le print c (avant tous les if) par print "********** ";c
Ça va décaler à droite
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 10:42

ben ça ne marche pas non plus
mais quand j'appuie sur le bouton 7 de ma télécommande
je vois AV unused
et sur le bouton 8 j ai REC VIDEO unused
ça peut t aider ?
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 10:46

nicoger a écrit:ça peut t aider ?

Yes ;)
Av+ ou Av- ?
Tu n'as plus qu'à me dire sur quels boutons tu appuies pour le zoom in et le zoom out... et on sort un script qui fait déclenchement et zoom ;)
Et c'est encore mieux si tu as les petits messages pour chaque touche de la télécommande
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 10:55

OUPS j avais merdé avec ta commande
j ai réussi
donc le bouton 7 donne le chiffre 40

par contre le 8 c est space me donne plusieurs chiffres
60 et 32 avec rec video et top video

pour la zoom in c est la touche 1 avec le chifre qui commence au 17 et augmente a chaque impulsion
et zoom out c est la touche 3 qui commence a 24

et il me semble qu il y a un moyen de gerer le focus car j avais vu ça dans des menus avant
mais la les autres touches ne donnent rien pourquoi ?
la j ai la 10 qui me donne un AV+ avec un chiffre de 37 a 45
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 11:14

Est-ce que tu peux essayer ce script ?
Il ne fait rien d'autre que d'afficher "action" suivi d'un nombre. Mais j'aurais besoin de ce nombre pour chaque bouton de la télécommande
par exemple:
bouton 1 = action 5
bouton 2 = action 8
etc...
pour les 8 ou 12 boutons

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()
set_backlight 1

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
rem print c
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8  then gosub "action3"
if c>5  then gosub "action2"
if c>0  then gosub "action1"
wend
end


:action1
c=0
print "action 1"
gosub "unused"
return

:action2
c=0
print "action 2"
gosub "unused"
return

:action3
c=0
print "action 3"
gosub "unused"
return

:action4
c=0
print "action 4"
gosub "unused"
return

:action5
c=0
print "action 5"
gosub "unused"
return

:action6
c=0
print "action 6"
gosub "unused"
return

:action7
c=0
print "action 7"
gosub "unused"
return

:action8
c=0
print "action 8"
gosub "unused"
return

:action9
c=0
print "action 9"
gosub "unused"
return

:action10
c=0
print "action 10"
gosub "unused"
return

:action11
c=0
print "action 11"
gosub "unused"
return

:action12
c=0
print "action 12"
gosub "unused"
return


:unused
rem print "unused button"
return
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 12:27

T ES UN CHEF GILBERT
alors voici ce que ça nous donne
bouton 1 = action 4
bouton 2 et 5 = rien sur l apn car inclinaison
bouton 4 et 6 = rien sur l apn car rotation nacelle
bouton 3 = action 5
bouton 7 = action 7
bouton 8 = action 6 et action 11
bouton 10 = action 8
bouton 11 donne action 7 (étrange non ?)
les boutons 9 et 12 ne donnent rien, pourquoi ?

et encore grand merci pour ton aide
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 12:43

C'est bizarre qu'on n'ait pas quelque chose de plus "propre" au niveau des résultats.

Je vais encore t'embêter avec une autre étape intermédiaire:
Ce code va juste afficher une valeur.
Sur le même principe que tout à l'heure, peux-tu me donner les valeurs pour chaque bouton ? (sauf 2,4,5,6 ;))

Code: Tout sélectionner
while 1
  do
    c = get_usb_power
  until c>0
  print ">>>>>>> ";c
  sleep 200
wend
end
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 12:52

Deltakap a écrit:C'est bizarre qu'on n'ait pas quelque chose de plus "propre" au niveau des résultats.

Je vais encore t'embêter avec une autre étape intermédiaire:
Ce code va juste afficher une valeur.
Sur le même principe que tout à l'heure, peux-tu me donner les valeurs pour chaque bouton ? (sauf 2,4,5,6 ;))

Code: Tout sélectionner
while 1
  do
    c = get_usb_power
  until c>0
  print ">>>>>>> ";c
  sleep 200
wend
end


heu je créé un script avec ça seulement ?
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 12:58

alors j ai
bouton 1 = 17 19 etc ... pour le zoom
bouton 3 = 24 26 etc zoom out
bouton 7 = j ai eu 38 au premier clic de couton puis 40 ensuite
bouton 8 = 33 puis 64 puis 34 puis 63
bouton 10 = 43
bouton 11 = 39 38 37 et a nouveau 39

BOUTONS 9 ET 12 RIEN
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 13:54

Bon, il y a deux trucs bizarres:
-Les boutons 7 et 11 qui donnent la même valeur
-Le bouton 8 qui donne 2 valeurs
On va faire avec :wink:

Donc (si je ne me suis pas planté) voici un script avec:
-le zoom in sur le bouton 1
-le zoom out sur le bouton 3
-le déclenchement sur le bouton 7 (et aussi sur le bouton 11)

Restent les boutons 8 et 11 pour faire autre chose (rien pour l'instant)

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
rem print c
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8  then gosub "action3"
if c>5  then gosub "action2"
if c>0  then gosub "action1"
wend
end


:action1
c=0
print "action 1"
gosub "error"
return

:action2
c=0
print "action 2"
gosub "error"
return

:action3
c=0
print "action 3"
gosub "error"
return

:action4
rem button1
c=0
gosub "zin"
return

:action5
rem button3
c=0
gosub "zout"
return

:action6
rem button8
c=0
print "action 6 / button 8"
gosub "unused"
return

:action7
rem button7 & button11
c=0
gosub "shoot"
return

:action8
rem button10
c=0
print "action 8 / button 10"
gosub "unused"
return

:action9
c=0
print "action 9"
gosub "error"
return

:action10
c=0
print "action 10"
gosub "error"
return

:action11
rem button8
c=0
print "action 11 / button 8"
gosub "unused"
return

:action12
c=0
print "action 12"
gosub "unused"
return



:shoot
print "shoot"
shoot
sleep 1500
return

:zin
z=z+n
if z>m then z=m
set_zoom z
print"zoom in (z=";z;")"
sleep 1000
return

:zout
z=z-n
if z<0 then z=0
set_zoom z
print "zoom out (z=";z;")"
sleep 1000
return

:error
print "error !"
return

:unused
print "unused button"
return
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 14:02

et Mince
ça ne marche pas avec ce script
résultat : toutes les touches error
sauf les 8 et 10 qui donnent ZOOM IN
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 14:15

Ah ? :?

Peux-tu remplacer les deux dernières fonctions tout en bas par:
(avec un sleep 500 en plus dans chacune)

Code: Tout sélectionner
:error
print "error !"
sleep 500
return

:unused
print "unused button"
sleep 500
return




Edit: Je le remets en entier avec l'action12 corrigée (mais c'est pas ça qui gène)

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
rem print c
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8  then gosub "action3"
if c>5  then gosub "action2"
if c>0  then gosub "action1"
wend
end


:action1
c=0
print "action 1"
gosub "error"
return

:action2
c=0
print "action 2"
gosub "error"
return

:action3
c=0
print "action 3"
gosub "error"
return

:action4
rem button1
c=0
gosub "zin"
return

:action5
rem button3
c=0
gosub "zout"
return

:action6
rem button8
c=0
print "action 6 / button 8"
gosub "unused"
return

:action7
rem button7 & button11
c=0
gosub "shoot"
return

:action8
rem button10
c=0
print "action 8 / button 10"
gosub "unused"
return

:action9
c=0
print "action 9"
gosub "error"
return

:action10
c=0
print "action 10"
gosub "error"
return

:action11
rem button8
c=0
print "action 11 / button 8"
gosub "unused"
return

:action12
c=0
print "action 12"
gosub "error"
return



:shoot
print "shoot"
shoot
sleep 1500
return

:zin
z=z+n
if z>m then z=m
set_zoom z
print"zoom in (z=";z;")"
sleep 1000
return

:zout
z=z-n
if z<0 then z=0
set_zoom z
print "zoom out (z=";z;")"
sleep 1000
return

:error
print "error !"
sleep 500
return

:unused
print "unused button"
sleep 500
return

Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 14:49

malheureusement même chose
tout en error
sauf les touche 8 et 10 qui sont zoom in
???
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 15:05

Et je ne vois pas pour l'instant où est la boulette :?

On peut réessayer en affichant de nouveau la valeur de c ? (comme ça on va pouvoir la lire pour chaque touche)

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
print ">>>>>>>>> ";c
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8 then gosub "action3"
if c>5 then gosub "action2"
if c>0 then gosub "action1"
wend
end


:action1
c=0
print "action 1"
gosub "error"
return

:action2
c=0
print "action 2"
gosub "error"
return

:action3
c=0
print "action 3"
gosub "error"
return

:action4
rem button1
c=0
gosub "zin"
return

:action5
rem button3
c=0
gosub "zout"
return

:action6
rem button8
c=0
print "action 6 / button 8"
gosub "unused"
return

:action7
rem button7 & button11
c=0
gosub "shoot"
return

:action8
rem button10
c=0
print "action 8 / button 10"
gosub "unused"
return

:action9
c=0
print "action 9"
gosub "error"
return

:action10
c=0
print "action 10"
gosub "error"
return

:action11
rem button8
c=0
print "action 11 / button 8"
gosub "unused"
return

:action12
c=0
print "action 12"
gosub "error"
return



:shoot
print "shoot"
shoot
sleep 1500
return

:zin
z=z+n
if z>m then z=m
set_zoom z
print"zoom in (z=";z;")"
sleep 1000
return

:zout
z=z-n
if z<0 then z=0
set_zoom z
print "zoom out (z=";z;")"
sleep 1000
return

:error
print "error !"
sleep 500
return

:unused
print "unused button"
sleep 500
return

Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 15:19

idem
tout en error
sauf 10 et 11 qui zoom in
on regresse la ...

malheureusement j ai écrasé un script que j ai essayé de bidouiller avec le tiens
qui marchait
j avait le zoom in et out et déclenchement
mais sur d autre touche
j ai juste modifié les chiffres après if c> avec les chiffres que je t annoncais tout a l heure
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 15:23

Peux-tu me redonner les valeurs de c pour chaque touche avec le tout dernier script juste au dessus (la valeur après le >>>>>>>)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 15:42

Ma Lipo est encore HS
je recharge
sinon je viens de tester ce script
qui prend des photos en appuyant sur le 7
et qui zoom dézoom en appuyant sur le 10

@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK


n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()


print "CR: USB/CHDK"
while 1
do
c = get_usb_power
until c>0
print "********** ";c
if c>67 then gosub "pwroff"
if c>58 then gosub "stop_video"
if c>53 then gosub "tvdn"
if c>48 then gosub "tvup"
if c>40 then gosub "focusoff"
if c>35 then gosub "focus"
if c>28 then gosub "shoot"
if c>21 then gosub "zout"
if c>17 then gosub "zin"
if c>8 then gosub "focusoff"
if c>5 then gosub "focus"
if c>0 then gosub "shoot"
wend
end

:shoot
if m=1 then gosub "stop_video"
print "********** ";c;":shoot"
c=0
press "shoot_full"
sleep 1500
release "shoot_full"
release "shoot_half"
return

:rec_video
c=0
print "rec_video (unused)"
return

:stop_video
c=0
print "stop_video (unused)"
return

:focus
c=0
print "focus (unused)"
return

:focusoff
c=0
print "release (unused)"
return

:zin
c=0
z=z+n
if z>m then z=m
set_zoom z
print"zoomin (z=";z;")"
sleep 1000
return

:zout
c=0
z=z-n
if z<0 then z=0
set_zoom z
print "zoomout (z=";z;")"
sleep 1000
return

:avup
c=0
print ":Av+= (unused)"
return

:avdn
c=0
print "Av-= (unused)"
return

:tvup
c=0
print "Tv+ (unused)"
return

:tvdn
c=0
print "Tv-= (unused)"
return

:pwroff
c=0
print "poweroff(unused)"
return
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 15:50

Sinon, une version plus simple basée sur le script qui fonctionnait tout à l'heure:

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()
set_backlight 1

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
print ">>>>>>>> ";c
if c>58 then gosub "button8"
if c>40 then gosub "button10"
if c>35 then gosub "shoot"
if c>28 then gosub "button8"
if c>21 then gosub "zout"
if c>13 then gosub "zin"
wend
end


:button8
c=0
print "button 8"
return

:button10
c=0
print "button 10"
return

:shoot
c=0
print "shoot"
shoot
sleep 1500
return

:zin
c=0
z=z+n
if z>m then z=m
set_zoom z
print"zoom in (z=";z;")"
sleep 1000
return

:zout
c=0
z=z-n
if z<0 then z=0
set_zoom z
print "zoom out (z=";z;")"
sleep 1000
return




nicoger a écrit:j ai juste modifié les chiffres après if c> avec les chiffres que je t annoncais tout a l heure

Attention quand tu modifies ces valeurs... elles doivent encadrer les valeurs que tu as relevé (pas être égales)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 15:55

raté seul zoom in fonctionne avec la touche 10
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 16:02

Bin là, je comprends plus :?

Bon, quitte à revenir en arrière, peux-tu réessayer celui là:
(c'est celui qui marchait tout à l'heure, celui qui affiche juste un numéro d'action quand tu appuies sur un bouton)

Code: Tout sélectionner
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()
set_backlight 1

print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
rem print c
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8  then gosub "action3"
if c>5  then gosub "action2"
if c>0  then gosub "action1"
wend
end


:action1
c=0
print "action 1"
gosub "unused"
return

:action2
c=0
print "action 2"
gosub "unused"
return

:action3
c=0
print "action 3"
gosub "unused"
return

:action4
c=0
print "action 4"
gosub "unused"
return

:action5
c=0
print "action 5"
gosub "unused"
return

:action6
c=0
print "action 6"
gosub "unused"
return

:action7
c=0
print "action 7"
gosub "unused"
return

:action8
c=0
print "action 8"
gosub "unused"
return

:action9
c=0
print "action 9"
gosub "unused"
return

:action10
c=0
print "action 10"
gosub "unused"
return

:action11
c=0
print "action 11"
gosub "unused"
return

:action12
c=0
print "action 12"
gosub "unused"
return


:unused
rem print "unused button"
return
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 16:06

BINGO Gilbert
en lisant ta réponse à Francois
je me suis rendu compte que j étais en mode CHDK USB +
je l ai remis en simple et ça marche

Merci encore mille fois
t assures grave
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 16:15

Il me semblait bien qu'il y avait une autre m*rdouille que les scripts eux-mêmes :mrgreen:
(Tu as changé en cours de route ?)

J'avais posé la question sur l'autre post parce qu'ici personne ne l'aurait vue au milieu de tous ces scripts ;)

Bin du coup, tu gardes quel script ?

Et puis reste aussi la question des boutons 9 et 12 qui ne servent à rien (Si quelqu'un a une idée? ça se paramètre quelque part?)

Sinon, pour l'instant, il te reste les boutons 8 et 10 qui ne sont pas utilisés (mais qui eux peuvent servir à quelque chose)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 16:20

ben en lisant ton autre post
je me suis dis "mince je suis en quel mode moi ??"
et bingo en mode + (qui sert a quoi faudra que je demande à Linnar de VP systems)
je garde donc l'avant dernier que tu as envoyé
la le zoom fonctionne bien avec les touches 1 et 3
et le déclenchement avec le bouton 7
parfait quoi

pour les autres touches focus c est le réglage avant de prendre la photo non ?
ça pourrait être utile ou pas ?


Code:
@title CR-CHDK - Modifs for Nicoger - rev1
rem inspired by VP-Systems (rev 15-04-2012)
rem 31-10-2012
rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK

n=1
m=get_zoom_steps()
if m>10 then n=m/10
z=get_zoom()
set_backlight 1

print "CR: USB/CHDK"
while 1
do
c = get_usb_power
until c>0
print ">>>>>>>> ";c
if c>58 then gosub "button8"
if c>40 then gosub "button10"
if c>35 then gosub "shoot"
if c>28 then gosub "button8"
if c>21 then gosub "zout"
if c>13 then gosub "zin"
wend
end


:button8
c=0
print "button 8"
return

:button10
c=0
print "button 10"
return

:shoot
c=0
print "shoot"
shoot
sleep 1500
return

:zin
c=0
z=z+n
if z>m then z=m
set_zoom z
print"zoom in (z=";z;")"
sleep 1000
return

:zout
c=0
z=z-n
if z<0 then z=0
set_zoom z
print "zoom out (z=";z;")"
sleep 1000
return
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 16:45

nicoger a écrit:et bingo en mode + (qui sert a quoi faudra que je demande à Linnar de VP systems)

D'après le script original (http://vp-systems.eu/download/cr.bas), ça doit être un peu plus rapide à répondre à l'appui sur un bouton mais avec le risque de se tromper de commande :?
Donc pas si intéressant que ça.

nicoger a écrit:je garde donc l'avant dernier que tu as envoyé

C'était pas mon préféré, mais c'est pas grave ;)

nicoger a écrit:pour les autres touches focus c est le réglage avant de prendre la photo non ?
ça pourrait être utile ou pas ?

Dans le script original, il faut effectivement faire un focus pour faire la map avant de prendre une photo. Dans les scripts ci-dessus, j'ai utilisé la commande "shoot" qui fait la mise au point à chaque fois avant de prendre la photo (avec cette commande, le focus se fait tout seul)


Par contre, toujours dans le script original, il y a la possibilité de passer en mode vidéo à distance (ça peut être marrant).... on le rajoutera plus tard si tu as envie de jouer avec (mais bon, les vidéos en kap, c'est pas super génial)




Edit: Le manuel du CAMremote (http://vp-systems.eu/manual_cr_v2.1.pdf) explique comment accéder aux 12 commandes présentes dans le script de vp-systems (par une combinaison de touches tout simplement)..... mais je ne trouve rien sur la télécommande 12 boutons (qui doit aussi avoir ce système de combinaison)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 17:50

Je ne l ai pas sur mon portable
mais sur mon PC chez moi Linnar me l avais envoyé
donc je pourrais te la filer ou la copier sur le forum
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede Deltakap le Jeu 01 Novembre 2012, 22:50

nicoger a écrit:donc je pourrais te la filer ou la copier sur le forum

Ok ;)
J'aimerais bien comprendre effectivement comment on active les 12 commandes prévues dans le script d'origine avec cette télécommande 12 boutons (dont déjà 4 canaux sont utilisés pour les servos)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede nicoger le Jeu 01 Novembre 2012, 23:06

et me voici de retour sur Paname
et voici donc la copié d écran de la notice des télécommandes

Image

j'espère que ça pourra t'aider Gilbert ?
nicoger
Plus de 1000 messages
 
Messages: 1349
Inscription: Dim 01 Janvier 2012, 20:31
Localisation: PARIS 17°

Re: CAMremote et CHDK

Messagede michelenovo le Ven 02 Novembre 2012, 0:45

Comme dit mon frère (à propos de certains jeux video): il faut avoir fait dix ans de conservatoire pour y arriver, à votre truc....
Avatar de l’utilisateur
michelenovo
Plus de 1000 messages
 
Messages: 1353
Inscription: Dim 07 Août 2011, 12:11
Localisation: Novossibirsk (Russie)

Re: CAMremote et CHDK

Messagede pete le Ven 02 Novembre 2012, 10:38

+ 1 :lol:

J'espere qu'après ils feront profiter à tout le monde de leurs connaissances.

Un beau mode d'emploi "camremote pour les nuls"


Amicalement,
P.
Avatar de l’utilisateur
pete
Plus de 1000 messages
 
Messages: 1690
Inscription: Dim 20 Mai 2012, 12:08
Localisation: Pas loin de l'Aiguille creuse

Re: CAMremote et CHDK

Messagede Deltakap le Ven 02 Novembre 2012, 13:00

pete a écrit:J'espere qu'après ils feront profiter à tout le monde de leurs connaissances.

On ne fait rien d'autre ;)
Comme je te l'ai déjà écrit ailleurs, ouvre un nouveau sujet en décrivant ce que tu veux et avec quel matériel... parce que là j'ai juste compris que tu voulais un script tout fait.... mais un script qui fait quoi ?



@Nicolas: merci pour la doc ;)
Bon déjà (pour la 12 boutons) il y a au moins une erreur !
On lit:
3 Drive pan servo right
6 zoom out +(roll or zoom) servo down or IR/CH3 channel*
C'est l'inverse, on l'a vérifié ensemble... il faut lire:
3 zoom out +(roll or zoom) servo down or IR/CH3 channel*
6 Drive pan servo right
Et puis si on regarde comment est foutue la disposition des touches, c'est un peu plus logique ;)

Après, dans la combinaison des touches (12+x), il manque l'accès au focus in et au focus out (Nicolas, si tu as du courage, on peut essayer de trouver ces 2 combinaisons de touches qui manquent)

Un autre truc, il y a forcement un bug dans le soft CAMremote au niveau du bouton 7 qui actionne l'avup (gosub "avup") dans le script vp-systems alors que seul le bouton 11 devrait l'activer. Le bouton 7 devrait activer le gosub "shoot"
Si quelqu'un se sent d'expliquer ça in english à Linaar :?

Edit: On avait relevé 2 valeurs de c pour la touche 8... on trouve l'explication sur la notice: A chaque appui sur cette touche, on bascule du mode photo à vidéo et de vidéo à photo avec le script vp-systems... il faut bien détecter 2 valeurs pour un seul bouton ;)
Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Re: CAMremote et CHDK

Messagede Deltakap le Ven 02 Novembre 2012, 15:38

Suite...

Nicolas, est-ce que tu pourrais m'essayer ce script pour déterminer le mapping des touches du CAMremote 12 boutons.
Il affiche juste "actionx" pour chaque touche appuyée sur l'émetteur et ne fonctionne qu'en "Control Method: USB/CHDK" (pas CHDK+)

Je m'attends à trouver ça:
bouton 1 = action4
bouton 3 = action5
bouton 7 = action7 (mais ça aurait dû être action1)
bouton 8 = alternativement action6 et action11
bouton 10 = action8
bouton 11 = action7
bouton 12+2 = action10
bouton 12+3 = action9
bouton 12+5 = action13

Si tu peux essayer aussi toutes les combinaisons 12 + une autre touche (de 1 à 11), tu trouveras surement l'action2 et l'action3.


Code: Tout sélectionner
@title CR-CHDK - CAM remote button mapping
rem inspired by VP-Systems (rev 15-04-2012)
rem 02-11-2012


rem CAMremote-1/2 (4-pin USB connector). Control Method: USB/CHDK


print "CR: USB/CHDK"
while 1
do
  c = get_usb_power
until c>0
rem print ">>>>>> ";c
if c>74 then gosub "action13"
if c>67 then gosub "action12"
if c>58 then gosub "action11"
if c>53 then gosub "action10"
if c>48 then gosub "action9"
if c>40 then gosub "action8"
if c>35 then gosub "action7"
if c>28 then gosub "action6"
if c>21 then gosub "action5"
if c>13 then gosub "action4"
if c>8 then gosub "action3"
if c>5 then gosub "action2"
if c>0 then gosub "action1"
wend
end


:action1
c=0
print "action 1"
return

:action2
c=0
print "action 2"
return

:action3
c=0
print "action 3"
return

:action4
c=0
print "action 4"
return

:action5
c=0
print "action 5"
return

:action6
c=0
print "action 6"
return

:action7
c=0
print "action 7"
return

:action8
c=0
print "action 8"
return

:action9
c=0
print "action 9"
return

:action10
c=0
print "action 10"
return

:action11
c=0
print "action 11"
return

:action12
c=0
print "action 12"
return

:action13
c=0
print "action 13"
return

Avatar de l’utilisateur
Deltakap
Plus de 1000 messages
 
Messages: 1432
Inscription: Lun 22 Septembre 2008, 11:35
Localisation: Du coté de Granville

Suivante

Retourner vers L'électronique embarquée et au sol

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 3 invités