''''''''''''''''''''''''''''

'BEACON/FOX CONTROLLER     '

'WRITTER BY ROGER CAMERON  '

'400 PEYTON                '

'CLINTON MO 64735          '

'N0YOX@ILAND.NET           '

''''''''''''''''''''''''''''

'P1 AUDIO OUT              '

'P2 IS  PTT                '

''''''''''''''''''''''''''''



GOTO TRANS

BSAVE

SYMBOL TIMER = W1

SYMBOL I = W2

WAIT:



FOR I = 1 TO 100

PAUSE 1000

NEXT



HIGH 2



PAUSE 1000



TRANS:

SOUND 1, (99,18,0,6,99,6,0,18,99,18,0,6,99,18,0,6,99,18,0,6,99,18,0,6,99,18,0,18) 'N0

SOUND 1, (99,18,0,6,99,6,0,6,99,18,0,6,99,18,0,18,99,18,0,6,99,18,0,6,99,18,0,18) 'YO

SOUND 1, (99,18,0,6,99,6,0,6,99,6,0,6,99,18,0,36,99,6,0,6,99,18,0,6,99,6) 'X  R

PAUSE 1000

LOW 2

GOTO WAIT