| 1234567891011121314151617181920212223242526272829303132333435 |
- DEFINITION MODULE Spkr;
- (*
- * REPERTOIRE
- * Release 1.6
- * By Charles Bradford and Cole Brecheen
- * (c) Copyright 1985-1992 PMI
- * Green Bay, Wisconsin
- * All rights reserved
- * (414) 468-6040
- *
- * $Header: D:/logfiles/defs/spkr.dev 1.4 30 Dec 1990 18:04:46 coleb $
- *
- *)
- TYPE
- SoundTypes = (Beep, Warble);
- SoundLevels = (Low, Normal, High, RealHigh);
- SoundTimes = (Short, Medium, Long);
- PROCEDURE Delay(pause : CARDINAL);
- PROCEDURE StartNoise(infreq : CARDINAL);
- PROCEDURE StopNoise();
- PROCEDURE TimedNoise(thefreq, thetime :
- CARDINAL);
- PROCEDURE Noise(kind : SoundTypes; pitch :
- SoundLevels; duration : SoundTimes);
- PROCEDURE Init();
- END Spkr.
|