vcera jsem si jeste doodladoval script takze tady je prvni pracovni verze kde je vychytana vetsina okolnosti, co jiste neni vyreseno je stopka v pulce vymeny, nekdy to projde jindy potom polohuje s offsetem. V takovem pripade je treba pouzit M61
jinak jsem zatim neresil potrebu M6 ale soustruhy vetsinou nemaji tento kod a reaguji primo na T, necham si to na pozdeji
zde samotny script ktery meni nastoje, na zacatku je hned vyznam, pinu jak jsou poslany z HALu
change.ngc
Kód: Vybrat vše
o<change>sub (vymena - turret)
(digital in 7,6 lock a zero)
(digital out 5 step)
o5 if [#<_task> GT 0] (v pripade preview neprovadet tento script)
(soucasny #<tool_in_spindle>)
(budouci #<selected_tool>)
(parametr 5400 #5400)
o10 if [EXISTS [#<_reference>]]
(reference #<_reference>)
(netreba hledat referenci)
o10 endif
o20 if [EXISTS [#<_reference>] NE 1]
#<_reference> = 0
o20 endif
(cyklus nalezeni nastroje cislo 1)
o50 while [#<_reference> EQ 0]
(hledam referenci)
M64 P05 (step)
G04 P0.4
M65 P05 (step off)
G04 P0.4
M66 P6 L0 (test reference)
o100 if [#5399 EQ 1]
(reference nalezena #5399)
#<_reference> = 1
#<tool_in_spindle> = 1
o100 endif
o50 endwhile
o60 if [#<selected_tool> NE #<tool_in_spindle> ]
o61 if [#<selected_tool> - #<tool_in_spindle> GE 0]
#2 = [#<selected_tool> - #<tool_in_spindle>]
o61 endif
o62 if [#<selected_tool> - #<tool_in_spindle> LE 0]
#2 = [#<selected_tool> + [8-#<tool_in_spindle>]]
o62 endif
o70 while [#2 GT 0]
M64 P05 (step)
G04 P0.4
M65 P05 (step off)
G04 P0.4
#2 = [#2 - 1]
o70 endwhile
o60 endif
o5 endif
o<change> endsub [1]
M2
funkce je nasledovna:
cely script se provadi pouze paklize jde o regulerni vymenu, paklize jde o provadeni kodu kvuli nahledu strojnich drah tak se preskakuje (prvni podminka)
pri prvnim spusteni scriptu si zkontroluje zda jiz byla hlava referovana
paklize ne, provede hledani nastroje c. 1
pote se spocita pocet kroku k pozadovanemu nastroji (pripadne preskoci vymenu pri volani soucasneho)
odkrokuje pocet kroku a ukonci script
prepare je standardni
Kód: Vybrat vše
o<prepare>sub (vymena - turret)
o<prepare>endsub [1]
M2
remap v ini je standardni:
Kód: Vybrat vše
REMAP=T ngc=prepare prolog=prepare_prolog epilog=prepare_epilog
REMAP=M6 modalgroup=6 prolog=change_prolog ngc=change epilog=change_epilog
prolog epilog standardni z instalace linuxcnc
HAL nalinkovani signalu:
Kód: Vybrat vše
net turret_lock hm2_5i25.0.7i76.0.0.input-18 motion.digital-in-06
net turret_zero hm2_5i25.0.7i76.0.0.input-19 motion.digital-in-07
net turret_step hm2_5i25.0.7i76.0.0.output-15 motion.digital-out-05
Na jaký stroj to budeš montovat ?