Here's where I'm at
TXMAIN:
PAUSE 250
IF PIN1 = 1 THEN GOTO SUB1
IF PIN2 = 1 THEN GOTO SUB2
IF PIN3 = 1 THEN GOTO SUB3
GOTO TxMAIN
SUB1:
SEROUT 4,N2400,(#01,#01,#01,#01,#01,#01,#01,#01)
PAUSE 300
GOTO TXMAIN
SUB2:
SEROUT 4,N2400,(#02,#02,#02,#02,#02,#02,#02,#02)
PAUSE 300
GOTO TXMAIN
SUB3...