/* ARexx script to Talk someone */
/* For use with AmiComSys 1.12+ */
/* Talk must be in the AMITCP:bin directory */
/* $VER talk.rexx 1.1 (15.1.1998) Håkan Parting */
ADDRESS AMICOMSYS;
OPTIONS RESULTS;

GET stem info. CLIENTLIST;
/* "stem info." inserts the results to the structure 'info.'. */
/* "var s" would have inserted all the results to one string in s. */
/* "CLIENTLIST": We want to read the client list information. */
s=info.selected;
ADDRESS COMMAND 'rx AMITCP:bin/talk '||info.usernames.s||'@'||info.hostnames.s;
/* Start the talk arexx script for AmTalk */

EXIT;