package Ġcom . stan . mp star . ui . emplo i _ du _ temp s Ċ Ċ import Ġandroid . annotation . Suppress Lint Ċ import Ġandroid . app . DatePicker Dialog Ċ import Ġandroid . content . pm . Activity Info Ċ import Ġandroid . graphics . Color Ċ import Ġandroid . os . Bundle Ċ import Ġandroid . view .* Ċ import Ġandroid . widget . Button Ċ import Ġandroid . widget . TableRow Ċ import Ġandroid . widget . TextView Ċ import Ġandroidx . fragment . app . Fragment Ċ import Ġcom . stan . mp star . MainActivity Ċ import Ġcom . stan . mp star . R Ċ import Ġcom . stan . mp star . save . Files IO Ċ import Ġjava . text . SimpleDateFormat Ċ import Ġjava . util .* ĊĊ Ċ @ Suppress (" NULL ABILITY _ MIS MATCH _ BASE D _ ON _ JAVA _ AN NOT ATIONS ") Ċ class ĠEmp lo i Du Temp s Fragment Ġ: ĠFragment () Ġ{ ĊĊĠĠĠ Ġ// < editor - fold Ġdesc =" Variables "> ĊĠĠĠ Ġprivate Ġlateinit Ġvar Ġfiles IO Ġ: Files IO ĊĊĠĠĠ Ġprivate Ġval Ġc Ġ= ĠCalendar . getInstance () ĊĠĠĠ Ġprivate Ġval Ġyear Ġ= Ġc . get ( Calendar . YEAR ) ĊĠĠĠ Ġprivate Ġval Ġmonth Ġ= Ġc . get ( Calendar . MONTH ) ĊĠĠĠ Ġprivate Ġval Ġday Ġ= Ġc . get ( Calendar . DAY _ OF _ MONTH ) ĊĠĠĠ Ġprivate Ġval Ġdt Ġ= ĠSimpleDateFormat (" yyyy / MM / dd ", ĠLocale . F RAN CE ) ĊĠĠĠ Ġprivate Ġval Ġdt md Ġ= ĠSimpleDateFormat (" dd / MM ", ĠLocale . F RAN CE ) ĊĠĠĠ Ġprivate Ġval Ġday OfWeek Ġ= ĠSimpleDateFormat (" EEE ", ĠLocale . US ) ĊĠĠĠ Ġprivate Ġval Ġweek OfYear Ġ= ĠSimpleDateFormat (" ww ", ĠLocale . US ) ĊĠĠĠ Ġ// </ editor - fold > ĊĊĊĠĠĠ Ġ// < editor - fold Ġdesc =" Load Ġtime table "> ĊĠĠĠ Ġprivate Ġfun Ġtime ToString ( time Ġ: Int ) Ġ: String { ĊĠĠĠĠĠĠĠ Ġreturn Ġif Ġ( time % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġtime String Ġ= Ġtime / 2 Ġ+ Ġ 8 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtime String . toString ()+" h 0 0 " ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġtime String Ġ= Ġ( time - 1 )/ 2 Ġ+ 8 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtime String . toString ()+" h 3 0 " ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ġ// Ġtime Ġin ĠInt Ġ( 0 Ġ-> Ġ 2 2 ) Ġto Ġtime Ġin ĠString Ġ( 8 h 0 0 Ġ-> Ġ 1 9 h 3 0 ) ĊĊĠĠĠ Ġ@ Suppress Lint (" SetText I 1 8 n ") ĊĠĠĠ Ġprivate Ġfun Ġload Time table Display ( ed t Today Ġ: Map < Int , ĠString >, Ġmon day Ġ: Date , Ġday String Ġ: String ) Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġfetch Ġpersonal Ġinfo ĊĠĠĠĠĠĠĠ Ġval Ġpreferences Ġ= Ġactivity !!. get SharedPreferences (" my SharedPreferences ", Ġ 0 ) ĊĠĠĠĠĠĠĠ Ġval Ġname Preference Ġ= Ġpreferences . getString (" per so _ name ", Ġnull ) ĊĠĠĠĠĠĠĠ Ġval Ġpersonal Ġ= Ġfiles IO . read Personal List () ĊĠĠĠĠĠĠĠ Ġvar Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < personal . size Ġ&& Ġpersonal [ i ]. my Name Ġ!= Ġname Preference . toString ()) Ġ{ i += 1 } ĊĠĠĠĠĠĠĠ Ġval Ġpersonal Info Ġ= Ġpersonal [ i ] ĊĊĠĠĠĠĠĠĠ Ġ// Ġfetch Ġcol le Ġinfo Ġof Ġthe Ġweek ĊĠĠĠĠĠĠĠ Ġval Ġcol le urs Ġ= Ġfiles IO . read Col le urs List () ĊĠĠĠĠĠĠĠ Ġval Ġcol les Math s Ġ= Ġfiles IO . read Col les Math s List () ĊĠĠĠĠĠĠĠ Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < col les Math s . size Ġ&& Ġcol les Math s [ i ]. my Group Ġ!= Ġpersonal Info . my Group ) Ġ{ i += 1 } ĊĠĠĠĠĠĠĠ Ġval Ġcol le Math s Ġ= Ġcol les Math s [ i ]. my Col les [ mon day ] ĊĠĠĠĠĠĠĠ Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < col le urs . size Ġ&& Ġcol le urs [ i ]. my Id Ġ!= Ġcol le Math s ) Ġ{ i += 1 } ĊĠĠĠĠĠĠĠ Ġval Ġcol le Math s Data Ġ= Ġcol le urs [ i ] ĊĠĠĠĠĠĠĠ Ġval Ġcol les Aut re Ġ= Ġfiles IO . read Col les Aut re List () ĊĠĠĠĠĠĠĠ Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < col les Aut re . size Ġ&& Ġcol les Aut re [ i ]. my Group Ġ!= Ġpersonal Info . my Group ) Ġ{ i += 1 } ĊĠĠĠĠĠĠĠ Ġval Ġcol le Aut re Ġ= Ġcol les Aut re [ i ]. my Col les [ mon day ] ĊĠĠĠĠĠĠĠ Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < col le urs . size Ġ&& Ġcol le urs [ i ]. my Id Ġ!= Ġcol le Aut re ) Ġ{ i += 1 } ĊĠĠĠĠĠĠĠ Ġval Ġcol le Aut re Data Ġ= Ġcol le urs [ i ] ĊĊĠĠĠĠĠĠĠ Ġi = 0 ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ// Ġtime Ġcounter ĊĠĠĠĠĠĠĠ Ġvar Ġj = 0 ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ// Ġbackground Ġcolor Ġcounter ĊĠĠĠĠĠĠĠ Ġvar Ġbegin : ĠInt ĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ// Ġlesson Ġbegin Ġtime ĊĠĠĠĠĠĠĠ Ġvar Ġdis cipline Ġ: String ? ĠĠĠĠĠĠĠ Ġ// Ġlesson Ġdis cipline ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i < ed t Today . size ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġbegin Ġ= Ġi ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdis cipline Ġ= Ġed t Today [ i ] ĊĠĠĠĠĠĠĠĠĠĠĠ Ġwhile Ġ( ed t Today [ i ] Ġ== Ġdis cipline ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval ĠtextView Ġ= Ġactivity !!. findViewById < TextView >( resources . getIdentifier (" ed t _ case $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġrow View Ġ= Ġactivity !!. findViewById < TableRow >( resources . getIdentifier (" ed t _ row $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( col le Math s Data . my Day Ġ== Ġday String Ġ&& Ġcol le Math s Data . my Time Ġ== Ġi ) Ġ{ Ġ// Ġif Ġcol le Ġmath s ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġj += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠtextView . text Ġ= Ġtime ToString ( i )+" Ġ- Ġ"+ time ToString ( i + 2 )+" Ġ: ĠCol le Ġ"+ col le Math s Data . my Subject ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( j % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# eeee ee ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# e 1 e 1 e 1 ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case Col le 2 Text Ġ= Ġactivity !!. findViewById < TextView >( resources . getIdentifier (" ed t _ case $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 Text . text Ġ= Ġ" Ġ(" + col le Math s Data . my Name + Ġ", Ġ"+ col le Math s Data . my Place +") " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case Col le 2 Ġ Ġ= Ġactivity !!. findViewById < TableRow >( resources . getIdentifier (" ed t _ row $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( j % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 . set BackgroundColor ( Color . parse Color ("# eeee ee ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 . set BackgroundColor ( Color . parse Color ("# e 1 e 1 e 1 ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġbreak ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( col le Aut re Data . my Day Ġ== Ġday String Ġ&& Ġcol le Aut re Data . my Time Ġ== Ġi ) Ġ{ Ġ// Ġif Ġcol le Ġaut re ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġj += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠtextView . text Ġ= Ġtime ToString ( i )+" Ġ- Ġ"+ time ToString ( i + 2 )+" Ġ: ĠCol le Ġ"+ col le Aut re Data . my Subject ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( j % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# eeee ee ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# e 1 e 1 e 1 ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case Col le 2 Text Ġ= Ġactivity !!. findViewById < TextView >( resources . getIdentifier (" ed t _ case $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 Text . text Ġ= Ġ" Ġ(" + col le Aut re Data . my Name + Ġ", Ġ"+ col le Aut re Data . my Place +") " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case Col le 2 Ġ Ġ= Ġactivity !!. findViewById < TableRow >( resources . getIdentifier (" ed t _ row $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( j % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 . set BackgroundColor ( Color . parse Color ("# eeee ee ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Col le 2 . set BackgroundColor ( Color . parse Color ("# e 1 e 1 e 1 ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġbreak ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( j % 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# eeee ee ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# e 1 e 1 e 1 ")) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ(! (( col le Math s Data . my Day Ġ== Ġday String Ġ&& Ġcol le Math s Data . my Time Ġ== Ġi ) Ġ|| Ġ( col le Aut re Data . my Day Ġ== Ġday String Ġ&& Ġcol le Aut re Data . my Time Ġ== Ġi ))) Ġ{ j += 1 } ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case Begin Ġ= Ġactivity !!. findViewById < TextView >( resources . getIdentifier (" ed t _ case $ begin ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġtime String Ġ= Ġtime ToString ( begin )+" Ġ- Ġ"+ time ToString ( i )+" Ġ: Ġ" ĊĠĠĠĠĠĠĠĠĠĠĠ Ġwhen Ġ( ed t Today [ begin ]) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" NOTH ING " Ġ-> Ġ{} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Option " Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String + personal Info . my Option ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" TP ĠInfo " Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( personal Info . my Option Ġ== Ġ" Info " Ġ&& Ġweek OfYear . format ( mon day ). toInt () % 2 Ġ== Ġpersonal Info . my Group Info ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String +" TP ĠInfo " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġj -= 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Lang ue Ġviv ante " Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String + personal Info . my Language ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" TD 1 " Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( personal Info . my Group TD Ġ== Ġ 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String +" TP / TD ĠPh ys ique " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String +" TD ĠMath s " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" TD 2 " Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( personal Info . my Group TD Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String +" TP / TD ĠPh ys ique " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String +" TD ĠMath s " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġelse Ġ-> Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case Begin . text Ġ= Ġtime String + ed t Today [ begin ] ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Suppress Lint (" SetText I 1 8 n ") ĊĠĠĠ Ġprivate Ġfun Ġload Time table ( selected Date Ġ: Date ) Ġ{ ĊĠĠĠĠĠĠĠ Ġ// clear Ġout Ġtext Views ĊĠĠĠĠĠĠĠ Ġvar Ġi = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( i Ġ<= Ġ 2 2 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval ĠtextView Ġ= Ġactivity !!. findViewById < TextView >( resources . getIdentifier (" ed t _ case $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġrow View Ġ= Ġactivity !!. findViewById < TableRow >( resources . getIdentifier (" ed t _ row $ i ", Ġ" id ", Ġactivity !!. packageName )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġi += 1 ĊĠĠĠĠĠĠĠĠĠĠĠ ĠtextView . text Ġ= ĠgetString ( R . string . empty ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġrow View . set BackgroundColor ( Color . parse Color ("# faf afa ")) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġval Ġed t Ġ= Ġfiles IO . read Ed t List () ĊĠĠĠĠĠĠĠ Ġval Ġds List Ġ= Ġfiles IO . read DS List () ĊĊĠĠĠĠĠĠĠ Ġ// get Ġmon day Ġof Ġthe Ġweek ĊĠĠĠĠĠĠĠ Ġval Ġselected Date Monday Ġ= ĠCalendar . getInstance () ĊĠĠĠĠĠĠĠ Ġselected Date Monday . time Ġ= Ġselected Date ĊĠĠĠĠĠĠĠ Ġselected Date Monday . add ( Calendar . DAY _ OF _ MONTH , Ġ 1 ) ĊĠĠĠĠĠĠĠ Ġwhile Ġ( day OfWeek . format ( selected Date Monday . time ) Ġ!= Ġ" Mon ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġselected Date Monday . add ( Calendar . DAY _ OF _ MONTH , Ġ- 1 ) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġ// get ĠDS Ġinfo Ġof Ġthe Ġweek ĊĠĠĠĠĠĠĠ Ġval Ġselected Date Calendar Sat Ġ= ĠCalendar . getInstance () ĊĠĠĠĠĠĠĠ Ġselected Date Calendar Sat . time Ġ= Ġselected Date ĊĠĠĠĠĠĠĠ Ġwhile Ġ( day OfWeek . format ( selected Date Calendar Sat . time ) Ġ!= Ġ" Sat ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġselected Date Calendar Sat . add ( Calendar . DAY _ OF _ MONTH , Ġ 1 ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġvar Ġj = 0 ĊĠĠĠĠĠĠĠ Ġwhile Ġ( j < ds List . size Ġ&& Ġds List [ j ]. my Date Ġ!= Ġselected Date Calendar Sat . time ) Ġ{ j += 1 } ĊĊĠĠĠĠĠĠĠ Ġval Ġed t Case 0 Ġ= Ġactivity !!. findViewById < TextView >( R . id . ed t _ case 0 ) ĊĠĠĠĠĠĠĠ Ġif Ġ( ed t Ġ== Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= ĠgetString ( R . string . data _ error ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġelse Ġif Ġ( j Ġ== Ġds List . size ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= ĠgetString ( R . string . ed t _ out _ bounds ) ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġds Week Ġ= Ġds List [ j ] ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif ( ds Week . my Dis cipline Ġ== Ġ" H OL ID AY S ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= ĠgetString ( R . string . ed t _ h olidays ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case 1 Ġ= Ġactivity !!. findViewById < TextView >( R . id . ed t _ case 1 ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 1 . text Ġ= ĠgetString ( R . string . ed t _ h olidays 2 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġwhen Ġ( day OfWeek . format ( selected Date . time )) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Mon " Ġ-> Ġ{ Ġ// Ġmon day ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table Display ( ed t . my Monday , Ġselected Date Monday . time , Ġ" Mon ") ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Tue " Ġ-> Ġ{ Ġ// Ġt uesday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table Display ( ed t . my Tuesday , Ġselected Date Monday . time , Ġ" Tue ") ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Wed " Ġ-> Ġ{ Ġ// Ġw ed nesday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table Display ( ed t . my Wednesday , Ġselected Date Monday . time , Ġ" Wed ") ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Thu " Ġ-> Ġ{ Ġ// Ġth ursday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table Display ( ed t . my Thursday , Ġselected Date Monday . time , Ġ" Thu ") ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Fri " Ġ-> Ġ{ Ġ// Ġf riday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table Display ( ed t . my Friday , Ġselected Date Monday . time , Ġ" Fri ") ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Sat " Ġ-> Ġ{ Ġ// Ġs aturday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( listOf (" A "," E "," I "," O "," U "). contains ( ds Week . my Dis cipline [ 0 ]. toString ())) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= Ġ" De voir Ġd ' "+ ds Week . my Dis cipline +" Ġ(" + ds Week . my Duration +") " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= Ġ" De voir Ġde Ġ"+ ds Week . my Dis cipline ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġed t Case 3 Ġ= Ġactivity !!. findViewById < TextView >( R . id . ed t _ case 3 ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( ds Week . my Second Dis cipline Ġ!= Ġ" FALSE ") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( listOf (" A ", Ġ" E ", Ġ" I ", Ġ" O ", Ġ" U "). contains ( ds Week . my Second Dis cipline [ 0 ]. toString ())) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 3 . text Ġ= Ġ" De voir Ġd '" Ġ+ Ġds Week . my Second Dis cipline Ġ+ Ġ" Ġ(" Ġ+ Ġds Week . my Second Duration Ġ+ Ġ")" ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 3 . text Ġ= Ġ" De voir Ġde Ġ" Ġ+ Ġds Week . my Second Dis cipline Ġ+ Ġ" Ġ(" Ġ+ Ġds Week . my Second Duration Ġ+ Ġ")" ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġelse Ġ-> Ġ{ Ġ// Ġs unday ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġed t Case 0 . text Ġ= ĠgetString ( R . string . ed t _ s unday ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġ// </ editor - fold > ĊĊĊĠĠĠ Ġ// < editor - fold Ġdesc =" Select Ġdate Ġpopup "> ĊĠĠĠ Ġ@ Suppress Lint (" SetText I 1 8 n ") ĊĠĠĠ Ġprivate Ġfun Ġselect Date () Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġselected Date View Ġ= Ġactivity ?. findViewById < TextView >( R . id . selected _ date ) ĊĠĠĠĠĠĠĠ Ġvar Ġselected Date Ġ: Date ? ĊĠĠĠĠĠĠĠ Ġval Ġdate Picker Ġ= ĠDate Picker Dialog ( context !! , Ġ{ Ġ_, Ġs year , Ġs month , Ġs day Ġ-> ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġs month Cor r Ġ= Ġs month + 1 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġselected Date Ġ= Ġdt . parse ("$ s year /$ s month Cor r /$ sday ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( selected Date Ġ!= Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġselected Date View ?. text Ġ= Ġ" Emp lo i Ġdu Ġtemps Ġdu Ġ"+ dt md . format ( selected Date ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġload Time table ( selected Date Ġas ĠDate ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ}, Ġyear , Ġmonth , Ġday ) ĊĠĠĠĠĠĠĠ Ġdate Picker . show () ĊĠĠĠ Ġ} ĊĠĠĠ Ġ// </ editor - fold > ĊĊĊĠĠĠ Ġ// < editor - fold Ġdesc =" onCreate , Ġon Hidden Changed Ġand Ġon Resume "> ĊĠĠĠ Ġoverride Ġfun ĠonCreate View ( in flater : ĠLayoutInflater , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcontainer : ĠViewGroup ?, Ġsaved Ins at n ce State : ĠBundle ?): ĠView ? Ġ{ ĊĠĠĠĠĠĠĠ Ġactivity !!. requested Orientation Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ UNSPECIFIED ĊĠĠĠĠĠĠĠ Ġfiles IO Ġ= ĠFiles IO ( context !! ) ĊĠĠĠĠĠĠĠ Ġreturn Ġinflater . inflate ( R . layout . fragment _ emplo i _ du _ temp s , Ġcontainer , Ġfalse ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġon Hidden Changed ( hidden : ĠBoolean ) Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . on Hidden Changed ( hidden ) ĊĠĠĠĠĠĠĠ Ġif Ġ(! hidden Ġand Ġis Res umed ){ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġmain Activity : ĠMainActivity Ġ= Ġthis . activity Ġas ĠMainActivity ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmain Activity . resume Plan () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Suppress Lint (" SetText I 1 8 n ") ĊĠĠĠ Ġoverride Ġfun Ġon Resume () Ġ{ ĊĠĠĠĠĠĠĠ Ġsuper . on Resume () ĊĊĠĠĠĠĠĠĠ Ġval Ġselect Date Button Ġ= Ġactivity !!. findViewById < Button >( R . id . select Date Button ) ĊĠĠĠĠĠĠĠ Ġselect Date Button . setOnClickListener { ĊĠĠĠĠĠĠĠĠĠĠĠ Ġselect Date () ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġval Ġselected Date View Ġ= Ġactivity ?. findViewById < TextView >( R . id . selected _ date ) ĊĠĠĠĠĠĠĠ Ġval Ġmonth Cor r Ġ= Ġ( month + 1 ). toString () ĊĠĠĠĠĠĠĠ Ġselected Date View ?. text Ġ= Ġ" Emp lo i Ġdu Ġtemps Ġdu Ġ$ day /$ month Cor r " ĊĊĠĠĠĠĠĠĠ Ġload Time table ( dt . parse ("$ year /$ month Cor r /$ day ")) ĊĠĠĠ Ġ} ĊĠĠĠ Ġ// </ editor - fold > Ċ Ċ } Ċ