Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Merge branch 'master' of github.com:Matael/teuse

Conflicts:
	teuse.pl
  • Loading branch information...
commit 83cba3c2ec5950c6fb6aae44981aad67f6ed05ec 2 parents cef46a4 + bf3cd3e
Mathieu G. authored August 25, 2012
26  plugins/insulte.py
@@ -16,15 +16,17 @@
16 16
 liste_Insulte = [
17 17
     "t'es qu'une émission de carbone 14",
18 18
     "t'es tellement pas attractif que même tes électrons s'en vont",
19  
-    "t'es tellement moche que les photons que tu réfléchi diminuent leur durée de vie",
  19
+    "t'es tellement moche que les photons que tu réfléchis diminuent leur durée de vie",
20 20
     "t'es tellement pas drôle que même l'hydrogène ne te donne pas une voie éguë",
  21
+    "t'es tellement lourd que tu dévies la lumière",
21 22
     "t'es aussi prévisible qu'une équation linéaire du premier ordre",
22 23
     "t'es tellement pas sécurisant que t'as tes attributs en public",
23 24
     "t'es connecté en socket avec ton propre cerveau pour réfléchir, sauf que vous n'utilisez pas le même protocole",
24 25
     "t'es aussi intuitif que la syntaxe polonaise inversée",
25  
-    "t'es formaté en UTF-1"
26  
-    "t'es aussi décourageant qu'un segmentation fault",
27  
-    "t'es aussi chiant qu'un virus, sauf que lui il est codé en ASM"
  26
+    "t'es formaté en UTF-0",
  27
+    "t'es aussi décourageant qu'un segfault",
  28
+    "t'es aussi chiant qu'un virus, sauf que lui il est codé en ASM",
  29
+    "t'es panéliste pour INDECT",
28 30
 
29 31
     "t'as pas assez de neurones pour faire du multithread",
30 32
     "t'as redoublé ta crèche tellement t'es pas adapté à l'intelligence",
@@ -34,16 +36,17 @@
34 36
     "t'as raté le carrefour phylogénique qui sépare le singe de l'homme",
35 37
     "t'as jamais réussi à indenter ton code en Python",
36 38
     "t'as programmé en procédural avec java",
37  
-    "t'as applaudit ACTA"
  39
+    "t'as applaudi ACTA",
38 40
 
39 41
     "ton adressage mémoire s'arrête à 0xFF",
40  
-    "ton adresse atitrée, c'est NULL",
  42
+    "ton adresse attitrée, c'est NULL",
41 43
     "ton processeur a une datasheet de 2 lignes",
42 44
     "ton pc n'a jamais vu le terminal, ni même son émulateur",
43 45
     "ton pc tourne sous brainfuck OS",
44 46
 
45  
-    "ta méthode parler() n'a pas d'argument"
46  
-    "ta carte son ne sait faire que du bruit chiant"
  47
+    "ta méthode parler() n'a pas d'argument",
  48
+    "ta méthode reflexion() est de type void",
  49
+    "ta carte son ne sait faire que du bruit blanc"
47 50
 ]
48 51
 
49 52
 
@@ -53,7 +56,8 @@
53 56
     "Tu savais ",
54 57
     "On t'as déjà dit ",
55 58
     "T'avais remarqué ",
56  
-    "Tu te rendais compte "
  59
+    "Tu te rendais compte ",
  60
+    "Qui ne sais pas "
57 61
 ]
58 62
 
59 63
 # Liste des suffixes d'interpellation exclamatives
@@ -61,7 +65,9 @@
61 65
     "Tout le monde sait ",
62 66
     "Il est démontré ",
63 67
     "Tu devrais te rappeler ",
64  
-    "Oublis pas "
  68
+    "Oublie pas ",
  69
+    "Rappelles toi ",
  70
+    "Souviens toi "
65 71
 ]
66 72
 
67 73
 # Liste des choix de mode d'insulte
55  teuse.pl
@@ -15,7 +15,29 @@ package Teuse;
15 15
 use base qw( Bot::BasicBot );
16 16
 
17 17
 # @yops
18  
-my @yops = qw(yop plop bouga salutations! ahoy! enchantier!);
  18
+my @yops = qw(
  19
+	yop
  20
+	plop
  21
+	bouga
  22
+	ahoy
  23
+	salut
  24
+	salutations!
  25
+	ahoy!
  26
+	enchantier!
  27
+	salut!
  28
+	salutations!
  29
+	);
  30
+my @meh = (
  31
+   'gné ?',
  32
+   'va chier !',
  33
+   'may be...',
  34
+   'et ta soeur !',
  35
+   "le poulet, c'est bon",
  36
+   'thx !',
  37
+   'youpi !',
  38
+   'pelle',
  39
+   'un chameau est un dromadaire presque partout'
  40
+   );
19 41
 my $master = "matael";
20 42
 my $redis_db = 3;
21 43
 my $redis_prefix = "teuse:";
@@ -66,7 +88,7 @@ sub said {
66 88
 	# }}}
67 89
 
68 90
 	# yops {{{
69  
-	elsif ($talk and $a->{body} =~ /.*(yop?|bouga|morning|a?hoy|plop)(\W|$).*/i) {
  91
+	elsif ($talk and $a->{body} =~ /.*(yop?|bouga|salut|salutations?|morning|a?hoy|plop)(\W|$).*/i) {
70 92
 		my $i = rand @yops;
71 93
 		$self->say(
72 94
 			who => $a->{who},
@@ -77,6 +99,29 @@ sub said {
77 99
 	# }}}
78 100
 
79 101
 	# cookie {{{
  102
+=======
  103
+	# meh
  104
+	elsif ($talk and $a->{body} =~ /\Wteuse\W/i) {
  105
+		my $i = rand @meh;
  106
+		$self->say(
  107
+			who => $a->{who},
  108
+			channel => $a->{channel},
  109
+			body => $meh[$i]
  110
+		);
  111
+	}
  112
+
  113
+	# pong
  114
+	elsif ($talk and $a->{body} =~ /^ping$/i) {
  115
+		$self->say(
  116
+			who => $a->{who},
  117
+			channel => $a->{channel},
  118
+			body => "pong",
  119
+		);
  120
+	}
  121
+
  122
+
  123
+	# cookie
  124
+>>>>>>> bf3cd3e6a2ff71f9c0904db05d5a0e440c294455
80 125
 	elsif ($talk and $a->{body} =~ /.*cookie.*/) {
81 126
 		$self->say(
82 127
 			channel => $a->{channel},
@@ -107,7 +152,7 @@ sub said {
107 152
 	elsif ($a->{body} =~ /!f+u+s+i+o+n+\W*/) {
108 153
 		$self->say(
109 154
 			channel => $a->{channel},
110  
-			body => '.../o/.........'
  155
+			body => '/o/............'
111 156
 		);
112 157
 		$self->say(
113 158
 			channel => $a->{channel},
@@ -188,7 +233,11 @@ sub said {
188 233
 			$self->say(
189 234
 				who => $a->{who},
190 235
 				channel => $a->{channel},
  236
+<<<<<<< HEAD
191 237
 				body => `python pulgins/insulte.py`
  238
+=======
  239
+				body => `python plugins/insulte.py`
  240
+>>>>>>> bf3cd3e6a2ff71f9c0904db05d5a0e440c294455
192 241
 			);
193 242
 		}
194 243
 	}

0 notes on commit 83cba3c

Please sign in to comment.
Something went wrong with that request. Please try again.