home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / dfÜ / bbs / microbbs1.1 / commands / writemessage < prev   
Encoding:
AmigaDOS Script File  |  1996-02-14  |  406 b   |  18 lines
  1. .key NODE/A,USER/A
  2. .bra {
  3. .ket }
  4.  
  5. IF EXISTS "BBS:Users/$MSGTO{NODE}"
  6.     C:Delete >NIL: T:Message.{NODE}
  7.  
  8. ;    BBS:Commands/AED T:Message.{NODE}
  9.     C:Type MicroBBS:{NODE} TO T:Message.{NODE}
  10.  
  11.     IF EXISTS T:Message.{NODE}
  12.         C:Echo "{USER}:" >>BBS:Messages/$MSGTO{NODE}
  13.         C:Attach >NIL: T:Message.{NODE} BBS:Messages/$MSGTO{NODE}
  14.     ENDIF
  15. ELSE
  16.     C:Echo "$MSGTO{NODE} does not exist!"
  17. ENDIF
  18.