package Ġcom . farm il ify . client Ċ Ċ import Ġandroid . content . Context Ċ import Ġandroid . content . Intent Ċ import Ġandroid . content . SharedPreferences Ċ import Ġandroidx . appcompat . app . AppCompatActivity Ċ import Ġandroid . os . Bundle Ċ import Ġandroid . widget . EditText Ċ import Ġkotlinx . android . synt hetic .* Ċ import Ġkotlinx . android . synt hetic . main . activity _ login .* Ċ import Ġkotlinx . android . synt hetic . main . activity _ register .* Ċ import Ġorg . jetbrains . ank o . alert Ċ import Ġorg . jetbrains . ank o . sdk 2 7 . coroutines . onClick Ċ import Ġjava . util . regex . Matcher Ċ import Ġjava . util . regex . Pattern ĊĊ Ċ class ĠLogin Activity Ġ: ĠAppCompatActivity (), ĠLogin View Ġ{ ĊĠĠĠ Ġoverride Ġfun ĠonSuccess Login ( response : ĠResult Login ) Ġ{ ĊĠĠĠĠĠĠĠ Ġalert Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtitle Ġ= Ġ" Sel amat , Ġand a Ġber hasil Ġmas uk Ġ! " ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmessage Ġ= Ġresponse . message . toString () ĊĠĠĠĠĠĠĠ Ġ}. show () ĊĠĠĠĠĠĠĠ Ġval Ġshared Preferences Ġ= Ġthis @ Login Activity . get SharedPreferences (" my shared pref ", ĠContext . MODE _ PRIVATE ) ĊĠĠĠĠĠĠĠ Ġval Ġeditor Ġ= Ġshared Preferences . edit () ĊĠĠĠĠĠĠĠ Ġeditor . put Boolean (" has Login ", Ġtrue ) ĊĠĠĠĠĠĠĠ Ġeditor . putString (" username ", Ġresponse . user ?. username Ġ) ĊĠĠĠĠĠĠĠ Ġeditor . apply () ĊĠĠĠĠĠĠĠ Ġeditor . commit () ĊĠĠĠĠĠĠĠ Ġval Ġintent Ġ= ĠIntent ( this , ĠDashboard :: class . java ) ĊĠĠĠĠĠĠĠ ĠstartActivity ( intent ) ĊĠĠĠĠĠĠĠ Ġfinish () ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġoverride Ġfun ĠonError Login ( msg : ĠString ?) Ġ{ ĊĠĠĠĠĠĠĠ Ġalert Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtitle Ġ= Ġ" Ak un Ġg agal Ġmas uk Ġ! " ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmessage Ġ= Ġmsg Ġ?: Ġ"" ĊĠĠĠĠĠĠĠ Ġ}. show () ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġoverride Ġfun ĠonCreate ( savedInstanceState : ĠBundle ?) Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . onCreate ( savedInstanceState ) ĊĠĠĠĠĠĠĠ ĠsetContentView ( R . layout . activity _ login ) ĊĊĠĠĠĠĠĠĠ Ġval Ġpresenter Ġ= ĠLogin Presenter ( this ) ĊĠĠĠĠĠĠĠ Ġbtn Login . onClick Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġusername Ġ= Ġed t Username Login . text . toString () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġpassword Ġ= Ġed t Password Login . text . toString () ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġpresenter . login ( username , Ġpassword ) ĊĊĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ } ĊĊĊĊ