Select Code to Download

  [photon1, c] = fread(fidin, [1], 'int8');   
    if (photon1>0)
...
        [readout(1,4:5), c] = fread(fidin, [2], 'int32');
        [readout(1,6), c] = fread(fidin, [1], 'double');
    end

read(BIN_DATA, $bin_data, $short_int_size);
        # Convert from binary to a numeric value
...
            read(BIN_DATA, $bin_data, $double_size);
            $en1 = unpack('f', $bin_data);
        }