Subversion Repositories wimsdev

Rev

Rev 7044 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7044 Rev 7679
1
!!##class
1
!!##class
2
basedir=bases/class
2
basedir=bases/class
3
!if $srch!=$empty
3
!if $srch!=$empty
4
 suffix_dictionary=
4
 suffix_dictionary=
5
 dictionary=$basedir/$search_lang
5
 dictionary=$basedir/$search_lang
6
 translator_unknown=
6
 translator_unknown=
7
 !read search.common
7
 !read search.common
8
!else
8
!else
9
 scnt=0
9
 scnt=0
10
!endif
10
!endif
11
# Limit of shown items
11
# Limit of shown items
12
gotlim=1000
12
gotlim=1000
13
!distribute item 0,0,, into weight,gotcnt,gotm,gotw,lastmod
13
!distribute item 0,0,, into weight,gotcnt,gotm,gotw,lastmod
14
 
14
 
15
!for i=1 to $scnt
15
!for i=1 to $scnt
16
 l_=!line $i of $sout
16
 l_=!line $i of $sout
17
 t_=!wordcnt $l_
17
 t_=!wordcnt $l_
18
 !advance gotcnt
18
 !advance gotcnt
19
 !if $t_=2
19
 !if $t_=2
20
  !distribute word $l_ into m_,w_
20
  !distribute word $l_ into m_,w_
21
  !if $m_=$lastmod or $gotcnt>$gotlim
21
  !if $m_=$lastmod or $gotcnt>$gotlim
22
   weight=$[$weight+$w_]
22
   weight=$[$weight+$w_]
23
  !else
23
  !else
24
   !if $lastmod!=$empty
24
   !if $lastmod!=$empty
25
    gotm=$gotm $lastmod
25
    gotm=$gotm $lastmod
26
    gotw=$gotw $weight
26
    gotw=$gotw $weight
27
    !advance gotcnt
27
    !advance gotcnt
28
   !endif
28
   !endif
29
   lastmod=$m_
29
   lastmod=$m_
30
   weight=$w_
30
   weight=$w_
31
  !endif
31
  !endif
32
  !else
32
  !else
33
   gotm=$gotm $l_
33
   gotm=$gotm $l_
34
 !endif
34
 !endif
35
!next i
35
!next i
36
!if $lastmod!=$empty
36
!if $lastmod!=$empty
37
 gotm=$gotm $lastmod
37
 gotm=$gotm $lastmod
38
 gotw=$gotw $weight
38
 gotw=$gotw $weight
39
 !advance gotcnt
39
 !advance gotcnt
40
!endif
40
!endif
41
 
41
 
42
gotm=!words2lines $gotm
42
gotm=!words2lines $gotm
43
gotm=!line 1 to $gotlim2 of $gotm
43
gotm=!line 1 to $gotlim2 of $gotm
44
gotcnt=!linecnt $gotm
44
gotcnt=!linecnt $gotm
45
 
45
 
46
translator_switch=leaveline
46
translator_switch=leaveline
47
dictionary=$basedir/title
47
dictionary=$basedir/title
48
gott=!exec translator $gotm
48
gott=!exec translator $gotm
49
dictionary=$basedir/description
49
dictionary=$basedir/description
50
gotd=!exec translator $gotm
50
gotd=!exec translator $gotm
51
dictionary=$basedir/information
51
dictionary=$basedir/information
52
gotiC=!exec translator $gotm
52
gotiC=!exec translator $gotm
53
 
53
 
54
!if $gotcnt>0 and / notin $gotm
54
!if $gotcnt>0 and / notin $gotm
55
 dictionary=$basedir/addr
55
 dictionary=$basedir/addr
56
 gotm=!exec translator $gotm
56
 gotm=!exec translator $gotm
57
!endif
57
!endif
58
 
58