InitialObjectDescriptor {
 objectDescriptorID 1
 audioProfileLevelIndication 255
 visualProfileLevelIndication 254
 sceneProfileLevelIndication 1
 graphicsProfileLevelIndication 1
 ODProfileLevelIndication 1
 esDescr [
  ES_Descriptor {
   ES_ID 1
   decConfigDescr DecoderConfigDescriptor {
    streamType 3
    decSpecificInfo BIFSConfig {
     isCommandStream true
     pixelMetric true
     pixelWidth 300
     pixelHeight 300
    }
   }
  }
 ]
}

OrderedGroup {
 children [
  WorldInfo {
   info ["This shows extended node deletion" "through BIFS extended commands" "GPAC Regression Tests" "(C) 2002-2004 GPAC Team"]
   title "Node delete test"
  }
  DEF BACK Background2D {
   backColor 1 1 1
  }
  DEF OG OrderedGroup {
   order [2 1 3]
   children [
    DEF TR Transform2D {
     scale 0.5 0.5
     children [
      DEF S Shape {
       appearance Appearance {
        material DEF MAT Material2D {
         emissiveColor 1 0 0
         filled TRUE
        }
       }
       geometry IndexedFaceSet2D {
        coord DEF COORD Coordinate2D {
         point [-100 0 -50 100 50 100 100 0 50 -100 -50 -100]
        }
       }
      }
     ]
    }
    Transform2D {
     translation -50 40
     children [
      Shape {
       appearance Appearance {
        material Material2D {
         emissiveColor 1 0 1
         filled TRUE
        }
       }
       geometry Circle {
        radius 30
       }
      }
     ]
    }
    Transform2D {
     translation 50 -50
     children [
      Shape {
       appearance Appearance {
        material Material2D {
         emissiveColor 1 0 1
         filled TRUE
        }
       }
       geometry Rectangle {
        size 100 50
       }
      }
     ]
    }
   ]
  }
  Transform2D {
   translation 0 -100
   children [
    Shape {
     appearance Appearance {
      material Material2D {
       emissiveColor 0 0 0
       filled TRUE
      }
     }
     geometry DEF TXT Text {
      string ["test"]
      fontStyle FontStyle {
       justify ["MIDDLE" "MIDDLE"]
       size 24
      }
     }
    }
   ]
  }
  DEF SC Script {
   eventIn SFTime set_text
   field SFNode t USE TXT
   field SFNode g USE OG
   url ["javascript: function set_text(value, ts) {t.string[0] = 'order: ' + g.order;}"   ]
  }
  DEF TS TimeSensor {
   loop TRUE
  }
 ]
}

ROUTE TS.cycleTime TO SC.set_text

AT 2000 {
 XDELETE TR
}