编写堆取料程序时，需要考虑以下几个关键步骤和要素：
操作前准备
检查机械的运行轨道和移动范围内有无障碍物。
确保所有的控制开关均处于“位”。
检查高低压进线是否正常接通，控制开关是否处于正确位置。
检查取料机和布料机的各连接部位是否有松动，制动器和保险丝是否正常，电缆卷绕是否正常且无损坏烧焦现象。
作业指令接收与设备初始化
司机接到作业指令后，首先将堆取料机大臂旋到与轨道平行的零位，然后行走到指定垛位。
旋转大臂，使悬臂离开轨道大约90°，斗轮掠过取料的最远点，将悬皮打到取料状态，完成准备工作。
取料作业
随着顺序起动，堆取料机地面皮带和悬臂皮带运转，斗轮开始取料。
当料堆高度达到17米时，分四层取料，最大取料高度4.5米，走行每次进给长度0.82米。
回转过程中，设定悬臂的俯仰角度联锁，防止斗轮与地面基础件干涉，过料堆作业时俯仰角度大于9°时，悬臂皮带机不允许运转。
速度控制
调车时行走速度不允许高速直接起动，通过变频调速从低速到高速至少分四档。
停机时必须从高速到低速逐步停机，不允许高速直接停机。
安全注意事项
工作前要了解天气情况，尤其当有强风或预计有强风时，要密切注意天气变化，风速超过一定值（如10m/s）时，禁止作业。
在回转过程中，如越过中间轨道地基，必须设定俯仰角度联锁，以防止斗轮与地面基础件干涉。
应急措施
作业前预备阶段应检查并确保所有应急设备（如制动器、保险丝等）处于正常状态，以便在紧急情况下能够迅速采取措施。
通过以上步骤和要素，可以编写出一个详细且安全的堆取料程序。请根据实际情况调整程序中的具体参数和操作步骤，以确保堆取料作业的顺利进行和作业人员的安全。