Subversion Repositories wimsdev

Rev

Rev 2861 | Rev 3040 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2861 Rev 2935
Line 43... Line 43...
43 
!default wims_scorecolor=,red,red,red,orange,orange,orange,yellow,yellow,green,green
 43 
!default wims_scorecolor=,red,red,red,orange,orange,orange,yellow,yellow,green,green
44 
!default wims_scoreview=-1
 44 
!default wims_scoreview=-1
45 
!if class isin $livret_scoreoption
 45 
!if class isin $livret_scoreoption
46 
 wims_scorecolor=!defof class_scorecolor in wimshome/log/classes/$wims_class/.def
 46 
 wims_scorecolor=!defof class_scorecolor in wimshome/log/classes/$wims_class/.def
47 
!endif
 47 
!endif
- 
 
 48 
 
- 
 
 49 
convert_table=$empty
- 
 
 50 
tmp=!record 0 of wimshome/log/classes/$wims_class/sheets/.weight
- 
 
 51 
ntmp=!linecnt $tmp
- 
 
 52 
cpt=1
- 
 
 53 
!for k=1 to $ntmp
- 
 
 54 
 t=!line $k of $tmp
- 
 
 55 
 !if $t!=$empty
- 
 
 56 
  t=$cpt
- 
 
 57 
  !increase cpt
- 
 
 58 
 !else
- 
 
 59 
  t=$empty
- 
 
 60 
 !endif
- 
 
 61 
 convert_table=!append item $t to $convert_table
- 
 
 62 
!next k