Mario stile jumping help

Anyone have a prg i could copy the code from? If not, help coding it would be nice.