nie też nie działa, i ten z wersji 2010 też nie działa na 2013.

w.gpp

@drill
call @rapid_move

if drill_type eq drilling then
gcode = 81
endif
if drill_type eq f_drill then
gcode = 82
endif
if drill_type eq peck then
gcode = 83
endif
if drill_type eq tapping then
gcode = 84
endif
if drill_type eq boring then
gcode = 85
endif
if drill_type eq r_boring then
gcode = 86
endif
if drill_type eq f_boring then
gcode = 89
endif
if drill_type eq tapping then
{nb,'M29 S'spin:integer_def_f}
endif
{nb,'G98 G'gcode, ' Z'drill_lower_z, ' R'drill_upper_z}
if drill_type eq peck then
{' Q'down_step}
endif
if drill_type eq f_drill or drill_type eq tapping then
{' P'delay:integer_def_f}
endif
{' F'feed}

endp

;-------------------

@drill_point
if not first_drill then
{nb, ' ', [' X'xpos], [' Y'ypos], [' Z'zpos]}
endif
endp

;-------------------

@mirror
if mirror_type eq MIRROR_OFF then
{nb, 'G50.1 X0 Y0'}
else
{nb, 'G51.1 '}
if mirror_type eq MIRROR_X then
{'X1 Y0'}
endif
if mirror_type eq MIRROR_Y then
{'X0 Y1'}
endif
if mirror_type eq MIRROR_XY then
{'X1 Y1'}
endif
endif
endp

;-------------------

@end_drill
gcode = 80
{nb, 'G'gcode}
endp

;-------------------

jeśli się używa cyklu to mam:

G90 G17
G80 G49 G40
G54
G91 G28 Z0
G90
M01
N1 M6 T5
( TOOL -5- DRILL DIA 3.0 MM )
G90 G00 G40 G54
G43 H5 D5 G0 X2.5 Y-18. Z70. S4200 M3
M8
(--------------------------)
(WIERCENIE FI3 GORA - DRILL)
(--------------------------)
X2.5 Y-18. Z10.
G98 G0 Z-6.201 R2. F160
X70.5
G80
M30

a jeśli odhaczę użyj cyklu to mam:

G90 G17
G80 G49 G40
G54
G91 G28 Z0
G90
M01
N1 M6 T5
( TOOL -5- DRILL DIA 3.0 MM )
G90 G00 G40 G54
G43 H5 D5 G0 X2.5 Y-18. Z70. S4200 M3
M8
(--------------------------)
(WIERCENIE FI3 GORA - DRILL)
(--------------------------)
X2.5 Y-18. Z10.
Z2.
G1 Z-1.5 F160
G0 Z2.
Z0.5
G1 Z-3.
G0 Z2.
Z-1.
G1 Z-4.5
G0 Z2.
Z-2.5
G1 Z-6.
G0 Z2.
Z-4.
G1 Z-6.201
G0 Z10.
X70.5
Z2.
G1 Z-1.5
G0 Z2.
Z0.5
G1 Z-3.
G0 Z2.
Z-1.
G1 Z-4.5
G0 Z2.
Z-2.5
G1 Z-6.
G0 Z2.
Z-4.
G1 Z-6.201
G0 Z10.


wiec tu już wykonuje odpowiednio ruchy,ale zapis

tak mi się wydaje. Na wersji 2010 to działa.

[ Dodano: 2013-09-24, 14:22 ]
może ktoś by użyczył dobrego postpocesora na haasa z solidcama 2013

Witam! mam solidcama 2013 i używając postprocesora fanuk nie generuje on cyklu wiercenia.
Tj ustawia się narzędzie tam gdzie powinien być otwór i na posuwie szybkim G0 zjazd na pełną głebokość (nawet bez odwirowania). Nie wiem czy jest to kwestia ustawień czy złego postprocesora