package Ġcom . pr 0 gram m . app . ui Ċ Ċ import Ġandroid . app . Activity Ċ import Ġandroid . content . pm . Activity Info Ċ import Ġandroid . graphics . Point Ċ import Ġandroid . view . Surface ĊĊ Ċ object ĠScreen Ġ{ ĊĠĠĠ Ġprivate Ġconst Ġval ĠL AND SC APE Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ LAND SC APE ĊĠĠĠ Ġprivate Ġconst Ġval ĠP OR TRA IT Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ POR TRA IT ĊĠĠĠ Ġprivate Ġconst Ġval ĠRE VERSE _ LAND SC APE Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ RE VERSE _ LAND SC APE ĊĠĠĠ Ġprivate Ġconst Ġval ĠRE VERSE _ POR TRA IT Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ RE VERSE _ POR TRA IT ĊĠĠĠ Ġprivate Ġconst Ġval ĠUNS PE CI FIED Ġ= ĠActivity Info . SCREEN _ OR IENTATION _ UNSPECIFIED ĊĊĊĠĠĠ Ġfun Ġlock Orientation ( activity : ĠActivity ) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġdisplay Ġ= Ġactivity . window Manager . default Display ĊĠĠĠĠĠĠĠ Ġval Ġrotation Ġ= Ġdisplay . rotation ĊĊĠĠĠĠĠĠĠ Ġval Ġsize Ġ= ĠPoint (). also Ġ{ Ġdisplay . getSize ( it ) Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġwidth Ġ= Ġsize . x ĊĠĠĠĠĠĠĠ Ġval Ġheight Ġ= Ġsize . y ĊĊĠĠĠĠĠĠĠ Ġwhen Ġ( rotation ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠSurface . ROT ATION _ 9 0 Ġ-> Ġif Ġ( width Ġ> Ġheight ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠL AND SC APE ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠRE VERSE _ POR TRA IT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ ĠSurface . ROT ATION _ 1 8 0 Ġ-> Ġif Ġ( height Ġ> Ġwidth ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠRE VERSE _ POR TRA IT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠRE VERSE _ LAND SC APE ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ ĠSurface . ROT ATION _ 2 7 0 Ġ-> Ġif Ġ( width Ġ> Ġheight ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠRE VERSE _ LAND SC APE ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠP OR TRA IT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠĠĠĠĠ Ġelse Ġ-> Ġif Ġ( height Ġ> Ġwidth ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠP OR TRA IT ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠL AND SC APE ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġfun Ġunlock Orientation ( activity : ĠActivity ) Ġ{ ĊĠĠĠĠĠĠĠ Ġactivity . requested Orientation Ġ= ĠUNS PE CI FIED ĊĠĠĠ Ġ} Ċ } Ċ