Now I have a little script , that translates the
ps="A/CHDK/LUALIB/GEN/propset"..pn..'.lua'- to *.m files.
What sense does that make with a Canon Basic Script?
srsa_4c´s script has
System.Create()
ret = LoadScript("A/camspec.m")
with
public sub get_prop(id,buf,len)
get_prop = GetPropertyCase(id,len) ' registered by System.Create'
*buf = get_prop
end sub
private sub set_prop(id,buf,len)
set_prop = SetPropertyCase(id,*buf,len) ' registered by System.Create'
end sub
dim PROPCASE_TV=277
dim PROPCASE_TV2=276
dim PROPCASE_AV=23
dim PROPCASE_AV2=22
dim PROPCASE_SV_BASE=34
dim PROPCASE_SV=359
dim PROPCASE_ISO_MODE=158
dim PROPCASE_DELTA_SV=87
dim PROPCASE_SV_MARKET=260
in camspec.m (for M6)
So ret = LoadScript("A/propset11.m") should be possible too. (reduced Lua´s require("propset"))
(Edit: While Lua´s loadstring(...), dofile(...) and require(...) enhance the script´s global environment, CBasic´s LoadScript(...) is more like a function call with it´s own local code.)
On N,N2 LCDMsg_SetStr is same color in play & rec mode.
a=LCDMsg_Create()
LCDMsg_ChangeColor(a,cl)
LCDMsg_Move(a,1,lin)
LCDMsg_SetStr(a,"..,....1....,....2....,....3..")
BeepDrive(3)
Wait(5000)
'Still havn´t found CB-script switch to <Rec> on Ns...'
Edit: (PBButton turns cam off, and no Evnt SW1/2 opens lens, (never does))'Edit2: A single Quote for comment lets my editor see strings, needs a 2nd quote at eol.'
Edit3: I recall some/which? propcases are 'readonly' (e.g. metering_mode).
Is Canon Basic Nested If Bug proof?