package Ġk Lo ops . examples Ċ Ċ import Ġk Lo ops . music .* Ċ Ċ fun Ġmain () Ġ{ ĊĠĠĠ Ġset Pulse Period ( 9 Ġo Ġ 8 ) ĊĠĠĠ Ġval Ġrun Background Tasks Ġ= Ġstart Background Tasks () ĊĠĠĠ Ġloop (" dr ums ") Ġ{ ĊĠĠĠĠĠĠĠ Ġsequ encer (_ 8 th ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" k Ġ. Ġk Ġk Ġ. Ġk Ġk Ġk Ġch ". play ( track (" dr ums "), Ġ 0 . 5 ) ĊĠĠĠĠĠĠĠĠĠĠĠ ĠlistOf (" kick Ġ 4 ", Ġ".", Ġ".", Ġ" kick Ġ 4 ", Ġ".", Ġ".", Ġ" kick Ġ 4 ", Ġ".", Ġ". "). play ( track (" dr ums "), Ġ 1 . 0 ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ ĠThread . sleep ( 5 0 0 0 ) ĊĊĠĠĠ Ġloop (" keys ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġch ord Ġ= ĠlistOf ( listOf (" e 3 ", Ġ" g 4 ", Ġ" b 4 "), ĠlistOf (" a 3 ", Ġ" c 4 ", Ġ" e 4 ")). tick () ĊĠĠĠĠĠĠĠ Ġtrack (" keys Ġ 2 "). play Ch ord Async ( ch ord , Ġ_ 1 6 th , Ġ 0 . 3 ) ĊĠĠĠĠĠĠĠ Ġsil ence ( 8 Ġo Ġ 8 ) ĊĠĠĠĠĠĠĠ Ġtrack (" keys Ġ 1 "). play Ch ord ( ch ord , Ġ_ 1 6 th , Ġ 0 . 2 ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġrun When Event (" b ass ", Ġtrigger Events Ġ= ĠlistOf (" loop _ pulse ")) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġnotes Ġ= ĠlistOf (" e 0 Ġ. Ġe 0 Ġb 0 Ġ. Ġb 0 Ġg 0 Ġg 0 ", Ġ" a 0 Ġ. Ġa 0 Ġe 0 Ġ. Ġe 0 Ġc 0 Ġc 0 "). tick (" ch ord "). to Seq () ĊĠĠĠĠĠĠĠ Ġnotes . forEach Ġ{ Ġnote Ġ-> ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtrack (" b ass "). play Async ( note , Ġ_ 1 6 th , ĠlistOf ( 0 . 5 , Ġ 0 . 2 ). tick ()) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġsil ence (_ 8 th ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġrun When Event (" pad ", Ġtrigger Events Ġ= ĠlistOf (" loop _ pulse ")) Ġ{ ĊĠĠĠĠĠĠĠ Ġtrack (" pad "). play Async ( listOf (" e 5 ", Ġ" a 5 "). tick (), Ġ_ half , Ġ 0 . 0 5 ) ĊĠĠĠĠĠĠĠ Ġsil ence (_ 4 th ) ĊĠĠĠĠĠĠĠ Ġtrack (" dr ums "). play (" sn are ", Ġ_ 8 th , Ġ 0 . 8 ) ĊĠĠĠĠĠĠĠ Ġtrack (" dr ums "). play (" con ga Ġmid ", Ġ_ 1 6 th , Ġ 0 . 1 ) ĊĠĠĠĠĠĠĠ Ġtrack (" dr ums "). play (" closed Ġhi hat ", Ġ_ 1 6 th , Ġ 0 . 3 ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġrun Background Tasks . forEach Ġ{ Ġit . join () Ġ} Ċ }