PARAMETER ADD_FLAG = '1'X PARAMETER BACK_FLAG = '2'X PARAMETER DELETE_FLAG = '4'X PARAMETER DIRECTORY_FLAG = '8'X PARAMETER EXIT_FLAG = '10'X PARAMETER FILE_FLAG = '20'X PARAMETER HELP_FLAG = '40'X PARAMETER NEXT_FLAG = '80'X PARAMETER READ_FLAG = '100'X PARAMETER SYSTEM_FLAG = '200'X PARAMETER BROADCAST_FLAG = '400'X PARAMETER BADSWITCH_FLAG = '800'X PARAMETER REPLACE_FLAG = '1000'X PARAMETER EXPIRE_FLAG = '2000'X PARAMETER HEADER_FLAG = '4000'X PARAMETER TEXT_FLAG = '8000'X PARAMETER NUMBER_FLAG = '10000'X PARAMETER SHUTDOWN_FLAG = '20000'X PARAMETER PERMANENT_FLAG = '40000'X COMMON /BULLPAR/ FLAGS,BULL_PARAMETER,LEN_P,NUMBER_PARAM CHARACTER*64 BULL_PARAMETER INTEGER FLAGS