We want to slove a problem about dissociation energy of diatomic molecules. Our ideals based on DIRAC-FOCK equation have negative energy solution. Short hand the negative energy solution means it has possible adding an "positron" intoatoms. Then we treat it as "hydrogen like" problem. So we write a main program using FORTRAN LANGUAGE to slove it.