(FILECREATED "23-Jul-84 18:32:00" {ERIS}<SPEECH>WITHGOTT>MENU.;1
 4101   

      changes to:  (VARS IY)

      previous date: "20-Jun-84 17:45:48" {PHYLUM}<WITHGOTT>LISP>MENU.;2)


(* Copyright (c) 1982, 1983, 1984 by Xerox Corporation)

(PRETTYCOMPRINT MENUCOMS)

(RPAQQ MENUCOMS
 ((VARS IY TOUCH-TONE VOWELH VOWELHELP)))

(RPAQ IY (READBITMAP))
(75 95
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@LJ@@@@"
"@@@@@@@@@@@@@@@J@@@@"
"@@@@@@@@@@@@@@LN@@@@"
"@@@@@@@@@@@@@@LB@@@@"
"@@@@@@@@@@@@@@LN@@@@"
"@@@@@@@@@@@@@@L@@@@@"
"@@@@@@@@@@@@@@L@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@GOOOOOOOOOON@@@@@"
"@@@MEEEEEEEEEEEH@@@@"
"OOOJJJJJJJJJJJJOOON@"
"@@AEEEEEEEEEEEED@@@@"
"@@AJJJJJJJJJJJJL@@@@"
"@@AEEEEEEEEEEEED@@@@"
"@@AJJJJJJJJJJJJL@@@@"
"@@@MEEEEEEEEEEEH@@@@"
"@@@FJJJJJJJJJJK@@@@@"
"@@@COOOOOOOOOON@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@COOOOOOOOOOL@@@@@"
"@@@FJJJJJJJJJJJ@@@@@"
"@@@MEEEEEEEEEEG@@@@@"
"@@AJJJJJJJJJJJK@@@@@"
"@@CEEEEEEEEEEEE@@@@@"
"@@BJJJJJJJJJJJK@@@@@"
"@@AEEEEEEEEEEEE@@@@@"
"@@AJJJJJJJJJJJJ@@@@@"
"@@@EEEEEEEEEEEF@@@@@"
"@@@COOOOOOOOOOL@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"OOOOOOOOOOOOOOOOOOL@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"OOOOOOOOOOOOOOOOOON@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@GOOOOOOOOOON@@@@@"
"@@AJJJJJJJJJJJK@@@@@"
"@@CEEEEEEEEEEEEH@@@@"
"@@FJJJJJJJJJJJJH@@@@"
"@@EEEEEEEEEEEEED@@@@"
"@@FJJJJJJJJJJJJL@@@@"
"@@EEEEEEEEEEEEED@@@@"
"@@FJJJJJJJJJJJJL@@@@"
"@@CEEEEEEEEEEEEH@@@@"
"@@BJJJJJJJJJJJJH@@@@"
"@@AOOOOOOOOOOOO@@@@@"
"@@@@@@@@@@@@@@@@@@@@"
"@@@@@@@@@@@@@@@@@@@@")

(RPAQQ TOUCH-TONE
 {MENU}#11,163000)

(RPAQQ VOWELH
 {MENU}#13,45250)

(RPAQQ VOWELHELP
 (% (Before [(list)
			      ((QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW]
			     (((LIST IY
				     (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW)))
			       CENTERFLG ← T MENUROWS ← 3 MENUCOLUMNS ← 5 MENUFONT ←
			       (FONTCREATE (QUOTE HELVETICA)
					   10
					   (QUOTE BOLD))
			       TITLE ← (QUOTE (Vowel-Helper))
			       ITEMHEIGHT ← 95 ITEMWIDTH ← 70 MENUBORDERSIZE ← 2 CHANGEOFFSETFLG ← T)
			      ((QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW)))
			      CENTERFLG ← T MENUROWS ← 3 MENUCOLUMNS ← 5 MENUFONT ←
			      (FONTCREATE (QUOTE HELVETICA)
					  10
					  (QUOTE BOLD))
			      TITLE ← (QUOTE (Vowel-Helper))
			      ITEMHEIGHT ← 95 ITEMWIDTH ← 70 MENUBORDERSIZE ← 2 CHANGEOFFSETFLG ← T))
		     [After [(IY)
			     (LIST IY
				   (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW]
			    ((LIST IY
				   (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW)))
			     list
			     (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW]
		     (Delete [(IY)
			      (IY (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW]
			     ((NIL I E @ A C %. ↑ U UW EY AY CY AW OW)
			      (IY)
			      I E @ A C %. ↑ U UW EY AY CY AW OW))
		     (Delete [(NIL I E @ A C %. ↑ U UW EY AY CY AW OW)
			      (IY)
			      (IY (QUOTE (I E @ A C %. ↑ U UW EY AY CY AW OW]
			     (((I E @ A C %. ↑ U UW EY AY CY AW OW))
			      (NIL I E @ A C %. ↑ U UW EY AY CY AW OW)))
		     NIL %))
(PUTPROPS MENU COPYRIGHT ("Xerox Corporation" 1982 1983 1984))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP