Enter 2003: The Beautiful Scenery/enter-parhaat-2003.iso/files/airc_setup.exe/data1.cab/Script_-_ASL/asl.vbs

Text File | 2002-07-26 | 495 b | 20 lines

sub airc_init(ScName,ScFunc)
ScName="anti-asl"
ScFunc="removes any private asl requests"
aecho "[asl] asl protection script loaded!",,true
end sub

sub airc_close()
aecho "[asl] asl protection script unloaded!",,true
end sub

sub in_msg(retval,text,nick)
If lcase(left(text,3)) = "asl" Then
aecho "[asl] asl request from " & nick & ", ignoring...",,true
putmsg "[asl] please do not request asl from me.",nick
putignore nick, "msg"
closequery nick
retval = true
end if
end sub