;;;
;;;
;;;	Author:
;;;		Henry C. Francis
;;;		425 N. Ashe St.
;;;		Southern Pines, NC 28387
;;;
;;;	e-mail hfrancis@pinehurst.net
;;;	All rights reserved.
;;;
;;;	Copyright: 
;;;	   Edited: 
(defun c:playmidis ()
  (setq middir (dos_dir "c:/midis/*.mid"))
  (foreach n middir
    (STARTAPP"C:/WINNT/SYSTEM32/MPLAY32.EXE" "C:/MIDIS/ANGIE.mid" )
  )
)