// Visual IRC '98 standard event/alias/menu library
// Version 1.10
Name ViRC '98 1.10 event/alias/menu library
// Events
Event <default> "*"
// This event is handled internally.
// Default server text is displayed
// automatically by ViRC '98.
EndEvent
Event <OnStart> "*"
// This event is fired when ViRC '98 starts up.
EndEvent
Event <OnClose> "*"
// This event is fired when ViRC '98 closes down.
EndEvent
Event <OnConnect> "*"
// This event is fired on connection to the server.
EndEvent
Event <OnDisconnect> "*"
// This event is fired on disconnection from the server.
if ($ChannelCount() > 0)
TextOut ecError *** Disconnected from server \b$server\b.
endif
EndEvent
Event <OnNotifyJoin> "*"
TextOut > . ecNOTICE *** Notify: $0 is on IRC
EndEvent
Event <OnNotifyQuit> "*"
TextOut > . ecNOTICE *** Notify: $0 has quit IRC
EndEvent
Event <OnNewInactiveText> "*"
// This event is fired when a line of text is added
// to a window that doesn't have the focus.
EndEvent
Event <OnDCCChatConnect> "*"
// Fired when a DCC Chat session connects.
// The nick is in $0.
EndEvent
Event <OnDCCChatDisconnect> "*"
// Fired when a DCC Chat session disconnects.
// The nick is in $0.
EndEvent
Event <OnDCCChatText> "*"
// Fired when new DCC Chat text comes in.
// The nick is in $0. The text is in $1-.
EndEvent
Event <OnDCCSendConnect> "*"
// Fired when a DCC Send session connects.
// The nick is in $0. The filename is in $1-.
EndEvent
Event <OnDCCSendDisconnect> "*"
// Fired when a DCC Send session disconnects.
// The nick is in $0. The filename is in $1-.
// $2 contains 1 if the transfer completed successfully, 0 otherwise.
EndEvent
Event <OnDCCGetConnect> "*"
// Fired when a DCC Get session connects.
// The nick is in $0. The filename is in $1-.
EndEvent
Event <OnDCCGetDisconnect> "*"
// Fired when a DCC Get session disconnects.
// The nick is in $0. The filename is in $1-.
// $2 contains 1 if the transfer completed successfully, 0 otherwise.
EndEvent
Event <OnNewUserConnect> "*"
TextOutBitmap > . ecServText $bitmap(_face.bmp) Welcome to the all-new $char(3)1,9Visual IRC '98$char(3)! If you have any problems with the client, then click on the hyperlink to join the #virc channel. Remember to visit http://www.megalith.co.uk/virc and http://www.visualirc.com frequently for the latest versions too!!
EndEvent
Event RawServerNotice "NOTICE *"
TextOut > . ecError *** [\bRAW\b] $2-
EndEvent
Event JOIN "* JOIN"
TextOutBitmap > $2 ecJOIN $bitmap(_join.bmp) *** \b$nick ($user@$host)\b has joined channel $2
if ($GetBanlevel($nick!$user@$host) >= 1)
Bk $2 $nick You're not welcome here!! (banlevel = $GetBanlevel($nick!$user@$host))
endif
if ($GetUserlevel($nick!$user@$host) >= 1)
Mode $2 +o $nick
endif
EndEvent
Event PART "* PART"
if ([$nick] != [$N])
TextOutBitmap > $2 ecPART $bitmap(_part.bmp) *** \b$nick ($user@$host)\b has left channel $2
endif
EndEvent
Event QUIT "* QUIT"
for (@l $i = 1; $i <= $channelcount(); $i++)
if ($ison($nick $channels($i)))
TextOutBitmap > $channels($i) ecQUIT $bitmap(_quit.bmp) *** Signoff: \b$nick ($user@$host)\b has left IRC [$2-]
endif
endfor
EndEvent
Event TOPIC "* TOPIC"
TextOut > $2 ecTOPIC *** \b$nick\b has changed the topic on $2 to "$StrTrim($3-)"
EndEvent
Event MODE "* MODE"
TextOutBitmap > $2 ecMODE $bitmap(_mode.bmp) *** Mode change [$3-] on channel $2 by \b$nick\b
EndEvent
Event INVITE "* INVITE"
TextOut ecNotice *** \b$nick ($user@$host)\b invites you to channel $StrTrim($3-)
