diff --git a/images/apple/PLEIADES-2.20.po b/images/apple/PLEIADES-2.20.po
index 36e3bb5..12d82ed 100644
Binary files a/images/apple/PLEIADES-2.20.po and b/images/apple/PLEIADES-2.20.po differ
diff --git a/images/apple/PLFORTH.po b/images/apple/PLFORTH.po
index aa799cb..06326fe 100644
Binary files a/images/apple/PLFORTH.po and b/images/apple/PLFORTH.po differ
diff --git a/src/scripts/hrturtle.4th b/src/scripts/hrturtle.4th
index 994d775..73450cd 100644
--- a/src/scripts/hrturtle.4th
+++ b/src/scripts/hrturtle.4th
@@ -29,4 +29,26 @@ SRC" TURTLE.4TH"
     10 +LOOP
 ;
 
+: ZOOM
+    361 0 DO
+        I MOVE
+        -122 TURN
+    5 +LOOP
+;
+
+: SPIRAL
+    361 0 DO
+        I 4 / MOVE
+        20 TURN
+    LOOP
+;
+
+: CLEAR 0 0 279 159 HGRRECT ;
+
+: CLEARTO HGRCOLOR 0 0 279 159 HGRRECT ;
+
+: INVERT 0 0 279 159 HGRXORRECT ;
+
+: RESET PENUP 140 80 MOVETO 0 TURNTO PENDOWN ;
+
 SHOW SPIN