(FILECREATED "15-JUN-84 16:55:33" {ERIS}<SPEECH>RECORDED.;1 2181
changes to: (VARS RECORDEDCOMS NEWWORDS)
(FNS RECORD.WORDS RECORD.WORD))
(PRETTYCOMPRINT RECORDEDCOMS)
(RPAQQ RECORDEDCOMS ((FNS RECORD.WORDS RECORD.WORD)
(VARS NEWWORDS)))
(DEFINEQ
(RECORD.WORDS
[LAMBDA NIL (* edited: "15-JUN-84 16:12")
(for W in NEWWORDS do (RECORD.WORD W])
(RECORD.WORD
[LAMBDA (WORD)
(PROG (FILE)
(PRINT WORD T)
(AUDIO.RECORD '{CORE}RECORD.WAVE 3)
(AUDIO.PLAY.FILE '{CORE}RECORD.WAVE)
(SETQ FILE (PACK* '{ERIS}<SPEECH>RECORDED> WORD '.WAVE))
(COPYFILE '{CORE}RECORD.WAVE FILE)
(DELFILE '{CORE}RECORD.WAVE)
(RETURN FILE])
)
(RPAQQ NEWWORDS (d↑b dad daY dcz duWl dUg koWC kiYk kIm gEt geYn g@g g↑b gag gaY gcz guWl gUg goWt
siYs sIm sEt seYn s@g s↑b sag saY lcz kuWl lUg koWt riYl lIm lEt leYn l@k r↑b
lad laY kcz ruWl lUg roWt CiYp CIm CEt JeYn J@k C↑b Cad JaYv Jcz JuWl JUg CoWt
biYb bIm bEt beYn b@k b↑b bad baY bcz buWl bUg boWC fiYf fIm fEt feYn f@k f↑b
fad faY fcz fuWl fUg foWC hiYp hIm hEt heYn h@k h↑b had haY hcz huWl hUg hoWC
miYm mIm mEt meYn m@k m↑b mad maY mcz muWl mUg moWC niYn nIm nEt neYn n@k n↑b
nad naY ncz nuWl nUg noWC tiYt tIm tEt teYn t@k t↑b tad taY tcz tuWl tUg toWC
teYn viYp vIm vEt veYn v@t v↑f var vaYn vcn vuW vUg voWn pEm pIt poWn p↑k p@b
pcd paz pUl puWg peY dEm dIt doWn d↑k d@b dcd diY daz dUl duWg keYC kEm gIt goWn
g↑g g@b gcg giY gaz gUl guWg geYt sEm sIt soWn s↑g s@b scg siY laz kUl luWg keYt
lEm lIt loWn l↑k r@b lcd liY kaz rUl luWg reYt CEm CIt JoWn J↑k C@b Ccd JiYv Jaz
JUl JuWg CeYt bEm bIt boWn b↑k b@b bcd biY baz bUl buWg beYC fEm fIt foWn f↑k
f@b fcd fiY faz fUl fuWg feYC hEm hIt hoWn h↑k h@b hcd hiY haz hUl huWg heYC mEm
mIt moWn m↑k m@b mcd miY maz mUl muWg meYC nEm nIt noWn n↑k n@b ncd niY naz nUl
nuWg neYC tEm tIt toWn t↑k t@b tcd tiY taz tUl tuWg teYC vEm vIt voWn v↑t v@f
vcr viYn van vU vuWg veY))
(DECLARE: DONTCOPY
(FILEMAP (NIL (272 801 (RECORD.WORDS 282 . 453) (RECORD.WORD 455 . 799)))))
STOP