source: WorldVistAEHR/trunk/r/TOOLKIT-AWCM-XD-XIN-XPAR-XQAB-XT-XUC-XUR-ZIN-ZTED/XTSPING.m@ 1581

Last change on this file since 1581 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 288 bytes
RevLine 
[613]1XTSPING ;SFISC/RWF - PING SERVER ;8/11/92 15:02;10/20/92 3:49 PM
2 ;;7.3;TOOLKIT;;Apr 25, 1995
3 ;This server just sends back the message it receved.
4A S XMSUB="PING reply to: "_XQSUB,XMY(XMFROM)="",XMTEXT="^XMB(3.9,"_XMZ_",2,"
5 S XMDUZ="PING SERVER"
6 N XMFROM,XMZ,XMREC,XMCHAN D ^XMD
7 Q
Note: See TracBrowser for help on using the repository browser.