"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"