From 9970551c5c881b8b28b0af39364b388433994ec0 Mon Sep 17 00:00:00 2001
From: P. J. McDermott <pj@pehjota.net>
Date: Mon, 21 Aug 2017 17:45:17 -0400
Subject: .pronsolerc: Add HIPS retraction/wiping macro

---
diff --git a/.pronsolerc b/.pronsolerc
index 6046a66..2f19b92 100644
--- a/.pronsolerc
+++ b/.pronsolerc
@@ -19,3 +19,53 @@ set last_temperature 240.0
 set last_bed_temperature 110.0
 set last_sash_position 333
 set last_extrusion 10
+macro wipe-hips
+  ; Set units, positioning modes, and extruder origin
+  G21                                  ; Set units to millimeters
+  G90                                  ; Set absolute positioning mode
+  M82                                  ; Set E absolute mode (override G91)
+  G92 E0                               ; Set extruder position to 0 (origin)
+  ; Begin heating hotend to HIPS retraction temperature
+  M107                                 ; Turn off the print cooling fan
+  M104 S150                            ; Set hotend temperature without waiting
+  M140 S110                            ; Set bed temperature without waiting
+  ; While waiting for the hotend to heat, auto-home the axes
+  G28                                  ; Auto-home all axes
+  M109                                 ; Wait for hotend temperature
+  ; Retract filament before wiping
+  G1 Z150 E-30 F75                     ; Slowly lower Z and retract filament
+  ; Begin heating hotend to HIPS wiping temperature
+  M104 S170                            ; Set hotend temperature without waiting
+  ; While waiting for the hotend to heat, position the nozzle over the wiping pad
+  G1 X45 Y174 Z10 F11520               ; Move nozzle to just over wiping pad
+  M109                                 ; Wait for hotend temperature
+  ; Wipe the nozzle
+  G1           Z-0.5 F4000             ; Plunge nozzle into wiping pad
+  G1 X55  Y172       F4000             ; Wipe
+  G1 X45  Y174 Z0    F4000             ; Wipe
+  G1 X55  Y172       F4000             ; Wipe
+  G1 X45  Y174       F4000             ; Wipe
+  G1 X55  Y172       F4000             ; Wipe
+  G1 X45  Y174       F4000             ; Wipe
+  G1 X55  Y172       F4000             ; Wipe
+  G1 X60  Y174       F4000             ; Wipe
+  G1 X80  Y172       F4000             ; Wipe
+  G1 X60  Y174       F4000             ; Wipe
+  G1 X80  Y172       F4000             ; Wipe
+  G1 X60  Y174       F4000             ; Wipe
+  G1 X90  Y172       F4000             ; Wipe
+  G1 X80  Y174       F4000             ; Wipe
+  G1 X100 Y172       F4000             ; Wipe
+  G1 X80  Y174       F4000             ; Wipe
+  G1 X100 Y172       F4000             ; Wipe
+  G1 X80  Y174       F4000             ; Wipe
+  G1 X100 Y172       F4000             ; Wipe
+  G1 X110 Y174       F4000             ; Wipe
+  G1 X100 Y172       F4000             ; Wipe
+  G1 X110 Y174       F4000             ; Wipe
+  G1 X100 Y172       F4000             ; Wipe
+  G1 X110 Y174       F4000             ; Wipe
+  G1 X115 Y172 Z-0.5 F1000             ; Wipe slower, bury nozzle in cleanish area
+  G1 Z10                               ; Lift out of wiping pad
+  ; Begin heating hotend to HIPS probing temperature
+  M109 S170                            ; Set and wait for hotend temperature
--
cgit v0.9.1