ECHURCH-USA Archives

The Electronic Church

ECHURCH-USA@LISTSERV.ICORS.ORG

Options: Use Forum View

Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Chris Gilland <[log in to unmask]>
Reply To:
Echurch-USA The Electronic Church <[log in to unmask]>
Date:
Sun, 6 Feb 2005 16:28:13 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (122 lines)
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.
>>

ATOM RSS1 RSS2