File: 2.8script

package info (click to toggle)
ircii 4.4-3
  • links: PTS
  • area: main
  • in suites: hamm, slink
  • size: 4,256 kB
  • ctags: 2,797
  • sloc: ansic: 36,743; sh: 907; makefile: 483; lex: 16
file content (72 lines) | stat: -rw-r--r-- 2,400 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72

# This script is intended for use with 2.8 servers on all sites.
# It handles some formatting options and join options for novice
# users
# updated 2-1-94

# We need a special function to handle numerics first.
# $n.o(123 ***)   returns 123 if SHOW_NUMERICS on or *** otherwise.
alias n.o if (SHOW_NUMERICS == [ON])
	{@ function_return = [$0]}
	{@ function_return = [***]}

alias topic if (index(#*& $[1]0) > -1)
		{ ${K}${K}topic $*}
		{ ${K}${K}topic $C $*}

alias invite if (index(ischannel($1)) > -1)
		{ ${K}${K}invite $0 $1 }
		{ ${K}${K}invite $0 $C }

# Trace information
on ^200 * echo $n.o($H ***) $1 $0 \($2\) ==> $3-
on ^201 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^202 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^203 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^204 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^205 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^206 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^207 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^208 * echo $n.o($H ***) $1 [$2] ==> $3-
on ^209 * echo $n.o($H ***) $1 $2 Entries linked: $3
on ^261 * echo $n.o($H ***) $1     ==> $2 Level $3-
on ^NOTICE "%.% *Link*" echo *** $2-

# Stats information
on ^211 * echo $n.o($H ***) $[40]1 $[10]2 $[10]3 $[10]4 $[10]5 $[12]6 $7-
on ^212 * echo $n.o($H ***) $[10]1 :  $[-10]2 $[-10]3
on ^213 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^214 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^215 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
#on ^216 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^217 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^218 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^241 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6
on ^243 * echo $n.o($H ***) $1:$2:$3:$4:$5:$6

#
# 220 is used by .troy versions to return information on
# host masks being enforced locally.
#
on ^220 * echo $n.o($H ***) $1 $[10]2 $3

# introduction information
on ^004 * echo $n.o($H ***) umodes available $3, channel modes available $4
# and LUSERS output reformated.
on ^252 * echo $n.o($H ***) There are $1 operators online
on ^254 * echo $n.o($H ***) $1 channels have been formed
on ^255 * echo $n.o($H ***) This server has $3- connected

# Service list:
on ^231 * echo $n.o($H ***) Service $1 \($0\)

# Ban list:
on ^367 * echo $n.o($H ***) $([$CHANNEL_NAME_WIDTH]1) $2-

# RPL_STATSKLINE        -- stats k
on ^216 * {
    @ n.rplk = [$*]
    @ n.rplk = [$#n.rplk]
    echo $n.o($H ***) $1:$2:$(3-${n.rplk-4}):$(${n.rplk-3})
    assign -n.rplk
}