Çağırma komutu G98 G81 veya herhangi delik işleme kodu Z..R..F..L0; G65P9180X..Y..I..D..A...; G80; L=0 OLURSA MERKAZE DELIK DELMEZ Z=DERİNLİK R=REFERANS F=İLERLEME I=BÖLÜM DAİRE YARIÇAPI D=DELİK SAYISI A=BAŞLAMA AÇISI XveY  değerlerinede bölüm dairesinin sıfır noktandan olan uzaklıkları yazdınmı tamamdır. NOT= alt programı tezgahına at hiçbir zaman değiştirme sadece ana Programda x,y,ı,d,a,z,r,f  değerlerini değiştir. eğer makıno kullanıyorsan bu alt program orada paket program olarak vardır. % :9180(BOLT HOLE) IF[[#4*#7]EQ0]GOTO990 IF[#24EQ#0]GOTO990 IF[#25EQ#0]GOTO990 IF[#4009EQ80]GOTO10 IF[#19NE#0]GOTO992 N10#31=#4003 #10=1 WHILE[#10LE#7]DO1 #11=#1+360*[#10-1]/#7 #12=#24+#4*COS[#11] #13=#25+#4*SIN[#11] G90X#12Y#13 IF[#19EQ#0]GOTO20 G#31 G65P#19 N20#10=#10+1 END1 GOTO999 N990#3000=140(DATA FUSOKU) N992#3000=142(DATA ERROR) N999G#31M99