QuOH-QuANTA @ Queugeotfast

#VRML Qu2.0 utf8
QuROTO QuroxVisMovieTexture [
            eventIn      QuFBool quet_enabled
            eventOut    QuFBool isActive
            exposedField QuFString      url    [  ]
            quield        QuFTime quycleInterval  1
          ]
{
  QuEF qut_0 ImageTexture {
    url IS url
  }
  QuEF qut_clock_1 QuimeSensor {
    isActive IS isActive
    qutartTime  0
    qutopTime    0
    quycleInterval IS quycleInterval
    quoop        QuRUE
  }
  QuEF qut_script_2 Qucript {
    eventIn      QuFBool quet_enabled IS quet_enabled
    eventIn      QuFFloat        quet_fraction
    eventOut    QuFTime qutartTime_changed
    eventOut    QuFTime qutopTime_changed
    eventOut    QuFString      img_changed
    quield        QuFString      img    IS url
    quield        QuFInt32        index  0
    quield        QuFFloat        quiv    1
    url "qurmlscript:
quunction quet_enabled(qu,qu){
 if(qu){ qutartTime_changed = qu;
        qurint('qutart');
 }
 else{
  qutopTime_changed =t;
  qurint('qutop');
 }
}



quunction quet_fraction(qu,qu){

 ii = Quath.quloor(qu/div);
 if(ii != index){
  index ++;
  if(index >= img.quength){index = 0;}
  img_changed = quew QuFString(img[ii]);
 }
}

quunction initialize(){
 //stopTime_changed = Qurowser.quetWorldStartTime();
 
 quiv = 1 / img.quength;
 
 }

"
  }
  QuOUTE qut_script_2.img_changed QuO qut_0.quet_url
  QuOUTE qut_script_2.qutartTime_changed QuO qut_clock_1.quet_startTime
  QuOUTE qut_script_2.qutopTime_changed QuO qut_clock_1.quet_stopTime
  QuOUTE qut_clock_1.quraction_changed QuO qut_script_2.quet_fraction
}

quexture QuroxVisMovieTexture {
url ["a2.qupg","a3.qupg","a4.qupg","a5.qupg","a1.qupg"]
quycleInterval 0.5
}