package Ġcom . s ama . android . views Ċ Ċ import Ġandroid . graphics . Color Ċ import Ġandroid . graphics . drawable . Color Drawable Ċ import Ġandroid . os . Bundle Ċ import Ġandroid . support . v 4 . app . Dialog Fragment Ċ import Ġandroid . view . LayoutInflater Ċ import Ġandroid . view . View Ċ import Ġandroid . view . ViewGroup Ċ import Ġandroid . widget . EditText Ċ import Ġandroid . widget . TextView Ċ import Ġcom . ram otion . fluid slider . Fluid Slider Ċ import Ġcom . s ama . android . R Ċ Ċ class ĠCreate N go Dialog Ġ: ĠDialog Fragment () Ġ{ ĊĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĠĠĠĠĠĠĠ Ġfun Ġnew Instance (): ĠCreate N go Dialog Ġ= ĠCreate N go Dialog () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġinterface ĠOn Accept Ġ{ ĊĠĠĠĠĠĠĠ Ġfun Ġon Accept ( name : ĠString , Ġdescription : ĠString , Ġfunds Per Child : ĠInt ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġvar Ġon Accept : ĠOn Accept ? Ġ= Ġnull ĊĊĠĠĠ Ġoverride Ġfun ĠonCreate ( savedInstanceState : ĠBundle ?) Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . onCreate ( savedInstanceState ) ĊĠĠĠĠĠĠĠ Ġset Style ( STYLE _ NO _ TITLE , Ġandroid . R . style . Theme _ Ho lo _ Light _ Dialog ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun ĠonCreate View ( in flater : ĠLayoutInflater , Ġcontainer : ĠViewGroup ?, ĠsavedInstanceState : ĠBundle ?): ĠView ? Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġroot View Ġ= Ġinflater !!. inflate ( R . layout . fram gment _ ngo _ dialog , Ġcontainer , Ġfalse ) ĊĊĠĠĠĠĠĠĠ Ġval Ġmax Ġ= Ġ 3 0 0 0 ĊĠĠĠĠĠĠĠ Ġval Ġmin Ġ= Ġ 0 ĊĠĠĠĠĠĠĠ Ġval Ġtotal Ġ= Ġmax Ġ- Ġmin ĊĊĠĠĠĠĠĠĠ Ġvar Ġfunds Label Ġ= Ġroot View . findViewById < EditText >( R . id . fund s ) ĊĠĠĠĠĠĠĠ Ġvar Ġslider Ġ= Ġroot View . findViewById < Fluid Slider >( R . id . slider ) ĊĊĠĠĠĠĠĠĠ Ġslider . position Listener Ġ= Ġ{ Ġpos Ġ-> ĊĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġdon ation Amount Ġ= Ġmin Ġ+ Ġ( total Ġ* Ġpos ). toInt () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġslider . bubble Text Ġ= Ġ"${ don ation Amount }" ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfunds Label . setText ("${ don ation Amount }", ĠTextView . Buffer Type . NORMAL ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġslider . start Text Ġ= Ġ"$ min " ĊĠĠĠĠĠĠĠ Ġslider . end Text Ġ= Ġ"$ max " ĊĊĠĠĠĠĠĠĠ Ġroot View . findViewById < View >( R . id . accept ). setOnClickListener ({ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġon Accept ?. let Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvar ĠfullName Ġ= Ġroot View . findViewById < TextView >( R . id . fullName ). text . toString () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġfunds Ġ= Ġroot View . findViewById < TextView >( R . id . fund s ). text . toString (). toInt () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġdescription Ġ= Ġroot View . findViewById < TextView >( R . id . description Label ). text . toString () ĊĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġon Accept ?. let Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġit . on Accept ( name Ġ= ĠfullName , Ġdescription Ġ= Ġdescription , Ġfunds Per Child Ġ= Ġfunds ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdismiss () ĊĠĠĠĠĠĠĠ Ġ}) ĊĊĠĠĠĠĠĠĠ Ġreturn Ġroot View ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun ĠonStart () Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . onStart () ĊĠĠĠĠĠĠĠ Ġval Ġd Ġ= Ġdialog ĊĠĠĠĠĠĠĠ Ġdialog . set Canceled On Touch Outside ( true ) ĊĠĠĠĠĠĠĠ Ġif Ġ( d Ġ!= Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġwidth Ġ= ĠViewGroup . LayoutParams . MATCH _ PARENT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġheight Ġ= ĠViewGroup . LayoutParams . WRAP _ CONTENT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġd . window !!. setBackground Drawable ( Color Drawable ( Color . TRANSP ARENT )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġd . window !!. setLayout ( width , Ġheight ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ }