TIP: Click on subject to list as thread! ANSI
echo: commo
to: AL KEITH
from: JIM BENNETT
date: 1995-04-04 19:17:00
subject: Get The Raid

Hi Al,
What would a program be without a couple minor bugs :)  My beta
tester (me) neglected to give me prompt feedback.  Try this on for
size, instead:
RINGBACK.MAC
~~~~~~~~~~~~
{:START}
   {WOPE-A %_hom%ringback.log}
   {WRIT -=-=-=-=-=-=-=-= %_mon%/%_day%/%_yea -=-=-=-=-=-=-=-=}
   {WCLO}
 {:ST1}
   {SETL 0}                                                   <-Added
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min -- Monitoring Phone Line For Single Ring}
   {WCLO}{SETE-P0 exit}{CLEA}
   {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}{CURS n}{LOOK RING}              <- "CURS n" correct syntax
   {WOPE-A %_hom%ringback.log}
   {WRIT %_24h%:%_min% -- Incoming Call}
   {WCLO}{SETL 8,rback_y}
 {:OTHER}
   {LOOK RING}{SETL 8,rback_n}
   {GOTO other}
 {:LOADB}
   {COMP rback,yes}{IFCO ,st1}
   {CURS y}{CALL bbs,mosthost.mac}             <- "CURS y" correct syntax
   {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}
___--
See, I was able to also provide a little lesson in debugging..hehe
Regards..
Jim
                      
--- Maximus/2 2.02
---------------
* Origin: Tech. Support - Tucson,AZ V.34 520-797-9785 (1:300/603)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.