Subject: | |
From: | |
Reply To: | |
Date: | Sun, 6 Feb 2005 16:28:13 -0500 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
As I said, you'll have to find a way to compile it into a dll. It isn't a
matter of pasting it in notepad, then saving it with a dll extention.
Chris.
----- Original Message -----
From: "Vicki and The Rors" <[log in to unmask]>
To: <[log in to unmask]>
Sent: Sunday, February 06, 2005 3:29 PM
Subject: Re: Code
> 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.
>>
|
|
|