home *** CD-ROM | disk | FTP | other *** search
/ Dream 52 / Amiga_Dream_52.iso / Amiga / Internet / Irc / DwarfxNW.lha / DWaRFx-TNG / DWaRFx / DWaRFREPLy.AmIRX < prev    next >
Text File  |  1998-05-07  |  762b  |  12 lines
  1. /*
  2. \\ |DWaRFx-TNg| - DWaRFRePLy.AmIRX v1.3
  3. //              - By Gareth Murfin
  4. \\
  5. // Sends out fake ctcp replies to a user which appear in a different colour.
  6. \\
  7. // To run do /DwREPLY <user> <text>
  8. \\        or /Rx Rexx/DWaRFx/DWaRFReply.AmIRX <user> <text>
  9. //
  10. \\ Thanks to GerO^MsR
  11. */
  12. ;parse arg channelnick text;text=substr(text,2);evnum=Substr(Address(),Pos('.',Address()));Call Setclip('DFxTIME'evnum,Time());if channelnick="" then;do;"echo P="d2c(27)"b½DWaRFREPLy╗ specify a nick dog head";exit;end;if text="" then;do;"echo P="d2c(27)"b½DWaRFREPLy╗ You need to specify text you gimp!.";exit;end;"echo P="d2c(27)"b½DWaRFREPLy╗ "Text" sent to "channelnick" curtesy of "d2c(2)"|DWaRFx-TNG|"d2c(2)".";"Raw NOTICE "||channelnick||" :"||"01"X||text||"01"X||"0a"X