I can't figure out how to compile this into a dll file which is escentially
what you'd need to get the sound mail filters to work, however, here is what
you'd do.  Change the words sound1 sound2 and sound3 to the exact path on
your hard disk where the sounds are located.  Hopefully, you can't figure
out how to create a dll.  You can't just save it it notepad, as not only
does it have to be compiled, but it would have to be in a registered class.

Code follows:





tiptname[]

module =="(soundbit))"
variables

    sound1
    sound2
    sound3   ;

**procedure**[a]

declaration:

sound1="sound1"
!  Change the sound1 inside the quotes to match that of the path to the
first file

sound2="sound2"

!  Do the same

sound3="sound3"

!  And again, do the same

SubArray  ;()


const -- probe module|1

    aline folder treeset
FOR sound1=TRUE"
FOR sound2="TRUE"
FOR sound3="TRUE"  ;


        sound1 :- integer/string
    sound2 :- integer/string
    sound3 :- integer/string

GOSUB
    IF
        sound1=("1") & sound2=("1") & sound3=("1")
    THEN
        --..  onsound1Play
    ELSE
        NUL

--*- END Gosub

SetAVars() 0
RETURN Const(s) () 1

ONREG Compile --d
@@DLL version 4.862
@@PF=all 32, 24, 16, 8b
@@COLORS=NUL
@@PROCTYPE=NORMAL PROCESS
RETURN-HOME -(*)

        ;        ;

*

ENDING+COMPILED CORE/KURNEL










Hope that helps.


Chris.