AB 1400 programming example