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

test[dji8-ios] A0 BaseProduct

" Accessing the current product "
| product |
product := DJISDKManager product.
product isNil ifTrue: [
  self print: '// There is no product connected'.
  self print: '// Ensure you are running connected to an aircraft/camera or connected to DJI simulator'.
  self print: '// Aborting the test set.'.
  ^self abort

self print: 'Connected to a ',product class name.
self print: 'Model: ',product model.

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