[View]  [Edit]  [Lock]  [References]  [Attachments]  [History]  [Home]  [Changes]  [Search]  [Help] 

test[dji8-ios] C2 HandheldController

" Accessing handheldController "
| value |
DJISDKManager product isNil ifTrue: [ ^self abortPage ].
value := DJISDKManager product handheldController.
value isNil ifTrue: [ ^self print: 'Missing value' ].
(value class selectors
  select: [:each| (each startsWith: #is) and: [each argumentCount = 0] ])
  ,#( )
  do: [:msg| self print: ' ',msg,'=',(value perform: msg) ].


" Accessing properties... "
| object echo |
object := DJISDKManager product handheldController.
#(	StickGimbalControlEnabled
) do: [:each|
	echo := [:value| self print: '// ',each ,'=',value ].
	object perform: #with ,each ,$: with: echo
].