Well, I've done some further testing, all of which has resulted in no manual focus control. I wrote the script below to try to figure out what was going on (be gentle, it's my first script!!) with the Property Cases 65 & 66, as well as what happens with the get/set_focus command. Setting props 65/66 to alternate values never changes any focus outcome. using the set_focus command doesn't appear to change anything at all. When I use cyril's build and do the Alt-up, and then zoom rocker, I can actually hear the lens trying to re-focus before it shuts down with the lens out... Any advice for me??
Does this script work for anybody else to manually set focus? I was testing by: point camera at something ~1meter away, then adjust numbers to something like ~3m away, set focus, take photo.
Keys:
Up: moves focus out 100mm
Down: moves focus in 100mm
Left: attempts to set focus to what you've defined
Set: takes photo
Right: quits
Zoom rocker goes between updating Property Case 65 & 66
(fyi, due to a limited knowledge of ubasic on my part, this script will only take 1 photo; 2nd photo always crashes it. I'm pretty sure it is a problem with how I used click "shoot_full"?? Any and all advice or edits to this code are welcome!!)
@title Manual Focus
@param a propcase
@default a 65
@param b focus mm
@default b 2000
press "shoot_half"
rem not sure if click "mf" works on cams without mf button?
click "mf"
:loop
wait_click
is_key k "zoom_in"
if k=1 then a=65
is_key k "zoom_out"
if k=1 then a=66
is_key k "up"
if k=1 then b=b+100
is_key k "down"
if k=1 then b=b-100
is_key k "left"
if k=1 then goto "setfocus"
is_key k "set"
if k=1 then click "shoot_full"
is_key k "right"
if k=1 then goto "lend"
get_prop a c
get_focus f
print a,"=",c ,"b=",b, "F=", f
goto "loop"
:lend
end
:setfocus
set_prop a b
set_focus b
get_prop a c
get_focus f
print a,"=",c ,"b=",b, "F=", f
goto "loop"
I know we'll figure this out eventually!!
Cheers!
-joe
