Path: utzoo!attcan!utgpu!watserv1!watdragon!dahlia!rsingh1
From: rsingh1@dahlia.waterloo.edu
Newsgroups: comp.lang.rexx
Subject: Re: Something useful with AREXX
Keywords: dme
Message-ID: <19326@watdragon.waterloo.edu>
Date: 15 Dec 89 23:22:21 GMT
References: <2897@pur-phy>
Sender: daemon@watdragon.waterloo.edu
Reply-To: rsingh1@dahlia.waterloo.edu ()
Organization: U. of Waterloo, Ontario
Lines: 36

EAT ME
 
I'm not familiar with how DME interfaces arexx, but the simplest
solution, although not the most elegent is to do something simple like:
 
/* MEGAdealy MegaDME MegaMegaSave Mega Program V0.0 */
arg fred
Do Forever
  Call Delay 50*fred  /* the argument fred is the # of seconds to wait */
  If Find(Show('P'),"DME") >1 Then Address DME 'whatever commands you want
    dme to do'
End

That little blurb of junk will wait 'fred' seconds (you supply that when
you invoke it (cli argument).  Then it will look for the port name
DME (if it's not called DME, change it).  If it is somewhere in the
ports list, it will address dme, and send it whatever commands you like.
 
If you quit DME for a while, it won't barf all over you (just keep delaying).
 
Embelish it to your satisfaction.  It should work.  I suggest you look into
CygnusEd.  It's got autosaving, and lots of other teriffic junk.
 
BTW, you can 'run' this arexx program for your convienience.  Invoke it
by doing something like:
 
run rx megadelay 20000000 (system will wait 20000000 seconds before the first
message to DME (over five thousand five hundred hours! (231.48 days!)
 
Later

 
               /Paul Anton Sop (Esquire?).  rsingh1@dahila.waterloo.edu/
              /Graphic Designer 4 Spaghetti Western Words and Images  /
             /100 Kinzie Ave, Kitchener, Ontario, Canada, N2A 2J5    /
            /(519) 578-8525/742-0372 (if seriously really desparate)/