Changing the grid spacing or number of nodes to increase the grid resolution is one of the most common adjustments made during gridding.  The sample script below shows how to do this using the xSize and ySize parameters of the GridData method.

To run this script:

1. Copy the script below, or download the attached BAS file: GridSpacing.bas.
     Note: If you're running Surfer 12 or an earlier version, download GridSpacing_S12.bas.
2. In a Windows Explorer window, navigate to C:\Program Files\Golden Software\Surfer.
3. Double click on Scripter.exe to launch Scripter.
4. Press Ctrl+A to select all of the existing lines then press DELETE.
5. If you copied this script, press Ctrl+V to paste it into Scripter. If you downloaded it, click File | Open, select the BAS file from your downloads directory, and click Open.
6. Change the values in the User-defined variables section as desired.
7. Click Script | Run to run the script.
    

'=====================================================
'GridSpacing.bas
'=====================================================
'Creates a GRD file with user defined grid spacing.
'This script is for only Surfer 13 and later. Surfer 12 and earlier did not have the grid spacing option.
'=====================================================

Sub Main

'Gets the existing Surfer instance. If Surfer isn't open, it opens it.
    On Error GoTo createnew
  	Set SurferApp = GetObject(, "Surfer.Application")
    On Error GoTo 0
	GoTo skipnew
	createnew:
	Set SurferApp = CreateObject("Surfer.Application")
	SurferApp.Visible = True
	skipnew:

'=====================================
'User-defined variables
'=====================================
'Specifies the file path where the data file to grid resides
    path1 = "c:\program files\golden software\surfer 16\samples\"

'Specifies the data file
    infile1 = path1+"demogrid.dat"

'Specifies the file to save the output grid to
    outfile1 = path1+"demogrid.grd"

'Specifies the grid spacing
    gridspacing =  0.1
'=====================================
'Creates a plot document window
    Set Plot = SurferApp.Documents.Add

'Grids the data
    SurferApp.GridData4(DataFile:=infile1, xSize:=gridspacing, ySize:=gridspacing, Outgrid:=outfile1)

'Creates a contour map
    Plot.Shapes.AddContourMap(outfile1)
End Sub

Updated December 2021