PDL2
1 program
Added 2026-03-06T12:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Program and Data Language 2, COMAU PDL2
Provenance: commit a1cffc4467 · authored 2026-03-06T01:22:31+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Pick and Place Robot Routine
Provenance: commit a1cffc4467 · authored 2026-03-06T01:22:31+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
-- PDL2: Pick and place robot program
PROGRAM pick_and_place
VAR
i : INTEGER
home_pos : JOINTPOS
BEGIN
WRITE ('Starting pick and place routine', NL)
-- Move to home position
MOVE JOINT TO home_pos
-- Open gripper (digital output 1)
$DO[1] := FALSE
FOR i := 1 TO 3 DO
WRITE ('Cycle ', i, ' of 3', NL)
-- Move to pick position (predefined)
MOVE LINEAR TO $MNTOOL : ADVANCE
DELAY 200
-- Close gripper
$DO[1] := TRUE
DELAY 500
-- Move to place position
MOVE LINEAR TO $MNTOOL : ADVANCE
DELAY 200
-- Open gripper
$DO[1] := FALSE
DELAY 500
-- Return to home
MOVE JOINT TO home_pos
ENDFOR
WRITE ('Pick and place complete', NL)
END
END PROGRAM