; /sys/Tfree0.g rab 07/20/2020 ; called when tool 0 is freed and fil-chg macro to be run ; ; << NOTE THIS FILE IDENTICAL TO Tfree1.g >> ; M600 ; Calls /sys/FILAMENT-CHANGE.g MACRO ; /sys/Tfree1.g rab 07/20/2020 ; called when tool 1 is freed and fil-chg macro to be run ; ; << NOTE THIS FILE IDENTICAL TO Tfree0.g >> ; M600 ; Calls /sys/FILAMENT-CHANGE.g MACRO : /sys/filament-change.g rab 07/19/2020 ; << NOTE >> This called by M600 in lieu of standard pause command ; Save resume // Centers effector // Tilt Bucket inboard ; Goto Purge start XYZ // Safe no-string fil retract ; Nozzle at Purge-Start XYZ ; M98 P"/MACROS/EMBED/4-BEEP_M" G60 S1 ; Saves currect (paused) position to slot S1 ; M83 ; relative Extruder moves G1 E-.3 ; Tiny Extruder suck-back G91 ; relative XYZ positioning G1 Z5 F6000 ; lift Z by 5mm G90 ; absolute XYZ positioning G1 X0 Y0 F9000 ; To center G1 Z255 F9000 ; Approx Bucket level G1 U0 ;Bucket moves inboard ; M564 S0 ; MOVEMENT OUTSIDE LIMITS G1 Z253 ; GOTO TO APPROX 7mm ABOVE WIPE ; ; ; ^^ NOTE ^^..................................................... ; Any change in Purge-Bucket XY setup MUST re-calibrate ; the Start XY below using drawing template 050-2110. RUN ; /macros/tool-chg/FIND PURG TARGET 050-2110 to automate ; G1 X-92.8 Y72.5 F6000 ; PURG START XY //// CRITICAL - CRITICAL ; ; DROP NOZZLE TIP TO RUBBER TOUCH-OFF // SET Z-VALUE 1.1mm LOWER G1 Z244.7 ; SET Z-WIPE HEIGHT //// CRITICAL - CRITICAL ; ^^ NOTE ^^...................................................... ; ; G91 ; RELATIVE XY MOVES M83 ; RELATIVE EXTRUDER MOVES M106 S255 ; FAN ON FULL SPEED M906 E1500 ; SET E TO HIGH CURRENT PURGE ONLY ; G1 X-12.75 Y-25.5 F6000 ; PRE-WIPE SET WIPE SPEEDS G1 X12.75 Y25.50 F6000 ; PRE-WIPE TO REMOVE ANY CRAP FROM NOZZ ; ; << NEXT OLD FIL RETRACTS BELOW HOBB // MINIMIZE STRING >> G91 ; XYZ RELATIVE G1 X-2.50 Y1.443 ; GOTO BUCKET PRE-PURGE LOCATION M83 ; EXTRUDER RELATIVE G1 E10 F400 ; EXTRUDE A BIT ; M82 ; EXTRUDER ABSOLUTE G92 E0 ; ZEROS EXTRUDER G1 E-8 F18000 ; RETRACT TO # FIRST STOP G4 S4 ; DWELL TO HARDEN G1 E-23 F18000 G4 S2 ; DWELL 2 SECONDS G1 E-18 F9000 ; DIP BACK IN TO GRAB STRING G4 S.25 G1 E-35 F24000 G4 S1 ; DWELL TO HARDEN 1 SECONDS G1 E-58 F24000 ; JUST BELOW HOBB ; G1 X2.50 Y-1.443 ; RETURN TO BUCKET START LOCUS ; ; << Filament safe just below hobb & filament swap OK >> ; << REF >> Nozz now at NEW FILAMENT Purge-Start XY ; Z at purge WIPE height ; /sys/Tpre1.g RAB 07/20/2020 ; called before tool 1 is selected ; Switches DUEXT servo to “1” (secondart-RED) feed path & slow feed small amount past slider/tube intersect ; << NOTE - Modify servo angle as req'd for specific extruder/servo combination >> ; M280 P3 S10 I1 ; SET SERVO T0 FILAMENT FEED CHANNEL (170 degrees) M83 ; SET EXTUDER RELATIVE G1 E15 F400 ; SLOW FEED SMALL AMOUNT M98 P"/macros/EMBED/1-PEEP_M" ; 1-PEEP ANNOUNCE T0 ; ; << NOTE >> T0 FILAMENT FEED CHANNEL NOW ENABLED // READY FOR PURGE ROUTINE Tpost0 ; /sys/Tpre0.g RAB 07/20/2020 ; called before tool 0 is selected ; Switches DUEXT servo to “0” (primary-BLUE) feed path & slow feed small amount past slider/tube intersect ; << NOTE - Modify servo angle as req'd for specific extruder/servo combination >> ; M280 P3 S170 I1 ; SET SERVO T0 FILAMENT FEED CHANNEL (170 degrees) M83 ; SET EXTUDER RELATIVE G1 E15 F400 ; SLOW FEED SMALL AMOUNT M98 P"/macros/EMBED/1-PEEP_M" ; 1-PEEP ANNOUNCE T0 ; ; << NOTE >> T0 FILAMENT FEED CHANNEL NOW ENABLED // READY FOR PURGE ROUTINE Tpost0 ; /sys/tpost1.g rab 07/20/2020 ; NOTE - This Duet system macro is IDENTICAL to Tpost0.g ; M116 S5 ; Wait for temps to stabilize +/- 5 deg ; ; ^^ NOTE ^^..................................................... ; ; This macro inherits it's INITIAL XYZ from "/sys/filament-change.g" ; Any ERROR in this purge start XYZ mus be corrected in that macro ; ; ^^ NOTE ^^..................................................... ; G91 ; RELATIVE XY MOVES M83 ; RELATIVE EXTRUDER MOVES M106 S255 ; FAN ON FULL SPEED M906 E1500 ; SET E TO HIGH CURRENT THIS PURGE ROUTINE ONLY ; G1 X-12.75 Y-25.5 F6000 ; PRE-WIPE SET WIPE SPEEDS G1 X12.75 Y25.50 F6000 ; PRE-WIPE TO REMOVE ANY CRAP FROM NOZZ ; ; ; PURGE PROCESS // 9X 11.5mm FILAMENT = APPROX 100 mm NET PURGE ; >>>>>>>>>>>>>>>>>>>>> ; NOTE FIRST PURGE SEGMENT MAY BE SHORT OR SLIGHTLY LONG ; DEPENDING UPON FILAMENT START HISTORY (BEGIN OR MID-PRINT) ; G1 E68 F400 ; EXTRUDE SEGMENT #1 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #2 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #3 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X12.75 Y25.5 F6000 ; PATH #1 REVERSE KNOCKOFF 123 G1 X-12.75 Y-25.5 F6000 ; PATH #2 REVERSE KNOCKOFF 123 ; G1 X8.625 Y28.25 F6000 ; GOTO #4 SEGMENT G1 E11 F400 ; EXTRUDE SEGMENT #4 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #5 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #6 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X12.75 Y25.5 F6000 ; PATH #1 REVERSE KNOCKOFF 456 G1 X-12.75 Y-25.5 F6000 ; PATH #2 REVERSE KNOCKOFF 456 ; G1 X8.625 Y28.25 F6000 ; GOTO #7 SEGMENT G1 E11 F400 ; EXTRUDE SEGMENT #7 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #8 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X-6.375 Y-12.75 F6000 ; G1 E11 F400 ; EXTRUDE SEGMENT #9 G4 P1000 ; DWELL 1000 ms G1 E-.5 ; RETRACT FILAMENT ; G1 X12.75 Y25.5 F6000 ; PATH #1 REVERSE KNOCKOFF 789 G1 X-12.75 Y-25.5 F6000 ; PATH #2 REVERSE KNOCKOFF 789 G1 X24.249 Y20 ; FINAL REVERSE KNOCKOFF ; ; END PURGE FILAMENT ROUTINE ; RESTORE ENVIRONMENT TO ENABLE NEW FILAMENT RESUME PRINT ; G90 ; ABSOLUTE XYZU MOVES G1 Z252.8 ; LIFT NOZ ABOVE PURGE Z G1 X0 Y0 Z255 F6000 ; CENTER NOZZLE G1 U14 ; TILT BUCKET OUTBOARD TO SAFE POSITION ; M906 E1200 ; RESTORE EXTRUDER TO STANDARD CURRENT M906 I50 ; RESTORE ALL IDLE CURRENT 50 PERCENT M106 S0 ; FAN OFF M564 S1 ; RESTORES MOVEMENT LIMITS ; M98 P”/SYS/RESUME.G” ; RESUME PRINTING WITH NEW FILAMENT