taobin_project/inter/tha/hardware/powder_schedule.ev

94 lines
2.5 KiB
Text
Raw Normal View History

2025-01-21 10:39:51 +07:00
DEBUGVAR LastTimeUseChannel10InMinute
DEBUGVAR CurrentXMLFileName0
2025-03-04 17:48:26 +07:00
SAVELOG "powder schedule version 1.08"
2024-12-03 14:44:35 +07:00
DEBUGVAR PowderPayPushLowScheduleTurnOn10
If PowderPayPushLowScheduleTurnOn10 = "1" Then
Var PowderPayPushLowScheduleTurnOn10 = 1
EndIf
2025-03-27 15:32:16 +07:00
If PowderPayPushLowScheduleTurnOn10 = 99 Then
2024-12-03 14:44:35 +07:00
If SystemTimeHourInt = 3 Then
If SystemTimeMinuteInt = 30 Then
; idle
; and time match
2024-12-03 14:44:35 +07:00
If PowderStatus = "" Then
Var PowderStatus = "tricker"
Var PowderTestStep = 1
EndIf
EndIf
2024-12-04 22:38:21 +07:00
If PowderStatus = "tricker" Then
If SystemTimeMinuteInt = 60 Then
; idle
; and time match
Var PowderStatus = ""
Var PowderTestStep = 0
SAVELOG "PowderScheduleForCh10 reset reset reset"
EndIf
2024-12-03 14:44:35 +07:00
EndIf
EndIf
EndIf
If PowderTestStep = 1 Then
If CurrentXMLFileName0 = "/mnt/sdcard/coffeevending/taobin_project/xml/page_board.xml" Then
Var PowderTestStep = 0
Var PowderScheduleForCh10 = "start"
SAVELOG "PowderScheduleForCh10 start start start"
EndIf
EndIf
DEBUGVAR PowderStatus
DEBUGVAR PowderTestStep
; setvar PowderScheduleForCh10 start
If PowderScheduleForCh10 = "" Then
Else
DEBUGVAR PowderScheduleForCh10
DEBUGVAR PowderDriverToLowPositionResult
If PowderScheduleForCh10 = "start" Then
2025-03-04 17:48:26 +07:00
Var PowderScheduleForCh10 = "powder-run"
EndIf
If PowderScheduleForCh10 = "powder-run" Then
Var PowderScheduleForCh10 = "wait-low-test"
2025-01-21 10:39:51 +07:00
__CMD "CLI" "arm_id=1,arm_position=posi_ice_e" "-" "-"
2025-03-06 16:00:09 +07:00
__CMD "CLI" "powder-set-channel-for-low-push-stage=10,powder-set-time-for-low-push-stage=1,powder-low-push=xml" "-" "-"
DEBUGVAR PowderScheduleForCh10
EndIf
If PowderScheduleForCh10 = "wait-low-test" Then
DEBUGVAR PowderDriverToLowPositionResult
If PowderDriverToLowPositionResult = "" Then
Else
If PowderDriverToLowPositionResult = "pass" Then
SAVELOG " Powder driver low test channel 10 pass pass pass pass pass pass pass pass pass "
Var PowderScheduleForCh10 = ""
Else
SAVELOG " Powder driver low test channel 10 error "
Var PowderScheduleForCh10 = ""
EndIf
Var PowderDriverToLowPositionResult = ""
EndIf
EndIf
EndIf