"Enable" 1080 1920 "0xeae6e1" SoundVolume Var CamFlag = 0 Var CamCount = 0 Var Timeout = 0 Var ShutterResult = "-" Var AdultFlag = 1 If AdultFlag = 1 Then Var AdultFlag = 0 DEBUGVAR SystemDate Var sdate = "" Var sdate = SystemDate Var sdateday = "" Var sdatemonth = "" Var sdateyear = "" SPLIT sdate "/" 1 sdateday SPLIT sdate "/" 2 sdatemonth SPLIT sdate "/" 3 sdateyear INT sdateday INT sdatemonth INT sdateyear Var AdultState = "Enable" Var AdultState1 = "Enable" Var countAdultS2 = 0 Var AdultFlag2 = 1 EndIf If show_eng = "true" Then Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment" Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en" Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png" Else Var DirImage = "ROOT/taobin_project/image/page_payment" Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend" Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png" EndIf If CameraCount = 1 Then EndIf Var IDBirthdate = "" Var LivenessResult = "" Var CountDownDelayReadCardID = 3 DEBUGVAR CameraCount ;STOPCARDID Var LivenessShowString = "" Var CameraStage = "Invisible" Var IDcardStage = "Enable" Var IDcardStageText = "Enable" Var load_gif_stage = "Invisible" Var IDcardTextStatus = "โปรดเสียบบัตรประชาชน \nเพื่อดำเนินการต่อ" Var LivenessRestartCount = 0 Var FailTrickCount = 0 Var FrameOfFaceStepMoveY = 40 Var FrameOfFaceYPosition = 909 Var FrameOfFaceCropImageYPosition = 230 DEBUGVAR IDCardStatus DEBUGVAR IDCardReady DEBUGVAR IDCardData DEBUGVAR IDBirthdate DEBUGVAR IDFullNameEng If IDCardStatus = "OK" Then If IDCardReady = "OK" Then If IDCardData = "START" Then Var load_gif_stage = "Enable" Var IDcardStageText = "Invisible" RefreshAll EndIf EndIf EndIf If IDCardStatus = "OK" Then If IDCardReady = "OK" Then If IDCardData = "ERROR" Then Var load_gif_stage = "Invisible" Var IDcardStageText = "Enable" Var IDcardTextStatus = "อ่านบัตรไม่ได้อะ" Refresh EndIf EndIf EndIf If IDCardStatus = "ERROR" Then Var load_gif_stage = "Invisible" Var IDcardStageText = "Enable" Var IDcardTextStatus = "อ่านบัตรไม่ได้เลยนะ" Refresh EndIf If IDCardStatus = "OK" Then If IDCardReady = "OK" Then If IDCardData = "DONE" Then ;Var birthDate = IDBirthdate Var StrYear = "" Var StrMon = "" Var StrDay = "" SUBSTRING IDBirthdate 0 4 StrYear SUBSTRING IDBirthdate 4 6 StrMon SUBSTRING IDBirthdate 6 8 StrDay INT StrYear INT StrMon INT StrDay Var Adult20 = 0 DEBUGVAR StrYear DEBUGVAR StrMon DEBUGVAR StrDay DEBUGVAR sdatemonth DEBUGVAR sdateday Var sdateyear = sdateyear + 543 Var AgeNumber = sdateyear - StrYear DEBUGVAR AgeNumber If AgeNumber >= 20 Then If AgeNumber = 20 Then If sdatemonth > StrMon Then Var Adult20 = 1 Else If sdatemonth = StrMon Then If sdateday >= StrDay Then Var Adult20 = 1 EndIf EndIf EndIf Else Var Adult20 = 1 EndIf Else EndIf If Adult20 = 1 Then LivenessCommand "SetY" 210 LivenessCommand "start" 0 Var load_gif_stage = "Invisible" Var IDcardStageText = "Invisible" Var IDcardStage = "Invisible" Var IDcardTextStatus = "แสกนหน้า" Var CameraStage = "Enable" Refresh EndIf EndIf EndIf EndIf 1000 DEBUGVAR IDCardStatus DEBUGVAR IDCardReady DEBUGVAR IDCardData DEBUGVAR IDBirthdate DEBUGVAR CountDownDelayReadCardID DEBUGVAR ShutterResult DEBUGVAR IDCardState If IDBirthdate = "" Then Var CountDownDelayReadCardID = CountDownDelayReadCardID - 1 If CountDownDelayReadCardID = 0 Then READCARDID Var CountDownDelayReadCardID = 600 EndIf EndIf DEBUGVAR Timeout Var Timeout = Timeout + 1 If Timeout > 120 Then Open "ROOT/taobin_project/xml/page_catalog2.xml" EndIf ;If ShutterResult = "ok" Then ; Open "ROOT/taobin_project/xml/page_face_compare.xml" ;EndIf DEBUGVAR LivenessResult If LivenessResult = "pass" Then Var LivenessShowString = "Pass " Var load_gif_stage = "Enable" CROP_IMAGE "/mnt/sdcard/camera1_alter.jpg" 170 FrameOfFaceCropImageYPosition 380 500 "/mnt/sdcard/camera1.jpg" Open "ROOT/taobin_project/xml/page_face_compare.xml" EndIff If LivenessResult = "fail" Then Var LivenessRestartCount = LivenessRestartCount + 1 If LivenessRestartCount = 2 Then Var LivenessRestartCount = 0 LivenessCommand "start" 0 Var LivenessResult = "-" EndIf EndIf If IDCardState = "PRESENT" Then If IDCardStatus = "ERROR" Then Var load_gif_stage = "Invisible" Var IDcardStageText = "Enable" Var IDcardTextStatus = "อ่านบัตรไม่ได้อะ" Refresh EndIf EndIf DEBUGVAR LivenessFramePositionX DEBUGVAR LivenessFramePositionY Refresh TimerReset 0 380 "Enable" "ROOT/taobin_project/image/page_payment/alpha.png" 123 598 CameraStage "ROOT/taobin_project/image/liveness/bg2.png" 0 602 1080 Center 60 KanitMediumTTF 0xDE794E CameraStage LivenessShowString ; back ; arrow up ; arrow down ; arrow up ; arrow down 196 737 "ROOT/taobin_project/image/liveness/bg_21.png" 140 781 "usbfront" 800 800 "FileName=/mnt/sdcard/camera1_alter.jpg" 370 FrameOfFaceYPosition CameraStage "ROOT/taobin_project/image/liveness/bg3.png" 196 737 IDcardStage "ROOT/taobin_project/image/liveness/bg_21.png" 0 1050 IDcardStageText 1080 Center 56 KanitMediumTTF 0xDE794E IDcardTextStatus 440 988 load_gif_stage "ROOT/taobin_project/image/page_payment/loading.gif" DEBUGVAR BugFlag If BugFlag = 0 Then Var BugFlag = 1 EndIf DEBUGVAR LivenessStateString DEBUGVAR LivenessStateForPlaySound Var SoundWavFileName = "/mnt/sdcard/coffeevending/taobin_project/liveness/sound/" + LivenessStateForPlaySound Var SoundWavFileName = SoundWavFileName + ".wav" DEBUGVAR SoundWavFileName DEBUGVAR PrevSoundWavFileName If PrevSoundWavFileName = SoundWavFileName Then Else Play SoundWavFileName Var PrevSoundWavFileName = SoundWavFileName EndIf If LivenessResult = "pass" Then Else Var LivenessShowString = LivenessStateString EndIf Refresh DEBUGVAR LivenessResult If LivenessResult = "pass" Then Var strlog_liveness = "Liveness Result - pass " + FailTrickCount SAVELOG strlog_liveness Else Var FailTrickCount = FailTrickCount + 1 Var strlog_liveness = "Liveness Result - fail " + FailTrickCount SAVELOG strlog_liveness EndIf Var IDCardStatus = "OK" Var IDCardReady = "OK" Var IDCardData = "START" EventEvaluate "EventIDCard" Var IDBirthdate = 25271014 Var IDCardStatus = "OK" Var IDCardReady = "OK" Var IDCardData = "DONE" EventEvaluate "EventIDCard" Var LivenessResult = "pass" EventEvaluate "EventLivenessState" Var IDCardState = "PRESENT" Var IDCardStatus = "ERROR" Var IDCardReady = "ERROR" Var IDCardData = "ERROR"