Fleury's algorithm c++/pascal?

i know what's the algorithm about, i understand it theoricaly but i just can't write it in c++/pascal and that's driving me crazy! i looked on the internet but can't find a working source code. pls help i need the source code not pseudocode