class Zong{
  XMLElement xmlsong;
  ZongSettings settings;
  XMLElement patterns;
  XMLElement tonepatterns;
  XMLElement compose;
  
  String name;
  String file;
  boolean songloaded = false;
  boolean rocking = false;
  
  Sequencer sequencer = new Sequencer();

  MidiOut drumsout = midiIO.getMidiOut(9,0);
  MidiOut bassout = midiIO.getMidiOut(4,0);
  MidiOut guitarout = midiIO.getMidiOut(5,0);
  
  Track drumstrack, basstrack, guitartrack;
  
  Song song;
  
  int bars = 0;
  int bar =0, frame=0, oldbar=-1, oldframe=-1;
  
  float a, b, prevol;

  int notes2search;
  int note, pitx, vol, dur;
  
  String[][] lyrics = new String[1024][16];
  
  int remindex;
  
  Zong(String $1, int $2){
    file = $1;
    loadSong();
    remindex = $2;
  }
  void loadSong(){
    try{
      xmlsong = xmlInOut.loadElementFrom(file); 
      parseSong();
      songloaded = true;
      println("song "+name+" loaded!");
    }catch(InvalidDocumentException ide){
      println("File "+file+" does not exist");
      songloaded = false;
    }
  }
  
  void rock(){
    sequencer.start();
    rocking = true;
    vizualadmin.option = remindex;
    println("song "+name+" rocking!");
  }
  
  void stop(){
    sequencer.stop();
    rocking = false;
    vizualadmin.option = -1;
    println("song "+name+" stopped");
  }
  
  void parseSong(){
    name = xmlsong.getAttribute("name");
    settings = new ZongSettings(xmlsong.getChild(0));
    patterns = xmlsong.getChild(1);
    tonepatterns = xmlsong.getChild(2);
    compose = xmlsong.getChild(3);

    drumstrack = new Track("drums", drumsout);
    basstrack = new Track("bass", bassout);
    guitartrack = new Track("guitar", guitarout);

    drumstrack.setQuantization(Q._1_16);
    basstrack.setQuantization(Q._1_16);
    guitartrack.setQuantization(Q._1_16);
            
    bassout.sendProgramChange(new ProgramChange(settings.bassinstrument)); 
    guitarout.sendProgramChange(new ProgramChange(settings.guitarinstrument)); 
    
    int quantization = 16;
    int position = 0;
    
    for(int i=0; i<compose.countChildren();i++){//recorre las partes
      for(int j =0; j<compose.getChild(i).countChildren();j++){//y luego los patterns
        for(int k =0; k<compose.getChild(i).getChild(j).countChildren();k++){//y luego los patterns dentro
          switch(compose.getChild(i).getChild(j).getChild(k).getIntAttribute("kind")){
            case 0:
              a = float(settings.mainlevel)/127;
              b = float(settings.drumlevel)/127;
              prevol = a*b;
              
              int drum2search = int(compose.getChild(i).getChild(j).getChild(k).getChild(0).toString());
              
              for(int pad=0; pad<patterns.getChild(0).getChild(drum2search).countChildren(); pad++){
                int padinstrument = patterns.getChild(0).getChild(drum2search).getChild(pad).getIntAttribute("id");
                String pttrn = patterns.getChild(0).getChild(drum2search).getChild(pad).getChild(0).toString();
                for(int m=0; m<pttrn.length(); m++){
                  String hxtep = pttrn.substring(m,m+1);
                  try{
                    int vol = int(prevol*127*unhex(hxtep)/15);
                    drumstrack.addEvent(new Note(padinstrument, vol, 80), position+m); 
                  }catch(Exception e){//NullPointerException
                    //println("crashed by "+e);
                  };
                };
              };
              break;
            case 1:
              a = float(settings.mainlevel)/127;
              b = float(settings.basslevel)/127;
              prevol = a*b;
              
              notes2search  = int(compose.getChild(i).getChild(j).getChild(k).getChild(0).getChild(0).toString());
              int[] bassnotes = int(split(tonepatterns.getChild(notes2search).getChild(0).toString(), ","));
              int bass2search = int(compose.getChild(i).getChild(j).getChild(k).getChild(1).getChild(0).toString());
              
              for(int pad=0; pad<patterns.getChild(1).getChild(bass2search).countChildren(); pad++){
                String pttrn = patterns.getChild(1).getChild(bass2search).getChild(pad).getChild(0).toString();
                for(int m=0; m<pttrn.length(); m++){
                  String hxtep = pttrn.substring(m,m+1);
                  try{
                    note = 24+bassnotes[m];
                    pitx = note+unhex(hxtep);
                    vol = int(prevol*127);
                    dur = 40;
                    basstrack.addEvent(new Note(pitx, vol, dur), position+m);
                  }catch(Exception e){//NullPointerException
                    //println("crashed by "+e);
                  };
                };
              };
              break;
              
            case 2:
              a = float(settings.mainlevel)/127;
              b = float(settings.guitarlevel)/127;
              prevol = a*b;
              
              notes2search  = int(compose.getChild(i).getChild(j).getChild(k).getChild(0).getChild(0).toString());
              int[] guitarnotes = int(split(tonepatterns.getChild(notes2search).getChild(0).toString(), ","));
              int guitar2search = int(compose.getChild(i).getChild(j).getChild(k).getChild(1).getChild(0).toString());
              
              for(int pad=0; pad<patterns.getChild(2).getChild(guitar2search).countChildren(); pad++){
                String pttrn = patterns.getChild(2).getChild(guitar2search).getChild(pad).getChild(0).toString();
                for(int m=0; m<pttrn.length(); m++){
                  String hxtep = pttrn.substring(m,m+1);
                  try{
                    note = 48+guitarnotes[m];
                    pitx = note+unhex(hxtep);
                    vol = int(prevol*127);
                    dur = 20;
                    guitartrack.addEvent(new Note(pitx, vol, dur), position+m);
                  }catch(Exception e){//NullPointerException
                    //println("crashed by "+e);
                  };
                };
              };
              break;
              
            case 3:
              int frame = int(compose.getChild(i).getChild(j).getChild(k).getAttribute("frame").toString());
              String speech = compose.getChild(i).getChild(j).getChild(k).getChild(0).toString();
              lyrics[bars][frame] = speech;
              break;
          };

        };
        bars++;
        position+=quantization;
      }
    }
    
    song = new Song(name, settings.tempo);
    song.addTrack(drumstrack);
    song.addTrack(basstrack);
    song.addTrack(guitartrack);

    sequencer.setSong(song);
    sequencer.setLoopStartPoint(0);
    sequencer.setLoopEndPoint(512*bars);
    sequencer.setLoopCount(-1);
  }
  void checksong(){
    if(rocking){
      bar = int(sequencer.getTickPosition()/512);
      frame = int((sequencer.getTickPosition()%512)/32);
      
      if(oldbar!=bar || oldframe!=frame){
        if(lyrics[bar][frame]!=null)vizualadmin.sing(lyrics[bar][frame]);
      };
      if(!settings.loopeable && bar<oldbar){
        stop();
      }    
      
      oldbar=bar;
      oldframe=frame;
    }
  }
}