Get the current and next values for a set of columns (in each group)

Question

I have a dataframe like this:

I want to construct a new dataframe like this: For each "id", for each {\'A\',\'B\',\'C\',\'D\',\'E\',\'F\'} get the curre