在西门子808D中，粗车循环的编程通常涉及使用G71、G72、G73、G74或G75等指令。以下是一个基本的粗车循环编程示例：
设定绝对坐标模式
```plaintext
G90
```
循环开始
```plaintext
L1:
```
移动到起始位置
```plaintext
G01 X100 Y100
```
执行粗车操作
```plaintext
G01 X200 Y200
```
更新循环计数器
```plaintext
1 = 1 + 1
```
判断循环次数
```plaintext
IF [1 LE 9] GOTO L1
```
循环结束
```plaintext
M30
```
在这个示例中，`1` 是一个循环计数器，用于控制循环的次数。程序首先设定绝对坐标模式，然后移动到起始位置。接着执行粗车操作，更新循环计数器，并通过条件语句判断是否继续循环。如果循环计数器小于等于9，则跳转到循环开始标记 `L1`，继续执行循环动作；否则，执行程序结束指令 `M30`。
此外，如果需要更复杂的循环结构，可以使用子程序来实现。以下是一个使用子程序的示例：
定义子程序
```plaintext
O0002:
G90
G01 X300 Y300
G01 X400 Y400
M99
```
在主程序中调用子程序
```plaintext
MAIN:
T01 M6 D1 G54
G90 G0 X0 Y0 S1000 M3
CALL O0002
M30
```
在这个示例中，主程序 `MAIN` 调用子程序 `O0002`，在子程序中执行指定的动作，然后返回主程序继续执行。
请注意，具体的编程步骤和指令可能会根据实际加工需求和机床配置有所不同。建议在编程前参考西门子的官方文档或咨询有经验的编程工程师，以确保程序的准确性和有效性。