UPDATE: I just added some momentum to the swimming. I had forgotten that I had VBA, so I took a look at what the momentum of Link is by watching frame by frame. The momentum actually lasted 1 frame. What actually looks as the momentum are the extra graphical water ripples.
Ah well, the first post contains the code in the rar file.If you don't like the momentum I suggest you play around with the momentum parameters (the final parameter in the indicate lines):
if (able_x){
//if you're holding left/right Link builds up speed
if (hold_l || hold_r) move_x = scrAcc(move_x,maxi_x,hori_v,1.0); <<----
//otherwise you're not holding left/right and Link is slowing down
else move_x = scrDec(move_x,0.8); <<----
} else {
move_x = scrAcc(move_x,maxi_x,sign(move_x),2.0); <<----
}
if (able_y){
if (hold_u || hold_d) move_y = scrAcc(move_y,maxi_y,vert_v,1.0); <<----
else move_y = scrDec(move_y,0.8); <<----
} else {
move_y = scrAcc(move_y,maxi_y,sign(move_y),2.0); <<----
}