Ok ,my problem was resolve by we remove If founction out,
code:
Case 11 'Read save data
' If sw_up = 0 Then
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
Read DATA_save_ADDRESS,DATA_MOTORx
If DATA_MOTOR > DATA_MOTORx Then
'n = 13 - 2 = 11
N = DATA_MOTOR - DATA_MOTORx
GoSub MOVE_down 'load data
EndIf
' Else
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
' EndIf
Case 12 'Read power data
' If sw_down =0 Then
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
Read DATA_power_ADDRESS, DATA_MOTORx
If DATA_MOTORx > DATA_MOTOR Then
'n = 50 - 8 = 48
N = DATA_MOTORX - DATA_MOTOR
GoSub MOVE_up 'load data
EndIf
' Else
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
' EndIf
Case 21
' If sw_up = 0 Then
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
DATA_MOTOR = DATA_MOTOR +1
Write DATA_save_ADDRESS , DATA_MOTOR
' Else
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
'EndIf
Case 22
' If sw_down = 0 Then
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
DATA_MOTOR = DATA_MOTOR +1
Write DATA_power_ADDRESS , DATA_MOTOR
' Else
sw_Mode_data = 0
sw_up_data = 0
sw_down_data = 0
' EndIf
Bookmarks