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 >
Wrap
Text File
|
2003-11-03
|
901b
|
26 lines
Message $strip($$1):editbox -fp /msg $strip($$1)
Query $strip($$1): query $strip($$1)
Whois $strip($$1):whois $strip($$1)
Erase [ [ [ $strip($$1) ] $+ ] 's ] Messages:{
var %c = $strip($$1)
var %a = $fline(@MPPLogViewer,* $+ $chr(91) $+ %c $+ $chr(93) $+ *,0)
while (%a > 0) {
dline @MPPLogViewer $fline(@MPPLogViewer,* $+ $chr(91) $+ %c $+ $chr(93) $+ *,%a)
dec %a
}
while ($read($mppalogfile,w,* $+ $chr(91) $+ %c $+ $chr(93) $+ *) != $null) {
var %b = $readn
write -dl $+ %b $+(",$mppalogfile,")
}
dline -l @MPPLogViewer $fline(@MPPLogViewer,%c,1,1)
}
-
Erase Away Log:{
window -c @MPPLogViewer
if $dialog(mppaway) { did -o mppaway 19 1 0 }
.timer 1 1 .remove $+(",$mppalogfile,")
.timer 1 1 set %mppawaylogmsgs 0
.timer 1 1 echo -s $mppaway.a(1) $+ *** $mpplogo1 Your log has been erased
}
-
Close Log Viewer:window -c @MPPLogViewer