Update editor to use Platinum //e keypad like /// keypad

doc/Editor.md

@@ -119,7 +119,11 @@ EDIT COMMANDS:
     OA-DOWN ARROW  = JUMP DOWN
     OA-TAB         = DETAB
 
-  On the keypad, 'OPEN-APPLE' allows
+  Apple //e Platinum AND /// FEATURES:
+  -------------------
+
+  On the keypad, 'OPTION' on //e Plat
+  or 'OPEN-APPLE' on the /// allows
   the keys for navigation and misc:
 
     OA-4           = MOVE CHAR LEFT
@@ -131,10 +135,10 @@ EDIT COMMANDS:
     OA-7           = JUMP BEGIN
     OA-1           = JUMP END
     OA-5           = DELETE CHAR
-    OA--           = CUT SELECTION INTO CLIPBOARD 
+    OA--           = CUT SELECTION INTO CLIPBOARD
     OA-0           = PASTE CLIPBOARD
     OA-ENTER       = OPEN FOLLOWING LINE
-    OA-.           = TOGGLE INSERT/OVERWRITE
+    OA-.           = COPY SELECTION INTO CLIPBOARD
 
 COMMAND MODE:
 

src/dhgr.tk/utils/dhgrrgb.pla

@@ -434,7 +434,7 @@ def rgbImportExport(rgbfile, dhgrfile)#0
           next
           if flags & GREY_HACK
             // Map GREY1 -> GREY2
-            if chromaBits == $0A // Bits are in reverse order from DCGR color value
+            if chromaBits == $0A // Bits are in reverse order
               chromaBits = $05
             fin
           fin

src/toolsrc/ed.pla

@@ -1025,6 +1025,33 @@ def keyin2e
                 key = keyctrlf; break
             is keytab
                 key = keydetab; break
+            //
+            // Map OA+keypad
+            //
+            is $80 | '4'
+                key = keyarrowleft; break
+            is $80 | '6'
+                key = keyarrowright; break
+            is $80 | '8'
+                key = keyarrowup; break
+            is $80 | '2'
+                key = keyarrowdown; break
+            is $80 | '7'
+                key = keyctrlq; break // Top
+            is $80 | '1'
+                key = keyctrle; break // Bottom
+            is $80 | '9'
+                key = keyctrlw; break // Pg Up
+            is $80 | '3'
+                key = keyctrlz; break // Pg Dn
+            is $80 | '5'
+                key = keyctrld; break // Del
+            is $80 | '.'
+                key = keyctrlc; break // Copy
+            is $80 | '0'
+                key = keyctrlv; break // Paste
+            is $80 | '-'
+                key = keyctrlx; break // Cut
         wend
     fin
     return key