Subversion Repositories wimsdev

Rev

Rev 4349 | Rev 4508 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
20 reyssat 1
!if $wims_read_parm!=slib_header
2
 !goto proc
3
!endif
4158 bpr 4
 
4349 bpr 5
slib_author=Gang, XIAO
4158 bpr 6
 
4507 bpr 7
slib_example=fr\
8
\
4054 guerimand 9
en,girl,3\
10
nl,boy girl,5
20 reyssat 11
!exit
12
 
4054 guerimand 13
!! third parm to get many first name distinct in one tim (FG)
14
!! Maj french fname by Jérémy Lebas
15
 
20 reyssat 16
:proc
17
 
4054 guerimand 18
slib_test=!itemcnt $wims_read_parm
19
!if $slib_test=3
20
 !distribute item $wims_read_parm into slib_lang,slib_genre,slib_nb
21
 !bound slib_genre within boy,girl default boy
22
 slib_langs=!words2items $wims_site_languages
23
 !bound slib_lang within $slib_langs default en
24
!else
25
!! old configuration parameters needed to be saved until modules use this slib has been change
26
 slib_opt=!items2words $wims_read_parm
27
 slib_genre=$empty
28
 !if boy iswordof $slib_opt
29
  slib_genre=boy
20 reyssat 30
 !endif
4054 guerimand 31
 !if girl iswordof $slib_opt
32
  slib_genre=$slib_genre girl
33
 !endif
34
 slib_langs=!words2items $wims_site_languages
35
 slib_lang=$module_language
36
 !for slib_l in $slib_langs
37
  !if $slib_l iswordof $slib_opt
38
   slib_lang=$slib_l
39
  !endif
40
 !next slib_l
41
!endif
42
!bound slib_nb between 1 and 10 default 1
4507 bpr 43
!default slib_genre=boy
44
!if $lang iswordof fr nl
45
 !default slib_lang=$lang
46
!endif
20 reyssat 47
!if $slib_lang=fr
4054 guerimand 48
 slib_boy=Alain, André, Bernard, Bertrand, \
20 reyssat 49
  Carlos, Charles, Christophe, Claude, \
50
  Didier, Fabrice, François, Frédéric, Georges, \
51
  Gérard, Guillaume, Jacques, Jean, Joseph, \
52
  Laurent, Louis, Luc, Marc, \
53
  Matthieu, Michel, Olivier, Patrick, Paul, Philippe, Pierre, \
4054 guerimand 54
  Richard, Robert, Thierry, Xavier, \
55
 Stephan, Jordy, Alexandre, Emrullah, Esteban, Florent, Sacha, Antonin, Nicolas, Dorian, Ryan, Camille, \
56
 Logan, Anthony, Mel, Louis, Jordan, Jean-Christophe, Smaïn, Tristan, Louis, Thomas, Kohai, Thibault, Mouhammad, \
57
 Rudy, Romuald, Clément, Erwan, Hugo, Olivier, Thibault, Nicolas, Medhi, Valentin, Alan, Baptiste, Ambroise, Alexandre, \
58
 Dorian, Axel, Logan, Noam, Adem, Alric, Alexandre, Anthony, Quentin, Alexandre, Laurent, Pierre, Jayson, Remy, Aymen, Cyril, \
59
 Maxime, Magomed, Yannis, Louis, Sébastien, Thibault, Steven, Thomas, Mike, Nathan, Alexis, Quentin, Sébastien, Thomas,\
60
 Hind, pablo, Alexy, Rim, Enzo, Pierre, Guillaume, Benjamin, Jérémy, Jimmy, Thomas, Prasanth, Daniel, Théo, Ruben, Matthieu, \
61
 Paul, Francis, Florian, Clément, Théo, Nour-El-Houda, Sofiane, Rayane, Kevin, Téo, Yoan, Damien, Kevin, Christian, Kain, Hugo, \
62
 Anthony, Deniz, Ludovic, Olivier, Romain, cedric, Thomas, William, Levi, Lorenzo, Jonathan, Joachim, Gaël, Bilal, Jérémy, Raphaël, Florent,\
63
 Marvin, Wajdi, Florian, Matteo, Nassim, Hamza, Fabian, Idris, Allan, Marwanne, Abdoulla, Thomas, Lilian, Faycel, Sébastien, Johan, Kevin, Benjamin, Thomas, Akromat, Diye, Majdi, Medhi,\
64
 Christopher, Thomas, Walid
65
 
66
 slib_girl=Alice, Anne, Bernadette, \
20 reyssat 67
  Caroline, Catherine, Céline, Claire, Cloé, Denise, \
