package Ġorg . anti _ ad . mc . ip next . gui . inject Ċ Ċ import Ġorg . anti _ ad . mc . common . extensions . detect able Ċ import Ġorg . anti _ ad . mc . common . input . Global Screen EventListener Ċ import Ġorg . anti _ ad . mc . common . math 2 d . Size Ċ import Ġorg . anti _ ad . mc . common . van illa . alias . Abstract Button Widget Ċ import Ġorg . anti _ ad . mc . common . van illa . alias . Container Screen Ċ import Ġorg . anti _ ad . mc . common . van illa . alias . Screen Ċ import Ġorg . anti _ ad . mc . common . van illa . render . glue . glue _ r Screen Size Ċ Ċ object ĠScreen EventHandler Ġ{ ĊĠĠĠ Ġfun Ġon Screen Init ( target : ĠScreen , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġadd Widget : Ġ( Abstract Button Widget ) Ġ-> ĠUnit ) Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( target Ġis ĠContainer Screen <* >) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠContainer Screen EventHandler . on Screen Init ( target , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġadd Widget ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġvar Ġtracked Screen Size Ġby Ġdetect able ( Size ( 0 , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ 0 )) Ġ{ Ġ_, Ġ( width , Ġheight ) Ġ-> ĊĠĠĠĠĠĠĠ ĠGlobal Screen EventListener . on Resize ( width , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġheight ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġpre Render () Ġ{ ĊĠĠĠĠĠĠĠ ĠInsert Widget Handler . pre Screen Render () ĊĠĠĠĠĠĠĠ Ġtracked Screen Size Ġ= Ġglue _ r Screen Size ĊĠĠĠĠĠĠĠ ĠContainer Screen EventHandler . pre Render () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġpost Render () Ġ{ ĊĠĠĠĠĠĠĠ ĠContainer Screen EventHandler . post Render () ĊĠĠĠ Ġ} Ċ }