Automatically Programmed Tool, aka Automatically Programmed Tool, is a historical programming language created in 1956.

63Years Old 1,020Users 0Jobs

Example code from Wikipedia:

PARTNO / APT-1
CLPRNT
UNITS / MM
NOPOST
CUTTER / 20.0

$$ GEOMETRY DEFINITION
SETPT = POINT / 0.0, 0.0, 0.0
STRTPT = POINT / 70,70,0
P1 = POINT / 50, 50, 0
P2 = POINT / 20, -20, 0
C1 = CIRCLE / CENTER, P2, RADIUS, 30
P3 = POINT / -50, -50, 0
P5 = POINT / -30, 30, 0
C2 = CIRCLE / CENTER, P5, RADIUS, 20
P4 = POINT / 50, -20, 0
L1 = LINE / P1, P4
L2 = LINE / P3, PERPTO, L1
L3 = LINE / P3, PARLEL, L1
L4 = LINE / P1, PERPTO, L1
PLAN1 = PLANE / P1, P2, P3
PLAN2 = PLANE / PARLEL, PLAN1, ZSMALL, 16

$$ MOTION COMMANDS
SPINDL / 3000, CW
FEDRAT / 100, 0
FROM / STRTPT
GO/TO, L1, TO, PLAN2, TO, L4
TLLFT, GOFWD / L1, TANTO, C1
GOFWD / C1, TANTO, L2
GOFWD / L2, PAST, L3
GORGT / L3, TANTO, C2
GOFWD / C2, TANTO, L4
GOFWD / L4, PAST, L1
NOPS
GOTO / STRTPT
FINI
Edit

Last updated February 11th, 2019