Subversion Repositories wimsdev

Rev

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

Rev 6722 Rev 7179
Line 82... Line 82...
82
  !set embcnt=!positionof item r$i in $embedded
82
  !set embcnt=!positionof item r$i in $embedded
83
  !default reply_$i=$(reply$i)
83
  !default reply_$i=$(reply$i)
84
  !set p_=$(reply_$i)
84
  !set p_=$(reply_$i)
85
  !set tt=!word 1 of $(replygood$i)
85
  !set tt=!word 1 of $(replygood$i)
86
  !if $tt!=?analyze
86
  !if $tt!=?analyze
87
    !set cl=$(colorr_$(diareply$i))
87
    !set cl=#$(colorr_$(diareply$i))
88
  !else
88
  !else
-
 
89
   !if transparent iswordof $wims_fill_option
-
 
90
     !set cl=
-
 
91
   !else
89
    !set cl=$colorr_ana
92
     !set cl=#$colorr_ana
-
 
93
   !endif
90
    !set embedded_analyze=!append item $i to $embedded_analyze
94
    !set embedded_analyze=!append item $i to $embedded_analyze
91
!!    !set embedded_bracket=$embedded_bracket [$embcnt]
95
!!    !set embedded_bracket=$embedded_bracket [$embcnt]
92
  !endif
96
  !endif
93
  !set replyname$i=[$embcnt]
97
  !set replyname$i=[$embcnt]
94
  !distribute item $(reposition_$c) into rx,ry
98
  !distribute item $(reposition_$c) into rx,ry
95
  var f_l$c=new DynLayer();
99
  var f_l$c=new DynLayer();
96
  var f_t$c=new DynLayer();
100
  var f_t$c=new DynLayer();
97
  f_l$c.setAnchor({topA:'fill$oldfillcnt',leftA:'fill$oldfillcnt',
101
  f_l$c.setAnchor({topA:'fill$oldfillcnt',leftA:'fill$oldfillcnt',
98
    left:$rx,top:$ry,stretchH:$sizei*$ssizex,stretchV:$ssizey});
102
    left:$rx,top:$ry,stretchH:$sizei*$ssizex,stretchV:$ssizey});
99
  dynapi.document.addChild(f_l$c);
103
  dynapi.document.addChild(f_l$c);
100
  f_l$c.setBgColor('#$cl');
104
  f_l$c.setBgColor('$cl');
101
  !set ss=!replace internal " by \" in $(reply$i)
105
  !set ss=!replace internal " by \" in $(reply$i)
102
  !set ss=!replace internal , by   in $(reply$i)
106
  !set ss=!replace internal , by   in $(reply$i)
103
  !set ss=!replace internal ' by \' in $ss
107
  !set ss=!replace internal ' by \' in $ss
104
  f_l$c.setHTML($cc1+'$ss'+$cc2);
108
  f_l$c.setHTML($cc1+'$ss'+$cc2);
105
  !if $tt!=?analyze
109
  !if $tt!=?analyze
106
   f_t$c.setAnchor({topA:'fill$oldfillcnt',leftA:'fill$oldfillcnt',
110
   f_t$c.setAnchor({topA:'fill$oldfillcnt',leftA:'fill$oldfillcnt',
107
    left:$rx+$ssizex-4,top:$ry,stretchH:$Sx,stretchV:$Sy});
111
    left:$[$rx+$ssizex-4],top:$ry,stretchH:$Sx,stretchV:$Sy});
108
   dynapi.document.addChild(f_t$c);
112
   dynapi.document.addChild(f_t$c);
109
   f_t$c.setHTML('<small>[$embcnt]<\/small>');
113
   f_t$c.setHTML('<small>[$embcnt]<\/small>');
110
   f_t$c.setZIndex(100);
114
   f_t$c.setZIndex(100);
111
  !endif
115
  !endif
112
 !next c
116
 !next c