You can find it in snow ice city find steven in all the houses there
Where To Find Dive In Pokemon Light Platinum?
On the way to Route 224, it's not a HM, but I captured a wild Dewgong Level 50 that knew Dive.
Try this cheats at gameshark code F12F5BBE2045DEBD