home *** CD-ROM | disk | FTP | other *** search
/ napalm.napnet.hu / 2015-02-12.napalm.napnet.hu.tar / napalm.napnet.hu / programok / kommunikacio / mpp700.exe / menu.txt < prev    next >
Text File  |  2003-11-03  |  901b  |  26 lines

  1. Message $strip($$1):editbox -fp /msg $strip($$1)
  2. Query $strip($$1): query $strip($$1)
  3. Whois $strip($$1):whois $strip($$1)
  4. Erase [ [ [ $strip($$1) ] $+ ] 's ] Messages:{
  5.   var %c = $strip($$1)
  6.   var %a = $fline(@MPPLogViewer,* $+ $chr(91) $+ %c $+ $chr(93) $+ *,0)
  7.   while (%a > 0) {
  8.     dline @MPPLogViewer $fline(@MPPLogViewer,* $+ $chr(91) $+ %c $+ $chr(93) $+ *,%a)
  9.     dec %a
  10.   }
  11.   while ($read($mppalogfile,w,* $+ $chr(91) $+ %c $+ $chr(93) $+ *) != $null) {
  12.     var %b = $readn
  13.     write -dl $+ %b $+(",$mppalogfile,")
  14.   }
  15.   dline -l @MPPLogViewer $fline(@MPPLogViewer,%c,1,1)
  16. }
  17. -
  18. Erase Away Log:{
  19.   window -c @MPPLogViewer
  20.   if $dialog(mppaway) { did -o mppaway 19 1 0 }
  21.   .timer 1 1 .remove $+(",$mppalogfile,")
  22.   .timer 1 1 set %mppawaylogmsgs 0
  23.   .timer 1 1 echo -s $mppaway.a(1) $+ *** $mpplogo1 Your log has been erased
  24. }
  25. -
  26. Close Log Viewer:window -c @MPPLogViewer