global proc Lightcraft_ImportAdditionalSurveyPoints()
{
    string $surveyPointsFileName, $buffer[];
    float $pos[3];
    int $surveyPointsFileID;
    string $s_file[] = `fileDialog2 -ds 1 -ff "AdditionalSurveyPoints.txt (*.txt)"`;
    
    $surveyPointsFileName = $s_file[0];
    $surveyPointsFileID = `fopen $surveyPointsFileName "r"`;    
    
    //skip first line of .out file
    $nextline = `fgetline $surveyPointsFileID`;
    
    while($nextline != "")
    {
        if(`match "#" $nextline` == "")
        {
            select -cl;
            int $token = tokenize($nextline, $buffer); 
            print $buffer;
            CreateLocator;
            rename $buffer[0];
            $pos[0] = $buffer[1];
            $pos[1] = $buffer[2];
            $pos[2] = $buffer[3];
            scale -xyz 100 100 100;
            move -a -x $pos[0] -y $pos[1] -z $pos[2];
        }
        //print $nextline;
        
        
        $nextline = `fgetline $surveyPointsFileID`;
    }
    
    fclose $surveyPointsFileID;
}
Lightcraft_ImportAdditionalSurveyPoints;