Hi Al,
Now that you've seen the basic macro, here it is again--this time
it's spiced up with a logging function (logs to RINGBACK.LOG in your
{COMMO} "home" directory) and a little display to let you know it's
activated:
RINGBACK.MAC
~~~~~~~~~~~~
{:START}
   {WOPE-A %_hom%ringback.log}
   {WRIT -=-=-=-=-=-=-=-= %_mon%/%_day%/%_yea -=-=-=-=-=-=-=-=}
   {WCLO}
 {:ST1}
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min -- Monitoring Phone Line For Single Ring}
   {WCLO}{SETE-P0 exit}{CLEA}{CURS-N}
   {DISP 4,28,74,+-----------------------+}
   {DISP 5,28,74,| Ringback Macro Active |}
   {DISP 6,28,74,|  Press "Esc" To Exit  |}
   {DISP 7,28,74,+-----------------------+}
   {SETV rback}{LOOK RING}
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min% -- Incoming Call}
   {WCLO}{SETL 5,rback_y}
 {:OTHER}
   {LOOK RING}{SETL 5,rback_n}
   {GOTO other}
 {:LOADB}
   {COMP rback,yes}{IFCO ,st1}
   {CURS-Y}{CALL bbs,mosthost.mac}
   {GOTO st1}
 {:RBACK_Y}
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min% -- Single RING: MostHost Being Activated}
   {WCLO}{SETV rback,yes}{GOTO loadb}
 {:RBACK_N}
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min% -- Multiple RINGs: Returning to Monitor Line}
   {WCLO}{SETV rback,no}{GOTO loadb}
{:EXIT}
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min% -- Exiting To DOS}
   {WCLO}{EXIT}
___---
Enjoy..(this version posted in RGBACK11.ZIP on my BBS)
Jim
... Tag-Man * Demodulator * 520-290-2807 * Tucson AZ * V.everything
--- Maximus/2 2.02
---------------