home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / EVD41.ZIP / EVD_UTIL.ZIP / TX2MB220.ZIP / EVENTSYS.BAT < prev    next >
DOS Batch File  |  1991-03-10  |  2KB  |  45 lines
  1. echo off
  2. rem ┌────────────────────────────────────────────────────────────────────────┐
  3. rem │ Example EVENT.SYS showing how to produce an event processing report    │
  4. rem │ (event.log) and have it inserted as a message to the SYSOP.            │
  5. rem │                                                                        │
  6. rem │ Note the use of SET TXT2MSG= so that all TXT2MSG runs during this      │
  7. rem │ event will be 'from' EVENT PROCESS unless overridden by each command-  │
  8. rem │ line call of TXT2MSG (see LOGMAIL.BAT for an example).                 │
  9. rem │                                                                        │
  10. rem │ Note that the "tm" is a time_mark utility - There is a PD version from │
  11. rem │ Sam Smith and a commercial version available from Norton.  This logs   │
  12. rem │ the time and time elapsed (on up to 4 counters (/Cx)) since "START".   │
  13. rem └────────────────────────────────────────────────────────────────────────┘
  14. cls
  15. echo Processing EVENT 2...
  16.  
  17. SET TXT2MSG=-rin "-fEvent Process"
  18.  
  19. tm START "Event 2 Start -- " /LOG/L/C1 >>c:\pcb\eventsys\event.log
  20. tm START /C2
  21.  
  22. %COMSPEC%/c d:\all\event\abnormal.bat    ; Abnormal logoff processing report
  23. tm STOP "Abnormal Logoff ..." /LOG/L/N/C1 >>c:\pcb\eventsys\event.log
  24. tm START /C1
  25.  
  26. %COMSPEC%/c d:\all\event\scripts.bat     ; SQ2MSG processing for all scripts
  27. %COMSPEC%/c d:\all\event\callers.bat     ; Update BLT15/16/17/18/19 CallerStats
  28. tm  STOP "Callers Process ..." /LOG/L/N/C1 >>c:\pcb\eventsys\event.log
  29. tm START /C1
  30.  
  31. %COMSPEC%/c d:\all\event\netmail.bat     ; Echomail (RNet) processing
  32. %COMSPEC%/c d:\all\event\logmail.bat     ; TXT2MSG RNet log status report
  33. tm  STOP "Mailrun ..........." /LOG/L/N/C1 >>c:\pcb\eventsys\event.log
  34. tm START /C1
  35.  
  36. rem   *** ETC ***
  37.  
  38. tm  STOP "Event 2 End  --  " /LOG/L/C2 >>c:\pcb\eventsys\event.log
  39. TXT2MSG e:\conf\main c:\pcb\eventsys\event.log
  40. del c:\pcb\eventsys\event.log
  41.  
  42. c:
  43. cd\pcb
  44. board
  45.