Subversion Repositories wimsdev

Rev

Rev 4158 | Go to most recent revision | Details | 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
4
slib_title=Output random words in the dictionary
5
slib_parms=2\
6
,word lengths (as items or as words)\
7
,language (optional, defauts to the module's language)
8
slib_author=Gang Xiao
9
slib_out=the random words according to specified word lengths, separated by spaces.
10
slib_example= 3,4,8,fr\
11
 3,4,8,en\
12
  3,4,8,es
13
!exit
14
 
15
:proc
16
slib_lang=!item -1 of $wims_read_parm
17
slib_lang_save=$module_language
18
!if $slib_lang iswordof $wims_site_languages
19
 slib_lens=!item 1 to -2 of $wims_read_parm
20
 module_language=$slib_lang
21
!else
22
 slib_lens=$wims_read_parm
23
!endif
24
slib_lens=!items2words $slib_lens
25
slib_out=!exec randic $slib_lens
26
slib_out=!singlespace $slib_out
27
module_language=$slib_lang_save
28