编写一个简单的XY编程程序，可以使用多种编程语言来实现。以下是一个使用点动控制代码的示例，适用于通过按钮控制X轴和Y轴的正反转：
```pascal
program XYProgramming；
uses
SysUtils；
var
M0: Boolean； // 用于控制X轴和Y轴的输入信号
Q0: Boolean； // 用于控制X轴和Y轴的输出信号
begin
// 初始化M0和Q0为FALSE
M0 := False；
Q0 := False；
// 点动控制代码
procedure PointMove（axis: Integer； direction: Boolean）；
begin
if direction then
Q0 := not Q0； // 改变输出信号状态
// 根据axis的值控制X轴或Y轴
if axis = 0 then
M0 := not M0； // 改变X轴输入信号状态
if axis = 1 then
M0 := not M0； // 改变Y轴输入信号状态
end；
// X轴正向点动
PointMove（0, True）；
// X轴反向点动
PointMove（0, False）；
// Y轴正向点动
PointMove（1, True）；
// Y轴反向点动
PointMove（1, False）；
// 循环等待用户输入，以便持续控制
while True do
begin
// 这里可以添加等待用户输入的代码，例如使用ReadLn函数
// 等待用户按下任意键继续
ReadLn；
end；
end.
```
这个程序定义了一个`PointMove`过程，用于控制X轴和Y轴的正反转。通过设置`M0`和`Q0`变量的值，可以实现对伺服电机的控制。程序在无限循环中等待用户输入，以便持续控制X轴和Y轴的运动。
如果你需要更复杂的XY编程，例如绘制图形或处理数控加工，可能需要使用更高级的编程语言和库，如C++、Java或Python，并利用相关的图形库或数控编程库。