//Here's all the relevant code + additional explanation.





////////////////////////////////


/////////  battle.vc


////////////////////////////////





//character[x]=struct array of all the stats of all your characters


//party[x]=array that keeps track of what characters are in your party








void BattleCommands(){ //The idle phase of battle where you enter commands


  Menu=0;SubMenu=0;Choice=0;


  //Menu= which character's menu is being shown


  //SubMenu= which submenu (magic, etc) you're in - 0 is the main menu


  //Choice= currently selected choice on the menu


  int CommandsDone;CommandsDone=0; //self-explanatory


  while (!CommandsDone){


    timer=0;


    Pulsate++; // the lucency of the little blinking active selection outline


    if(Pulsate>100){Pulsate=0;}


    Render(); // map is black, just clear the screen


    Blit(0,0,BGFull,screen); // draw the battle backdrop


    DrawCharacters(); // draw and animate your characters


    DrawEnemies(); // draw the enemies


    DrawStats(); // draw your HP/MP/Gauges on side of screen


    DrawLineup(); // draw the turn order indicator on the other side


    UpdateControls();


    DrawMenu(); // draw the menu base


    Unpress(5);Unpress(6);Unpress(7);Unpress(8);


    // unpress all directions (not working?)


    ShowPage(); // show all the stuff


    while(timer<1){}


    //ensures that no more than one cycle is run each tick


    //(for those of us with far too fast computers)


  }


}





void DrawMenu(){ // draws the graphical base of the menu


  SetLucent(50);ScaleBlit(0,180,320,60,Gradient,screen);SetLucent(0);


  x=0;


  for(a=0;a<5;a++){ // Draw the menu selection character icons


    if(Party[a] != 0){


      TBlit(x,164,Character[Party[a]].Icon,screen);


      if(a=Menu){ // highlight the active menu


        SetLucent(Pulsate);


        TBlit(x,164,Outline,screen);


        SetLucent(0);


      }


      x+=32;


    }


  }


  Pic=LoadImage('graphics\action_icon.png');


  TBlit(x,164,Pic,screen);


  FreeImage(Pic);


  TBlit(0,180,Character[Party[Menu]].Face,screen);


  PrintString(70,180,screen,Font1,Character[Party[Menu]].Name);


  //show name of the active character


  Rect(68,190,212,234,RGB(128,128,128),screen);


  CallMenu(); // Bring up the menu selections


}





/////////////////////////////////////////


//////////    battledata.vc


/////////////////////////////////////////


void CallMenu(){ // All the actual command processing is done in here.


  switch(Character[Party[Menu]].ID){


    case 1: switch(SubMenu){ // Brooke's menu


        case 0:  PrintString(70,192,screen,Font1,'Attack');


          PrintString(70,202,screen,Font1,'Tech');


          PrintString(70,212,screen,Font1,'Magic');


          PrintString(70,222,screen,Font1,'Item');


          PrintString(140,192,screen,Font1,'Ascension');


          //PrintString(140,202,screen,Font1,' ');


          //PrintString(140,212,screen,Font1,' ');


          //PrintString(140,222,screen,Font1,' ');


          switch(Choice){ 


          //draws the selection arrow


          //and moves it if a direction is pressed


            case 0:  TBlit(62,190,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=1;}


              if(key[SCAN_UP]){Choice=3;}


              if(key[SCAN_RIGHT]){Choice=4;}


              //if(key[SCAN_LEFT]){Choice=_;}


              //menu doesn't loop left/right, only up/down


              BattleHelp(1);


            case 1:  TBlit(62,200,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=2;}


              if(key[SCAN_UP]){Choice=0;}


              if(key[SCAN_RIGHT]){Choice=5;}


              //if(key[SCAN_LEFT]){Choice=_;}


              BattleHelp(2);


            case 2:  TBlit(62,210,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=3;}


              if(key[SCAN_UP]){Choice=1;}


              if(key[SCAN_RIGHT]){Choice=6;}


              //if(key[SCAN_LEFT]){Choice=_;}


              BattleHelp(3);


            case 3:  TBlit(62,220,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=0;}


              if(key[SCAN_UP]){Choice=2;}


              if(key[SCAN_RIGHT]){Choice=7;}


              //if(key[SCAN_LEFT]){Choice=_;}


              BattleHelp(4);


            case 4:  TBlit(132,190,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=5;}


              if(key[SCAN_UP]){Choice=7;}


              //if(key[SCAN_RIGHT]){Choice=_;}


              if(key[SCAN_LEFT]){Choice=0;}


              BattleHelp(5);


            case 5:  TBlit(132,200,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=6;}


              if(key[SCAN_UP]){Choice=4;}


              //if(key[SCAN_RIGHT]){Choice=_;}


              if(key[SCAN_LEFT]){Choice=1;}


            case 6:  TBlit(132,210,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=7;}


              if(key[SCAN_UP]){Choice=5;}


              //if(key[SCAN_RIGHT]){Choice=_;}


              if(key[SCAN_LEFT]){Choice=2;}


            case 7:  TBlit(132,220,Arrow,screen);


              if(key[SCAN_DOWN]){Choice=4;}


              if(key[SCAN_UP]){Choice=6;}


              //if(key[SCAN_RIGHT]){Choice=_;}


              if(key[SCAN_LEFT]){Choice=3;}


          }


      }


    case 2: switch(SubMenu){ // Stuffman's menu


        case 0:  PrintString(70,192,screen,Font1,'Attack');


          PrintString(70,202,screen,Font1,'Tech');


          PrintString(70,212,screen,Font1,'');


          PrintString(70,222,screen,Font1,'Item');


          //PrintString(140,192,screen,Font1,'Grenade');


          //PrintString(140,202,screen,Font1,'');


          //PrintString(140,212,screen,Font1,'');


          //PrintString(140,222,screen,Font1,'');


      }


  }


}