68
  Emmanuelle, Frédérique, Jeanne, Jeannine, Joséphine, Julie,\
69
  Laeticia, Laure, Lucie, Marie, Marion, Mireille, \
4054 guerimand 70
  Patricia, Rose, Sophie, Sylvie, \
71
 Lorna, Leslie, Maëlys, Marie, Malia, Pauline, Lamia, Alexia, Kenssy-Maïlys, Emma, Pauline, Eleonore, Elise, Séréna, Maé, \
72
 Manon, Aude, Amélie, Myrina, Eva, Chiara, Caroline, Caroline, Ambre, Oriane, Marie-Anaïs, Clémence, Manon, Floriane, Camille, \
73
 Willow, Sarah, Alicia, Romane, Lucie, Marine, Dorine, Maeva, Manon, Chloe, Laetitia, Lea, Soumeya, Sarah, Manuela, Olivia, Yael,\
74
 Charlotte, Marine, Sandy, Chloé, Doris, Erika, Marion, Lola, Chavely, Myriam, Elisa, Manuela, Isabelle, Fanny, Amandine, Elisa, Maia, \
75
 Jade, Christel, Barbara, Jade, Maissa, Eva, Julie, Elsa, Melissa, Andrea, Carla, Mariama, Esther, Elise, Loane, Laurie, Anna, Manoa, \
76
 Elena, Léonie, Célia, Chloé, Romane, Salomé, Pauline, Setareh, Aurélia, Marine, Cherrine, Vanessa, Ornella, Charlotte, Christelle, \
77
 Victoria, Noémie, Laurie, Juliette, Marion, Lena, laura, Emilie, Anne-Laure, Claire, Imen, Nina, Andrea, Clementine, Laëtitia, Lory, \
78
 Ophélie, Cathy, Paula, Margot, Célia, Estelle, Jade, Melody, Amira, Inès, Inès, Sarah, Kaouthar, Nausica, Jacqueline,Lina, Maeva, Lizie, \
79
 Marissa, Noemie, Alessia, Marie, Luana, Rhita, Marion, Melissa, Kelly, Erika, Océane, Yasmina, Clélia, \
80
 Noellia, Allison, Amel, Alicia, Maeva, Camille, Alexia, Inès, Christina, iris, Cynthia, Inès
20 reyssat 81
!endif
82
 
83
!if $slib_lang=nl
84
 
4054 guerimand 85
 slib_boy=Jan,Piet,Klaas,Gerard,Jonny,Sjonnie,Wim,Henk,\
20 reyssat 86
 willem,Willem-Jan,Koos,Paul,Robin,Bart,Dani,Edgar,Jacob,Willem,\
87
 Mohammed,Ali,Joost,Johan,Karel,Martin,Hans,Frederik,Bennie,Benno,\
88
 Freddy,Jelmer,Rinus,Marinus,Roderick,Simon,Anton,Ton,Tom,Nico
89
 
4054 guerimand 90
 slib_girl=Marlies,Marloes,Anna,Hanna,Johanna,Aaltje,Mariska,\
20 reyssat 91
 Roelie,Joke,Ellie,Elli,Evelien,Vera,Kristel,Christel,Chantal,\
92
 Loeki,Aafke,Marijke,Petra,Olga,Sien,Jo,Karlijn,Katinka,Bonnie,Carolien,\
93
 Anita,Hedwig,Karen,Karin,Koosje,Rosa,Lidwina,Astrid,Lenie,Lena,Maria,Eva,Marijke,\
94
 Anneke,Alie
95
!endif
96
 
4054 guerimand 97
!default slib_boy=Andrew, Bill, Charles, David, \
20 reyssat 98
 Edwin, George, Harry, Henry, Jack, James, John, \
99
 Mark, Michael, Peter, \
100
 Richard, Robert, Ronald, Thomas, William
101
 
4054 guerimand 102
!default slib_girl=Alice, Anna, Catherine, \
20 reyssat 103
 Diana, Elisabeth, Jane, Linda, \
104
 Marguerite, Marilyn, Mary, Nancy, \
105
 Rose, \
106
 Victoria, Virginia
107
 
4054 guerimand 108
slib_out=$empty
109
!if girl iswordof $slib_genre
110
 slib_out=!append item $slib_girl to $slib_out
20 reyssat 111
!endif
4054 guerimand 112
!if boy iswordof $slib_genre
113
 slib_out=!append item $slib_boy to $slib_out
20 reyssat 114
!endif
4054 guerimand 115
slib_out=!listuniq $slib_out
116
slib_out=!shuffle $slib_out
117
slib_out=!item 1 to $slib_nb of $slib_out