Here are the formulas that will do what you want
// For the X value
Num( Substitute( Word( 5, Substitute( :Fname, "--", "-&" ), "-" ), "&", "-" ) )
// For the Y value
Num( Substitute( Word( 6, Substitute( :Fname, "--", "-&" ), "-" ), "&", "-" ) )

Jim