Thanks Chris.  I'll let you know if I can try this what happens.

Vicki

----- Original Message -----
From: "Chris Gilland" <[log in to unmask]>
To: <[log in to unmask]>
Sent: Saturday, February 05, 2005 11:29 PM
Subject: [ECHURCH-USA] Code


> 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.
>