package Ġcom . ho angan ht uan 9 5 pt it . example Ċ Ċ import Ġandroid . os . Bundle Ċ import Ġandroidx . appcompat . app . AppCompatActivity Ċ import Ġcom . ho angan ht uan 9 5 pt it . draggable . Drag gable Panel Ċ import Ġcom . ho angan ht uan 9 5 pt it . draggable . utils . to Px Ċ import Ġcom . ho angan ht uan 9 5 pt it . example . fragment . Bottom Fragment Ċ import Ġcom . ho angan ht uan 9 5 pt it . example . fragment . Top Fragment Ċ import Ġkotlinx . android . synt hetic . main . activity _ custom .* Ċ import Ġkotlinx . android . synt hetic . main . layout _ bottom .* Ċ import Ġkotlin . math . max Ċ import Ġkotlin . math . min Ċ Ċ class ĠCustom Activity Ġ: ĠAppCompatActivity () Ġ{ ĊĊĠĠĠ Ġoverride Ġfun ĠonCreate ( savedInstanceState : ĠBundle ?) Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . onCreate ( savedInstanceState ) ĊĠĠĠĠĠĠĠ ĠsetContentView ( R . layout . activity _ custom ) ĊĊĠĠĠĠĠĠĠ Ġdraggable Panel . set Drag gable Listener ( object Ġ: ĠDrag gable Panel . Drag gable Listener Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġoverride Ġfun Ġon Expanded () Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġsuper . on Expanded () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġoverride Ġfun ĠonChange State ( state : ĠDrag gable Panel . State ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġoverride Ġfun ĠonChange Percent ( percent : ĠFloat ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġalpha . alpha Ġ= Ġ 1 Ġ- Ġpercent ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġshadow . alpha Ġ= Ġpercent ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġ}) ĊĊĠĠĠĠĠĠĠ Ġsupport FragmentManager . beginTransaction (). add ( R . id . frame Top , ĠTop Fragment ()). commit () ĊĠĠĠĠĠĠĠ Ġsupport FragmentManager . beginTransaction (). add ( R . id . frame Bottom , ĠBottom Fragment ()). commit () ĊĊĠĠĠĠĠĠĠ Ġbtn Max . setOnClickListener Ġ{ Ġdraggable Panel . max imize () Ġ} ĊĠĠĠĠĠĠĠ Ġbtn Min . setOnClickListener Ġ{ Ġdraggable Panel . minimize () Ġ} ĊĠĠĠĠĠĠĠ Ġbtn Close . setOnClickListener Ġ{ Ġdraggable Panel . close () Ġ} ĊĠĠĠĠĠĠĠ Ġbtn Set Height Max . setOnClickListener Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġheight Max Ġ= Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( et Height Max . text . isNotEmpty ()) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġheight Max Ġ= Ġet Height Max . text . toString (). toInt () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġheight Max Ġ= Ġmax ( height Max , Ġ 2 0 0 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġheight Max Ġ= Ġmin ( height Max , Ġ 4 0 0 ) ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġdraggable Panel . set Height Max ( height Max . to Px ()) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠ Ġ} Ċ } Ċ