Calculates the distance between two points in 3D space

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    Function Dist3D(x1,y1,z1,x2,y2,z2)
xd = x1 - x2
yd = y1 - y2
zd = z1 - z2
Result# = sqrt((xd*xd) + (yd*yd) + (zd*zd))
EndFunction Result#