HMIPort EQU 252 # Open_Serial Port(HMIPort) User(9600, 8, N) # HMI Port(HMIPort) ConnectEvent(evHMI_Connect) GoSub HomeScreen runtasksforever start evHMI_Connect: GoSub HomeScreen Return HomeScreen: # HMI Cls() HideAllButtons() # HMI ButtonEvent(,9,5,10,20,"chase",chase) Return chase on 2 on 6 pause 10 off 6 on 7 pause 10 off 7 on 8 pause 10 off 8 on 9 pause 10 off 2 on 3 pause 10 off 3 on 4 pause 10 off 4 on 5 pause 10 off 9 on 8 pause 10 off 8 on 7 pause 10 off 7 on 6 pause 10 off 5 on 4 pause 10 off 4 on 3 pause 10 off 3 on 2 pause 10 goto start