API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Feb 27th, 2017
77
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 23.24 KB | None | 0 0
raw download clone embed print report
  1.  
  2.  
  3. ;INITIALIZING
  4. on *:connect:{
  5. join #Tori
  6. rlevel 1000
  7. rlevel 500
  8. rlevel 250
  9. rlevel 100
  10. }
  11.  
  12. ;BAN CHECKER
  13. on gb:JOIN:#:{ mode $chan +b $nick | kick $chan $nick Globale ban }
  14. on cb:JOIN:#:{
  15. if ($chan isin $ulist($address($nick,5),cb,1).info) {
  16. mode $chan +b $nick
  17. kick $chan $nick Geband op dit kanaal
  18. }
  19. }
  20.  
  21. ;OPPING/VOICING
  22. on *:JOIN:#:{
  23. if ($nick != $me) {
  24. if ($readini(channels.ini,$chan,auto-voice) == on) { mode $chan +v $nick }
  25. if ($readini(channels.ini,$chan,auto-op) == on) { mode $chan +o $nick }
  26. if (*o* iswm $readini(channels.ini,$chan,$nick)) { mode $chan +o $nick }
  27. elseif (*v* iswm $readini(channels.ini,$chan,$nick)) { mode $chan +v $nick }
  28. if ($readini(channels.ini,$chan,chan_greet)) { notice $nick $readini(channels.ini,$chan,chan_greet) }
  29. if ($readini(channels.ini,$chan,count) == on) {
  30. if ($readini(channels.ini,tellers,$chan) != $null) {
  31. writeini channels.ini tellers $chan [ $calc($readini(channels.ini,tellers,$chan) + 1) ]
  32. }
  33. else { writeini channels.ini tellers $chan 1 }
  34. msg $chan 10 $+ $nick welkom Je bent persoon nr.4 $readini(channels.ini,tellers,$chan) 10die $chan komt bezoeken het is nu01 [4 $asctime(HH:nn) 01]
  35. }
  36. }
  37. if ($readini(channels.ini,$chan,chan_limit)) { timer_limit 1 5 mode $chan +l $calc($nick($chan,0,a) + $readini(channels.ini,$chan,chan_limit)) }
  38. if ($readini(channels.ini,$chan,peak) == on) {
  39. _peak.check $chan
  40. }
  41. }
  42.  
  43. on *:JOIN:#:{
  44. if ($nick != $me) {
  45. if (*b* iswm $readini(channels.ini,$chan,$nick)) { mode $chan +o $nick }
  46. if ($readini(channels.ini,$chan,auto-voice) == on) { mode $chan +v $nick }
  47. if ($readini(channels.ini,$chan,auto-op) == on) { mode $chan +o $nick }
  48. if ($readini(channels.ini,$chan,chan_greet)) { notice $nick $readini(channels.ini,$chan,chan_greet) }
  49. if ($readini(channels.ini,$chan,count) == on) {
  50. if ($readini(channels.ini,tellers,$chan) != $null) {
  51. writeini channels.ini tellers $chan [ $calc($readini(channels.ini,tellers,$chan) + 1) ]
  52. }
  53. else { writeini channels.ini tellers $chan 1 }
  54. msg $chan 10Welkom4 $nick 10Je bent nummer $readini(channels.ini,tellers,$chan) die $chan komt bezoeken het is nu01 [4 $asctime(HH:nn) 01]
  55. }
  56. }
  57. if ($readini(channels.ini,$chan,chan_limit)) { timer_limit 1 5 mode $chan +l $calc($nick($chan,0,a) + $readini(channels.ini,$chan,chan_limit)) }
  58. if ($readini(channels.ini,$chan,peak) == on) {
  59. _peak.check $chan
  60. }
  61. }
  62.  
  63. ;LOGIN
  64. on *:TEXT:login*:?:{
  65. if ($1 == login) {
  66. if ($strip($2,burc) === $decode($readini(users.ini,$nick,pass),m)) {
  67. notice $nick 4login gelukt! Welkom
  68. if (*n* iswm $readini(users.ini,$nick,flags)) { guser 1000 $nick 5 }
  69. elseif (*m* iswm $readini(users.ini,$nick,flags)) { guser 500 $nick 5 }
  70. elseif (*o* iswm $readini(users.ini,$nick,flags)) { guser 250 $nick 5 }
  71. else { guser 100 $nick 5 }
  72. }
  73. else { notice $nick Login gefaald! Zorg ervoor dat je het goede paswoord hebt! }
  74. }
  75. }
  76.  
  77. ;PASSWORD ROUTINE
  78. on *:TEXT:pass*:?:{
  79. if ($2 == $null) { notice $nick zet een paswoord aub ! - /msg $me pass <u gekozen paswoord> }
  80. elseif ($readini(users.ini,$nick,pass)) {
  81. notice $nick Je hebt al een paswoord ingesteld!
  82. }
  83. elseif (!$readini(users.ini,$nick,pass)) {
  84. if ($len($strip($2,burc)) < 6) { notice $nick Je wachtwoord moet minstens 6 karakters hebben! }
  85. elseif (* [ $+ [ $strip($2,burc) ] $+ ] * iswm $nick) { notice $nick Gebruik een iets moeilijker te raden paswoord. }
  86. elseif ($islower($strip($2,burc))) { notice $nick Gebruik een iets moeilijker te raden paswoord. }
  87. elseif ($isupper($strip($2,burc))) { notice $nick Gebruik een iets moeilijker te raden paswoord. }
  88. else {
  89. writeini users.ini $nick pass $encode($strip($2,burc),m)
  90. notice $nick Je paswoord is nu: $strip($2,burc)
  91. }
  92. }
  93. }
  94.  
  95. ;COMMAND BLOCK
  96. on *:TEXT:!shortnick:#:{
  97. notice $nick De afkorting (shortnick) van $me is s.
  98. }
  99.  
  100. on 100:TEXT:cmd *:#:{
  101. if ($me !isop $chan) { msg $chan Op mij aub!!!! }
  102. if ($2 == help) {
  103. if (!$3) {
  104. if (*n* iswm $readini(users.ini,$nick,flags)) {
  105. notice $nick De commando's die je als eigenaar van de bot kunt gebruiken zijn:
  106. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK GBAN PEAK
  107. notice $nick MODE SAY ACT JOIN PART ADD DEL GREET COUNT LIMIT
  108. notice $nick AUTO-VOICE AUTO-OP CYCLE DROP MSG BANNER AWAY BACK
  109. notice $nick NICK DIE RESTART GDEL REHASH
  110. }
  111. elseif (*m* iswm $readini(users.ini,$nick,flags)) {
  112. notice $nick De commando's die je als master van de bot kunt gebruiken zijn:
  113. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK GBAN MODE
  114. notice $nick SAY ACT JOIN PART ADD DEL GREET COUNT LIMIT AUTO-VOICE
  115. notice $nick PEAK AUTO-OP CYCLE DROP MSG BANNER AWAY BACK REHASH
  116. }
  117. elseif (*o* iswm $readini(users.ini,$nick,flags)) {
  118. notice $nick De commando's die je als globale operator van de bot kunt gebruiken zijn:
  119. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK GBAN
  120. notice $nick MODE SAY ACT JOIN PART ADD DEL GREET COUNT LIMIT
  121. notice $nick PEAK AUTO-VOICE AUTO-OP CYCLE DROP MSG
  122. }
  123. elseif (*n* iswm $readini(channels.ini,$chan,$nick)) {
  124. notice $nick De commando's die je als kanaaleigenaar kunt gebruiken zijn:
  125. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK MODE
  126. notice $nick SAY ACT JOIN PART ADD DEL GREET COUNT LIMIT CYCLE
  127. notice $nick PEAK AUTO-VOICE AUTO-OP DROP
  128. }
  129. elseif (*m* iswm $readini(channels.ini,$chan,$nick)) {
  130. notice $nick De commando's die je als kanaalmaster kunt gebruiken zijn:
  131. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK MODE SAY
  132. notice $nick ACT JOIN PART ADD DEL GREET COUNT LIMIT AUTO-VOICE
  133. notice $nick AUTO-OP PEAK
  134. }
  135. elseif (*o* iswm $readini(channels.ini,$chan,$nick)) {
  136. notice $nick De commando's die je als kanaaloperator kunt gebruiken zijn:
  137. notice $nick OP DEOP VOICE DEVOICE KICK BAN UNBAN BANMASK
  138. notice $nick MODE SAY ACT
  139. }
  140. elseif (*v* iswm $readini(channels.ini,$chan,$nick)) {
  141. notice $nick De commando's die je als kanaalvoice kunt gebruiken zijn:
  142. notice $nick VOICE DEVOICE
  143. }
  144. notice $nick Voor meer info, gebruik help <commando>
  145. }
  146. if ($3 == peak) {
  147. notice $nick Gebruik: peak <on/off>
  148. notice $nick $me zal een piek voor het kanaal bijhouden.
  149. notice $nick Deze kan opgevraagd worden met !peak
  150. }
  151. if ($3 == op) {
  152. notice $nick Gebruik: op [nicks]
  153. notice $nick $me zal [nicks] oppen (max. 3!). Zonder [nicks] zal de bot jou oppen.
  154. }
  155. if ($3 == deop) {
  156. notice $nick Gebruik: deop [nicks]
  157. notice $nick $me zal [nicks] deoppen (max. 3!). Zonder [nicks] zal de bot jou deoppen.
  158. }
  159. if ($3 == voice) {
  160. notice $nick Gebruik: voice [nicks]
  161. notice $nick $me zal [nicks] voicen (max. 3!). Zonder [nicks] zal de bot jou voicen.
  162. }
  163. if ($3 == devoice) {
  164. notice $nick Gebruik: devoice [nicks]
  165. notice $nick $me zal [nicks] devoicen (max. 3!). Zonder [nicks] zal de bot jou devoicen.
  166. }
  167. if ($3 == ban) {
  168. notice $nick Gebruik: ban <nick>
  169. notice $nick $me zal <nick> van het kanaal kick-bannen.
  170. }
  171. if ($3 == banmask) {
  172. notice $nick Gebruik: banmask <host>
  173. notice $nick $me zal <host> permanent bannen.
  174. }
  175. if ($3 == unban) {
  176. notice $nick Gebruik: unban <nick>
  177. notice $nick $me zal <nick> unbannen.
  178. }
  179. if ($3 == gban) {
  180. notice $nick Gebruik: gban <host>
  181. notice $nick $me zal op alle kanalen <host> bannen.
  182. }
  183. if ($3 == kick) {
  184. notice $nick Gebruik: kick <nick> <reden>
  185. notice $nick $me zal <nick> van het kanaal kicken.
  186. }
  187. if ($3 == mode) {
  188. notice $nick Gebruik: mode <modes>
  189. notice $nick $me zet <modes> op het kanaal.
  190. }
  191. if ($3 == say) {
  192. notice $nick Gebruik: say <tekst>
  193. notice $nick $me zal <tekst> in het kanaal zeggen.
  194. }
  195. if ($3 == act) {
  196. notice $nick Gebruik: act <tekst>
  197. notice $nick $me zal <tekst> in het kanaal doen.
  198. }
  199. if ($3 == join) {
  200. notice $nick Gebruik: join <kanaal>
  201. notice $nick $me zal <kanaal> joinen.
  202. }
  203. if ($3 == part) {
  204. notice $nick Gebruik: part
  205. notice $nick $me zal het kanaal verlaten.
  206. }
  207. if ($3 == add) {
  208. notice $nick Gebruik: add <nick> <level>
  209. notice $nick $me zal <nick> toevoegen aan zijn database met <level>.
  210. notice $nick Mogelijke levels zijn:
  211. notice $nick owner - master - globalop - chanowner - chanmaster - chanop - chanvoice - chanbot
  212. notice $nick OPGELET!!! Je kan enkel mensen toevoegen op levels lager dan het jouwe!
  213. }
  214. if ($3 == del) {
  215. notice $nick Gebruik: del <nick>
  216. notice $nick $me zal <nick> verwijderen uit de KANAALDATABASE!!! (de globale flags blijven staan!)
  217. }
  218. if ($3 == gdel) {
  219. notice $nick Gebruik: gdel <nick>
  220. notice $nick $me zal <nick> uit ALLE DATABASES verwijderen.
  221. }
  222. if ($3 == greet) {
  223. notice $nick Gebruik: greet <tekst/off>
  224. notice $nick $me zal binnenkomende chatters groeten met <tekst>.
  225. notice $nick "greet off" zal deze functie uitschakelen.
  226. }
  227. if ($3 == count) {
  228. notice $nick Gebruik: count <on/off>
  229. notice $nick $me zal alle binnenkomende chatters al dan niet tellen.
  230. }
  231. if ($3 == limit) {
  232. notice $nick Gebruik: limit <getal/off>
  233. notice $nick $me zal de limiet op het kanaal telkens met <getal> verhogen. (tegen join floods)
  234. notice $nick "limit off" zal deze functie uitschakelen.
  235. }
  236. if ($3 == auto-voice) {
  237. notice $nick Gebruik: auto-voice <on/off>
  238. notice $nick $me zal iedere binnenkomende chatter al dan niet voicen.
  239. }
  240. if ($3 == auto-op) {
  241. notice $nick Gebruik: auto-op <on/off>
  242. notice $nick $me zal iedere binnenkomende chatter al dan niet oppen.
  243. }
  244. if ($3 == cycle) {
  245. notice $nick Gebruik: cycle
  246. notice $nick $me zal het kanaal cyclen. (d.w.z. parten en opnieuw joinen)
  247. }
  248. if ($3 == drop) {
  249. notice $nick Gebruik: drop
  250. notice $nick $me zal het kanaal verwijderen uit zijn database.
  251. }
  252. if ($3 == msg) {
  253. notice $nick Gebruik: msg <nick> <tekst>
  254. notice $nick $me zal <nick> het bericht <tekst> privé zenden.
  255. }
  256. if ($3 == banner) {
  257. notice $nick Gebruik: banner <tekst>
  258. notice $nick $me zal <tekst> op ieder kanaal zeggen.
  259. }
  260. if ($3 == away) {
  261. notice $nick Gebruik: away <reden>
  262. notice $nick $me zal zich als weg instellen.
  263. }
  264. if ($3 == back) {
  265. notice $nick Gebruik: back
  266. notice $nick $me zal zich niet meer als weg instellen.
  267. }
  268. if ($3 == nick) {
  269. notice $nick Gebruik: nick <nick>
  270. notice $nick $me zal zijn nick veranderen naar <nick>
  271. }
  272. if ($3 == die) {
  273. notice $nick Gebruik: die [reden]
  274. notice $nick $me zal disconnecten met [reden]
  275. }
  276. if ($3 == restart) {
  277. notice $nick Gebruik: restart
  278. notice $nick $me zal zichzelf opnieuw starten.
  279. }
  280. if ($3 == rehash) {
  281. notice $nick Gebruik: rehash
  282. notice $nick $me zal zijn databases opnieuw laden.
  283. }
  284. }
  285. if ($2 == op) {
  286. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  287. if (!$3) { mode $chan +o $nick }
  288. else { mode $chan +ooo $3- }
  289. }
  290. else { notice $nick Geen toegang tot dit commando }
  291. }
  292. if ($2 == deop) {
  293. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  294. if (!$3) { mode $chan -o $nick }
  295. else { mode $chan -ooo $3- }
  296. }
  297. else { notice $nick Geen toegang tot dit commando }
  298. }
  299. if ($2 == voice) {
  300. if (*o* iswm $readini(users.ini,$nick,flags) || *v* iswm $readini(channels.ini,$chan,$nick)) {
  301. if (!$3) { mode $chan +v $nick }
  302. elseif (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) { mode $chan +vvv $3- }
  303. }
  304. else { notice $nick Geen toegang tot dit commando }
  305. }
  306. if ($2 == devoice) {
  307. if (*v* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  308. if (!$3) { mode $chan -v $nick }
  309. elseif (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) { mode $chan -vvv $3- }
  310. }
  311. else { notice $nick Geen toegang tot dit commando }
  312. }
  313. if ($2 == kick) {
  314. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  315. kick $chan $3 Gekickt door $nick $+ : $4-
  316. }
  317. else { notice $nick Geen toegang tot dit commando }
  318. }
  319. if ($2 == ban) {
  320. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  321. ban -u600 $chan $3 5
  322. kick $chan $3 Geband door $nick $+ ! (10 minuten)
  323. }
  324. else { notice $nick Geen toegang tot dit commando }
  325. }
  326. if ($2 == unban) {
  327. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  328. mode $chan -b $address($3,5)
  329. }
  330. else { notice $nick Geen toegang tot dit commando }
  331. }
  332. if ($2 == banmask) {
  333. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  334. if ($left($3,1) !=== -) {
  335. mode $chan +b $3
  336. auser -a cb $3 $chan
  337. notice $nick $3 is toegevoegd aan de lijst met permanente bans voor dit kanaal.
  338. notice $nick Om deze te verwijderen typ je i banmask - $+ $3
  339. }
  340. if ($left($3,1) === -) {
  341. mode $chan -b $right($3,-1)
  342. ruser cb $right($3,-1)
  343. notice $nick $right($3,-1) is uit de lijst met permanente bans voor dit kanaal verwijderd.
  344. }
  345. }
  346. else { notice $nick Geen toegang tot dit commando }
  347. }
  348. if ($2 == gban) {
  349. if (*o* iswm $readini(users.ini,$nick,flags)) {
  350. if ($left($3,1) !=== -) {
  351. var %gban.chan $chan(0)
  352. while (%gban.chan > 0) {
  353. mode $chan(%gban.chan) +b $3
  354. }
  355. auser -a gb $3
  356. notice $nick $3 is toegevoegd aan de lijst met global bans.
  357. notice $nick Om deze te verwijderen typ je i gban - $+ $3
  358. }
  359. if ($left($3,1) === -) {
  360. mode $chan -b $right($3,-1)
  361. ruser gb $right($3,-1)
  362. notice $nick $right($3,-1) is uit de lijst met permanente global bans verwijderd.
  363. }
  364. }
  365. else { notice $nick Geen toegang tot dit commando }
  366. }
  367. if ($2 == mode) {
  368. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  369. mode $chan $3-
  370. }
  371. else { notice $nick Geen toegang tot dit commando }
  372. }
  373. if ($2 == say) {
  374. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  375. msg $chan $3-
  376. }
  377. else { notice $nick Geen toegang tot dit commando }
  378. }
  379. if ($2 == act) {
  380. if (*o* iswm $readini(users.ini,$nick,flags) || *o* iswm $readini(channels.ini,$chan,$nick)) {
  381. describe $chan $3-
  382. }
  383. else { notice $nick Geen toegang tot dit commando }
  384. }
  385. if ($2 == join) {
  386. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  387. join $3
  388. if ($3) { join $3 $nick heeft me naar hier gebracht! }
  389. if (!$3) { join $chan $nick heeft me naar hier gebracht! }
  390.  
  391. }
  392. else { notice $nick Geen toegang tot dit commando. }
  393. }
  394. if ($2 == part) {
  395. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  396. if ($3) { part $3 $nick heeft me weggejaagd! }
  397. if (!$3) { part $chan $nick heeft me weggejaagd! }
  398. }
  399. else { notice $nick Geen toegang tot dit commando. }
  400. }
  401. if ($2 == peak) {
  402. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  403. if ($3- == on || $3- == off) {
  404. writeini channels.ini $chan peak $3
  405. if ($3- == on) { notice $nick $me zal nu voor jouw de piek bijhouden! | writeini channels.ini $chan peak.height $nick($chan,0) | writeini channels.ini $chan peak.time $ctime }
  406. if ($3- == off) { notice $nick $me zal nu voor jouw de piek niet meer bijhouden. }
  407. }
  408. else { notice $nick Niet genoeg parameters. Gebruik: peak <on/off> }
  409. }
  410. else { notice $nick Geen toegang tot dit commando. }
  411. }
  412. if ($2 == add) {
  413. if (*n* iswm $readini(users.ini,$nick,flags)) {
  414. if ($4 == master) { writeini users.ini $3 flags mo | addnotice $nick $3 $4 }
  415. if ($4 == owner) { writeini users.ini $3 flags nmo | addnotice $nick $3 $4 }
  416. }
  417. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  418. if ($4 == globalop && *m* iswm $readini(users.ini,$nick,flags)) { writeini users.ini $3 flags o | addnotice $nick $3 $4 }
  419. if ($4 == chanowner && *m* iswm $readini(users.ini,$nick,flags)) { writeini channels.ini $chan $3 nmov | addnotice $nick $3 $4 }
  420. if ($4 == chanmaster) {
  421. if (*n* iswm $readini(channels.ini,$chan,$nick) || *m* iswm $readini(users.ini,$nick,flags)) {
  422. writeini channels.ini $chan $3 mov
  423. addnotice $nick $3 $4
  424. }
  425. }
  426. if ($4 == chanop) { writeini channels.ini $chan $3 ov | addnotice $nick $3 $4 }
  427. if ($4 == chanvoice) { writeini channels.ini $chan $3 v | addnotice $nick $3 $4 }
  428. if ($4 == chanbot) { writeini channels.ini $chan $3 b | notice $nick $3 is nu als $4 toegevoegd. | halt }
  429. if (chan* iswm $4) {
  430. if (!$read(levels.txt,w,* [ $+ [ $chan ] ])) { write -il3 levels.txt join [ $chan ] }
  431. }
  432. }
  433. else { notice $nick Geen toegang tot dit commando }
  434. }
  435. if ($2 == del) {
  436. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  437. if (*m* iswm $readini(users.ini,$3,flags) || *n* !iswm $readini(users.ini,$nick,flags)) { notice $nick Je kan geen master of eigenaar uit de kanaaldatabase verwijderen. }
  438. else { remini channels.ini $chan $3 | notice $nick $3 is nu verwijderd uit de kanaaldatabase. }
  439. }
  440. else { notice $nick Geen toegang tot dit commando }
  441. }
  442. if ($2 == greet) {
  443. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  444. if ($3- != off) {
  445. writeini channels.ini $chan chan_greet $3-
  446. notice $nick De groet voor $chan is nu: $3-
  447. notice $nick Om deze uit te schakelen gebruik je: greet off
  448. }
  449. if ($3- == off) {
  450. remini channels.ini $chan chan_greet
  451. notice $nick De groet voor $chan is nu uitgeschakeld!
  452. }
  453. }
  454. else { notice $nick Geen toegang tot dit commando }
  455. }
  456. if ($2 == count) {
  457. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  458. if ($3 == on || $3 == off) {
  459. writeini channels.ini $chan count $3
  460. notice $nick De teller voor $chan staat nu: $3
  461. }
  462. else { notice $nick Gebruik: count <on/off> }
  463. }
  464. else { notice $nick Geen toegang tot dit commando }
  465. }
  466. if ($2 == limit) {
  467. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  468. if ($3 == off) {
  469. remini channels.ini $chan chan_limit
  470. notice $nick De limiet voor $chan is nu uitgeschakeld.
  471. mode $chan -l
  472. }
  473. elseif ($3 >= 1) {
  474. writeini channels.ini $chan chan_limit $3
  475. notice $nick De limiet voor $chan zal telkens $3 hoger zijn dan het aantal aanwezigen.
  476. }
  477. else { notice $nick Gebruik: limit <getal> (HOGER DAN 1!) }
  478. }
  479. else { notice $nick Geen toegang tot dit commando }
  480. }
  481. if ($2 == auto-voice) {
  482. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  483. if ($3 == on || $3 == off) {
  484. writeini channels.ini $chan auto-voice $3
  485. notice $nick De auto-voice voor $chan staat nu: $3
  486. }
  487. else { notice $nick Gebruik: auto-voice <on/off> }
  488. }
  489. else { notice $nick Geen toegang tot dit commando }
  490. }
  491. if ($2 == auto-op) {
  492. if (*m* iswm $readini(users.ini,$nick,flags) || *m* iswm $readini(channels.ini,$chan,$nick)) {
  493. if ($3 == on || $3 == off) {
  494. writeini channels.ini $chan auto-op $3
  495. notice $nick De auto-op voor $chan staat nu: $3
  496. }
  497. else { notice $nick Gebruik: auto-op <on/off> }
  498. }
  499. else { notice $nick Geen toegang tot dit commando }
  500. }
  501. if ($2 == cycle) {
  502. if (*m* iswm $readini(users.ini,$nick,flags) || *n* iswm $readini(channels.ini,$chan,$nick)) {
  503. hop $chan Rejoin gevraagd door $nick
  504. }
  505. else { notice $nick Geen toegang tot dit commando }
  506. }
  507. if ($2 == drop) {
  508. if (*m* iswm $readini(users.ini,$nick,flags) || *n* iswm $readini(channels.ini,$chan,$nick)) {
  509. remini channels.ini $chan
  510. notice $nick Het kanaal $chan is nu verwijderd uit mijn database! Nog veel plezier!
  511. part $chan Kanaal verwijderd door $nick
  512. write -dw-* [ $+ [ $chan ] ] levels.txt
  513. }
  514. else { notice $nick Geen toegang tot dit commando }
  515. }
  516. if ($2 == msg) {
  517. if (*o* iswm $readini(users.ini,$nick,flags)) { msg $3- | notice $nick Bericht verzonden }
  518. else { notice $nick Geen toegang tot dit commando }
  519. }
  520. if ($2 == banner) {
  521. if (*m* iswm $readini(users.ini,$nick,flags)) {
  522. var %temp.channum $chan(0)
  523. while (%temp.channum > 0) {
  524. msg $chan(%temp.channum) $3-
  525. dec %temp.channum
  526. }
  527. }
  528. else { notice $nick Geen toegang tot dit commando }
  529. }
  530. if ($2 == away) {
  531. if (*m* iswm $readini(users.ini,$nick,flags)) {
  532. away $3-
  533. notice $nick Ik sta nu op "weg".
  534. }
  535. else { notice $nick Geen toegang tot dit commando }
  536. }
  537. if ($2 == back) {
  538. if (*m* iswm $readini(users.ini,$nick,flags)) {
  539. away
  540. notice $nick Ik sta nu op "terug".
  541. }
  542. else { notice $nick Geen toegang tot dit commando }
  543. }
  544. if ($2 == nick) {
  545. if (*n* iswm $readini(users.ini,$nick,flags)) {
  546. tnick $3
  547. }
  548. else { notice $nick Geen toegang tot dit commando }
  549. }
  550. if ($2 == die) {
  551. if (*n* iswm $readini(users.ini,$nick,flags)) {
  552. quit $3-
  553. }
  554. else { notice $nick Geen toegang tot dit commando }
  555. }
  556. if ($2 == restart) {
  557. if (*n* iswm $readini(users.ini,$nick,flags)) {
  558. server irc.krey.net
  559. }
  560. else { notice $nick Geen toegang tot dit commando }
  561. }
  562. if ($2 == gdel) {
  563. if (*n* iswm $readini(users.ini,$nick,flags)) {
  564. remini users.ini $3
  565. notice $nick $3 is nu verwijderd uit de database.
  566. }
  567. else { notice $nick Geen toegang tot dit commando }
  568. }
  569. }
  570.  
  571. alias _peak.check {
  572. if ($nick($1,0) > $readini(channels.ini,$1,peak.height)) {
  573. set %last.peak. [ $+ [ $1 ] ] $readini(channels.ini,$1,peak.time)
  574. writeini channels.ini $1 peak.height $nick($1,0)
  575. writeini channels.ini $1 peak.time $ctime
  576. msg $1 Ja, er is een nieuwe piek op dit kanaal!
  577. msg $1 Piek van $1 is nu $readini(channels.ini,$1,peak.height) chatters.
  578. if (%last.peak. [ $+ [ $1 ] ]) { msg $1 De vorige piek dateert van $asctime(%last.peak. [ $+ [ $1 ] ],dd mmm yyyy) om $asctime(%last.peak. [ $+ [ $1 ] ],HH:nn:ss) $+ . }
  579. }
  580. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!