-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathfuelrats.mrc
146 lines (136 loc) · 4.01 KB
/
fuelrats.mrc
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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
menu nicklist {
FuelRats
.On emergency O2?: msg $chan $1 $+ : Are you on emergency oxygen? (Is there a blue timer in the top-right of your screen?)
.PC or Xbox?: msg $chan $1 $+ : Are you on PC or Xbox?
.System?: msg $chan $1 $+ : What system are you in?
. -
.$iif(%fr_client == $1,$style(1)) Set as client
..$iif(%fr_client == $1 && %fr_client_os == pc,$style(3)) PC: set_client_and_os $1 pc
..$iif(%fr_client == $1 && %fr_client_os == x,$style(3)) Xbox: set_client_and_os $1 x
.$iif(%fr_dispatch == $1, $style(1)) Set as dispatch: {
set %fr_dispatch $1
echo -a Dispatch set to $1
}
. -
.Assign to %fr_client : msg $chan !assign %fr_client $1-
.Grab last message: msg $chan !grab $1
. -
.Ratsignal!: msg $chan !inject $1 ratsignal %fr_client_os
}
alias set_client_and_os {
set %fr_client $1
set %fr_client_os $2
echo -a Client set to %fr_client %fr_client_os
}
menu channel {
%fr_client
.KgbFoam: msg $chan !kgbfoam %fr_client
.-
.Prep: msg $chan !prep %fr_client
.Send Friend Request: msg $chan ! $+ %fr_client_os $+ fr %fr_client
.Send Wing Request: msg $chan ! $+ %fr_client_os $+ wing %fr_client
.Enable Beacon: msg $chan ! $+ %fr_client_os $+ beacon %fr_client
.-
.$iif(%fr_client == null, $style(2)) Unset client: {
unset %fr_client
echo -a Client cleared
}
Dispatch
.Rogger: msg $chan Roger that
.Ready: msg $chan Ready
.On my way: msg $chan On my way to %fr_client
.+System+: msg $chan sys+ %fr_client
.-
.+Recieved Friend Request+: msg $chan fr+ %fr_client
.-No Friend Request-: msg $chan fr- %fr_client
. -
.+Recieved Wing Request+: msg $chan wr+ %fr_client
.-No Wing Request-: msg $chan wr- %fr_client
. -
.+Beacon in place+: msg $chan bc+ %fr_client
.-No Beacon-: msg $chan bc- %fr_client
.-
.+Position+: msg $chan pos+ %fr_client
.-No Instance-: msg $chan instance- %fr_client
.-
.Refueling %fr_client : msg $chan Refueling %fr_client
.db+pw+ %fr_client: msg $chan db+pw+ %fr_client
. -
.Unset dispatch %fr_dispatch: {
unset %fr_dispatch
echo -a Dispatch unset
}
-
Case Red
.Tell dispatch: msg $chan %fr_dispatch $+ : %fr_client is now CR!
.And tell client to quit: {
msg $chan %fr_dispatch $+ : %fr_client is now CR!
msg $chan ! $+ %fr_client_os $+ exit %fr_client
}
..Tell RatSqueak: msg $chan !codered %fr_client Case Red
-
RatSqueak[BOT]
.%fr_client
..Toggle active: msg $chan !active %fr_client
..Quote: msg $chan !quote %fr_client
..Close: msg $chan !clear %fr_client
.-
.List Cases: msg $chan !list
.List Inactive: msg $chan !list -i
.Get info for
..$submenu($case_info_menu($1))
.Close case
..$submenu($case_close_menu($1))
}
menu query {
%fr_client
. -
.$iif(%fr_client == null, $style(2)) Unset client: {
unset %fr_client
echo -a Client cleared
}
%fr_dispatch
. -
.Unset dispatch: {
unset %fr_dispatch
echo -a Dispatch unset
}
-
Case Red
..Tell RatSqueak: query RatSqueak[BOT] !codered %fr_client Case Red
-
RatSqueak[BOT]
.%fr_client
..Toggle active: query RatSqueak[BOT] !active %fr_client
..Quote: query RatSqueak[BOT] !quote %fr_client
..Close: query RatSqueak[BOT] !clear %fr_client
.-
.List Cases:query RatSqueak[BOT] !list
.List Inactive: query RatSqueak[BOT] !list -i
.Get info for
..$submenu($case_info_menuq($1))
.Close case
..$submenu($case_close_menuq($1))
}
alias case_info_menu {
if ($1 <= 10) return Case $calc($1 - 1) : msg $chan !quote $calc($1 - 1)
}
alias case_close_menu {
if ($1 <= 10) return Case $calc($1 - 1) : msg $chan !clear $calc($1 - 1)
}
alias case_info_menuq {
if ($1 <= 10) return Case $calc($1 - 1) : query RatSqueak[BOT] !quote $calc($1 - 1)
}
alias case_close_menuq {
if ($1 <= 10) return Case $calc($1 - 1) : query RatSqueak[BOT] !clear $calc($1 - 1)
}
on *:NICK: {
if ($nick === %fr_client) {
set %fr_client $newnick
echo -a Changed current client nick to $newnick
}
if ($nick === %fr_dispatch) {
set %fr_dispatch $newnick
echo -a Changed dispatch nick to $newnick
}
}