请教如何写，让生成的文件数据有如下规律?（已解决）

ainizm

请教如何写，让生成的文件数据有如下规律?
X0.000 Y0.000
X1310.000 Y0.000
X1310.000 Y0.100
X0.000 Y0.100
X0.000 Y0.200
X1310.000 Y0.200
X1310.000 Y0.300
X0.000 Y0.300
X0.000 Y0.400
X1310.000 Y0.400

lenlydia

a=0.000  b=1310.000   c=0.100


Func xy($x,$y,$z[n])

        $x=x(a)    $y=y(a)
        $z[n]=$x&$y

        $x=x(a+b)  $y=y(a)
        $z[n]=$z[n+1]
        $z[n]=$x&$y

        $x=$x  $y=y(a+c)
        $z[n]=$z[n+1]
        $z[n]=$x&$y

        $x=$x-b  $y=$y
        $z[n]=$z[n+1]
        $z[n]=$x&$y

        $x=$x  $y=$y+c

EndFunc

不知道这个对你有没有帮助。

veket_linux

$buf = ""
$y = 0
For $i = 0 To 570
        $buf &= "N" & $i & " G1 X"
        If Mod($i, 4) = 0 Or Mod($i, 4) = 3 Then
                $buf &= StringFormat("%.3f", 0)
        Else
                $buf &= StringFormat("%.3f", 1310)
        EndIf
        $buf &= " Y"
        $buf &= StringFormat("%.3f", $y/10)
        If Mod($i, 2) Then $y += 1
        $buf &= " Z" &StringFormat("%.3f", 0) & @CRLF
Next
$filehandle = FileOpen(@DesktopCommonDir & "\test.txt", 10)
FileWrite($filehandle, $buf)
FileClose($filehandle)
MsgBox(48, "完成---请查看", @DesktopCommonDir & "\test.txt")

ainizm

非常感谢你的帮助，不过这里 "%.3f" 是什么意思，没看懂，没用过，求指教

veket_linux

类似 C语言里的printf 、scanf 及类似函数的 格式控制字符串

如果你学过C语言的话 浮点数输出 小数占3为 不满3位补零