- Fins a la linea 3111

pepe2000_utf8.cpp

@@ -2766,11 +2766,6 @@ void load_setup_i_versio()
 
 /*──────────────────────────────────────────────────────────────────────────*/
 void story_mode()
-/*var
- eixir : boolean;
- s_vella : byte;
- musica_fase:string;
-*/
 {
    historia();
    num_fase = 1;
@@ -2786,7 +2781,7 @@ void story_mode()
       ini_pantalla();
       volcar32(vaddr2, vaddr);
       pinta_marcadors();
-      eixir = false;
+      bool eixir = false;
       if (midi) then
       {
          StopMIDI();
@@ -3012,99 +3007,108 @@ void story_mode()
 }
 
 /*──────────────────────────────────────────────────────────────────────────*/
-procedure time_attack;
+void time_attack()
-var
+{
- eixir : boolean;
-begin
 
- num_fase:=0;
+   num_fase = 0;
- ini_vars(num_fase);
+   ini_vars(num_fase);
- ini_pantalla;
+   ini_pantalla();
- volcar32(vaddr2,vaddr);
+   volcar32(vaddr2, vaddr);
- pinta_marcadors;
+   pinta_marcadors();
- dificultat:=normal;
+   dificultat = normal;
- rosita_selected:=false;
+   rosita_selected = false;
- amic_selected:=false;
+   amic_selected = false;
- color_pintura:=162;
+   color_pintura = 162;
- color_marcador_pintura:=162;
+   color_marcador_pintura = 162;
- espera_VGA;
+   espera_VGA();
- volcar32(vaddr,VGA);
+   volcar32(vaddr, VGA);
- pinta_marcadors;
+   pinta_marcadors();
- volcat_de_pantalla;
+   volcat_de_pantalla();
- eixir:=false;
+   bool eixir = false;
 
- if midi then begin StopMIDI; unloadmidi; midi:=false;  end;
+   if (midi) { StopMIDI(); unloadmidi(); midi=false; }
- ini_midi(musica_time_attack);
+   ini_midi(musica_time_attack);
- if midi then Playmidi;
+   if (midi) Playmidi();
 
- contador:=0;
+   contador = 0;
- repeat until TeclaPuls(tecla_esquerra);
+   do {} while (!TeclaPuls(tecla_esquerra));
- pilla_temps;
+   pilla_temps();
- /*------------------------------*/
- repeat
 
- if (not(playing)) and (midi) then PlayMIDI;
+   //------------------------------------------------------------------------------------------
+   do
+   {
+      if (!playing && midi) PlayMIDI();
 
- inc(contador);
+      contador++;
- if retard_pepe>0 then dec(retard_pepe);
+      if (retard_pepe > 0) retard_pepe--;
 
- menejant:=false;
+      menejant = false;
 
- if retard_pepe=0 then begin
+      if ( retard_pepe == 0 )
- if teclapuls(tecla_amunt) then moure(amunt)
+      {
- else if teclapuls(tecla_avall) then moure(avall)
+         if ( teclapuls(tecla_amunt) )
-      else if teclapuls(tecla_dreta) then moure(dreta)
+            moure(amunt);
-           else if teclapuls(tecla_esquerra) then moure(esquerra);
+         else
-  end;
+            if ( teclapuls(tecla_avall) )
+               moure(avall);
+            else
+               if ( teclapuls(tecla_dreta) )
+                  moure(dreta);
+               else
+                  if ( teclapuls(tecla_esquerra) )
+                     moure(esquerra);
+      }
 
- if teclapuls(Key1) then
+      if ( teclapuls(SDL_SCANCODE_1) )
-    begin
+      {
-     amb_so:=/*not(amb_so);*/false;
+         amb_so = false; //not(amb_so);
-     repeat until not(TeclaPuls(Key1));
+         do {} while(TeclaPuls(SDL_SCANCODE_1));
-    end;
+      }
 
- if teclapuls(KeyESC) then
+      if ( teclapuls(SDL_SCANCODE_ESCAPE) )
-    begin
+      {
-     eixir:=true;
+         eixir = true;
-    end;
+      }
 
- /*if TeclaPuls(KeyN) then final_fase:=true;*/
+      /*if TeclaPuls(KeyN) then final_fase:=true;*/
 
- fer_apareixer_els_malos;
+      fer_apareixer_els_malos();
 
- posa_el_temps(vaddr);
+      posa_el_temps(vaddr);
 
- if (contador mod velocitat_pepe) = 0 then moure_malos;
+      if ( (contador % velocitat_pepe) == 0 ) moure_malos();
 
- if not(no_queden_vides) then volcat_de_pantalla;
+      if ( !no_queden_vides ) volcat_de_pantalla();
 
- /*------------------------------*/
+   } while ( !(eixir || final_fase || no_queden_vides) );
- until (eixir) or (final_fase) or (no_queden_vides);
+   //------------------------------------------------------------------------------------------
 
- if midi then begin StopMIDI; unloadmidi; midi:=false;  end;
+   if (midi) { StopMIDI(); unloadmidi(); midi=false; }
- if final_fase then
+   if (final_fase
-    begin
+   {
-     pinta(pepe,color_pintura,x,y,VGA);
+      pinta(pepe, color_pintura, x, y, VGA);
-     x:=pos_ini_x_pepe;
+      x = pos_ini_x_pepe;
-     y:=pos_ini_y_pepe;
+      y = pos_ini_y_pepe;
-     animacio_alegria;
+      animacio_alegria();
 
-     if midi then begin StopMIDI; unloadmidi; midi:=false;  end;
+      if (midi) { StopMIDI(); unloadmidi(); midi=false; }
 
-     resultat_time_attack;
+      resultat_time_attack();
-    end
+   }
-    else if (eixir) then
+   else
-         begin
+      if (eixir)
-          fadedown(0,0,0,0);
+      {
-          if midi then begin StopMIDI; unloadmidi; midi:=false;  end;
+         fadedown(0,0,0,0);
-         end;
+         if (midi) { StopMIDI(); unloadmidi(); midi=false; }
+      }
+
+   if (no_queden_vides)
+   {
+      missatge_game_over();
+      if (midi) { StopMIDI(); unloadmidi(); midi=false; }
+   }
+}
 
- if no_queden_vides then
-    begin
-     missatge_game_over;
-     if midi then begin StopMIDI; unloadmidi; midi:=false;  end;
-    end;
-end;
 /*──────────────────────────────────────────────────────────────────────────*/
 procedure menu_joc;
 var