# http://www.quiss.org/swftools/ 
.flash bbox=500x350 version=6 name="slider.swf" compress background=#CCCCCC
 .box max width=16 height=305 
 .box z   width=16 height=5   color=red fill=red
 .edittext inf width=38 height=18  readonly color=blue   
 .edittext tit width=40 height=18 color=black border autosize
 .sprite MySB
  .put tit x=-14 y=0
  .put inf y=323 
  .put max y=21
  .sprite drag_s
   .button curs_b
	.show z as=area
	.show z as=idle
	.show z as=hover
	.show z as=pressed
	.on_press:
		this.startDrag(true,0,0,0,300);
		_parent.inf.text=_y;
	.end
	.on_release:
		_parent.inf.text=_y;
		stopDrag();
	.end
   .end #
   .put curs_b 0 21
  .end #// drag_s sprite because button is not dragable
  .put drag_s  0 0
  .action:
   function evalue() {
	val++;
   }
 .end #action
.end # mySB sprite 
.put o1=MySB 20 0
.put o2=MySB 80 0
.put o3=MySB 160 0
.action:
	_root.o1.tit.text="vitesse";
	_root.o2.tit.text="largeur";
	_root.o3.tit.text="longueur";
.end
.end # flash