package Ġcom . t ange m . common Ċ Ċ import Ġcom . t ange m . common . core . Session Environment Ċ import Ġcom . t ange m . common . extensions . calculate Sha 2 5 6 Ċ Ċ class ĠUser Code Ġconstructor ( ĊĠĠĠ Ġval Ġtype : ĠUser Code Type , ĊĠĠĠ Ġval Ġvalue : ĠByteArray ? Ċ ) Ġ{ ĊĠĠĠ Ġconstructor ( type : ĠUser Code Type ) Ġ: Ġthis ( type , Ġtype . defaultValue ) ĊĊĠĠĠ Ġconstructor ( type : ĠUser Code Type , Ġstring Value : ĠString ) Ġ: Ġthis ( type , Ġstring Value . calculate Sha 2 5 6 ()) ĊĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĠĠĠĠĠĠĠ Ġconst Ġval ĠDefault Access Code Ġ= Ġ" 0 0 0 0 0 0 " ĊĠĠĠĠĠĠĠ Ġconst Ġval ĠDefault Pass code Ġ= Ġ" 0 0 0 " ĊĠĠĠ Ġ} Ċ } Ċ Ċ enum Ġclass ĠUser Code Type ( val ĠdefaultValue : ĠString ) Ġ{ ĊĠĠĠ ĠAccess Code ( User Code . Default Access Code ), ĊĠĠĠ ĠPass code ( User Code . Default Pass code ); ĊĊĠĠĠ Ġfun Ġis Wrong Pin Entered ( environment : ĠSession Environment ?): ĠBoolean Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġenvironment Ġ= Ġenvironment Ġ?: Ġreturn Ġfalse ĊĠĠĠĠĠĠĠ Ġreturn Ġwhen Ġ( this ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠAccess Code Ġ-> Ġ! environment . is User Code Set ( Access Code ) ĊĠĠĠĠĠĠĠĠĠĠĠ ĠPass code Ġ-> Ġ! environment . is User Code Set ( Pass code ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ } ĊĊ