Subject: | |
From: | |
Reply To: | Gehan G. |
Date: | Fri, 10 Oct 2003 11:13:50 -0700 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
If you want a free chat type program I have this script.
Feel FREE to use it ;)
DISCLAIMER: I did NOT write this code. I copied the bulk of the
script out of the mpe/ix system admin handbook by Jon Diercks. I
have changes some parts to suit my needs. I appologize in
advance if I shouldn't be posting other peoples code with out
their "express written permission"...
______________________________________________
USER DEFINED COMMAND FILE: CHAT.COMMANDS.ACT
PARM USER=""
IF "!USER" = "" THEN
SHOWJOB JOB=@S
INPUT CHAT_USER,"WHICH USER [RETURN=CANCEL] "
ELSE
SETVAR CHAT_USER "!USER"
ENDIF
IF CHAT_USER <> ""
ERRCLEAR
CONTINUE
TELL !CHAT_USER;THIS IS A CHAT REQUEST.
IF CIERROR=0
TELL !CHAT_USER;TYPE: CHAT #S!HPJOBNUM TO CONNECT.
ECHO CHAT INITILIZED
ECHO TYPE "BYE TO QUIT"
SETVAR MSG, ""
ERRCLEAR
WHILE DWNS(MSG) <> "bye" AND CIERROR=0 DO
SETVAR MSG ""
INPUT MSG, ">"
CONTINUE
TELL !CHAT_USER; !MSG
ENDWHILE
ENDIF
ENDIF
DELETEVAR CHAT_@
ECHO CHAT DISCONNECTED
____________________________________
--- Brian Donaldson <[log in to unmask]> wrote:
> We now have an application that will allow users signed on the
> 3K machine
> to chat with each other without having to do "TELL", "WARN" or
> Vesoft's "WARNF" etc.
>
> CHAT/3000 demo is now available.
>
> Submit your request for a free 30 day demo of CHAT/3000 along
> with your
> company name/contact person, street address, city, state, zip
> and HPSUSAN
> number.
>
> Your demo will be mailed within 24 hours.
> [log in to unmask]
__________________________________
Do you Yahoo!?
The New Yahoo! Shopping - with improved product search
http://shopping.yahoo.com
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|