package Ġuk . t vid al . k pi Ċ Ċ import Ġuk . t vid al . k pi . pwm . P wm Service Ċ import Ġuk . t vid al . k pi . pwm . P wm Service . Companion . PWM _ PIN Ċ import Ġw iring pi . PWM _ MODE _ MS Ċ import Ġw iring pi . PWM _ OUTPUT Ċ import Ġw iring pi . pin Mode Ċ import Ġw iring pi . pwm Set Clock Ċ import Ġw iring pi . pwm Set Mode Ċ import Ġw iring pi . pwm Set Range Ċ import Ġw iring pi . pwm Write Ċ Ċ object ĠPWM Ġ: ĠP wm Service Ġ{ ĊĊĠĠĠ Ġoverride Ġfun Ġstart ( range : ĠInt , Ġdivider : ĠInt ) Ġ{ ĊĠĠĠĠĠĠĠ Ġpin Mode ( PWM _ PIN . pin . toInt (), ĠPWM _ OUTPUT ) ĊĠĠĠĠĠĠĠ Ġpwm Set Mode ( PWM _ MODE _ MS ) ĊĠĠĠĠĠĠĠ Ġpwm Set Clock ( divider ) ĊĠĠĠĠĠĠĠ Ġpwm Set Range ( range . to UInt ()) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġstop () Ġ{ ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġinvoke ( data : ĠInt ) Ġ{ ĊĠĠĠĠĠĠĠ Ġpwm Write ( PWM _ PIN . pin . toInt (), Ġdata ) ĊĠĠĠ Ġ} Ċ } Ċ