-." Power off to abort, or" cr
-." press Enter to erase everything here and install debxo ${IMAGE} ?"
-begin
- key d =
-until
+." Type yes then enter to erase everything here and install ${IMAGE} ? "
+cursor-on
+key lcc dup emit ascii y = not [if] cr abort [then]
+key lcc dup emit ascii e = not [if] cr abort [then]
+key lcc dup emit ascii s = not [if] cr abort [then]
+key dup emit d = not [if] cr abort [then]
+