Fill the background with black
Filter/Render/Clouds
Filter/Render/Difference Clouds
Press Ctrl+F to repeat step 3
Duplicate layer
Change top layer to screen and Filter/Artistic/Plastic Wrap…20/15/15
Change back to bottom layer and Filter/Sketch/Chrome…10/10
change top layer to Color Burn
Switch back to bottom layer and Ctrl+U and then select colorize…205/50/50
You should be left with something like