C51 version 7.09
a = LEFT ; switch (a) { case LEFT : subproA P1 = 0x01; P1 = 0x01; subproA break; case RIGHT : subproB P1 = 0x01; P1 = 0x01; subproB break; default : somethingjob; }