(FILECREATED " 2-Aug-84 00:27:17" {ERIS}<SPEECH>WITHGOTT>VOWEL-CHARTMENU.;2 4058   

      changes to:  (VARS IY)

      previous date: " 1-Aug-84 21:09:22" {ERIS}<SPEECH>WITHGOTT>VOWEL-CHARTMENU.;1)


(* Copyright (c)  by NIL. All rights reserved.)

(PRETTYCOMPRINT VOWEL-CHARTMENUCOMS)

(RPAQQ VOWEL-CHARTMENUCOMS ((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 %))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP