Stopwatch in percentage

[Barba-negra 117]

good to all, I'm here again asking for help `please, I'm creating a scripts in which I use a timer of oxygen and carbon dioxide to navigate in water depths, and so far achieved that appears on screen the names and the percentage, but I have an error because the percentage remains static and does not change when immersed, what am I doing wrong, help please

 

//Estado

 

_Submarino = "B_SDV_01_F" createvehicle [15300.707, 15765.22, 11.268];

 

publicvariable"_Submarino";  

                                                            

oxygen = 100;
carbon_monoxide = 0;           

 

 

(oxygen <1), UNOsetdamage1;                                                                                                                                              

 

(oxygen > 100), oxygen = 100;
(carbon_monoxide > 100), carbon_monoxide 100;                        (oxygen < 0), oxygen = 0;                                              (carbon_monoxide < 0), carbon_monoxide = 0;                                                                                              

 

_Submarino setVectorUp [0,0,1], oxygen < 100, oxygen = oxygen +2; carbon_monoxide = carbon_monoxide-2;                                  _Submarino setVectorUp [0,0,-2], oxygen = oxygen -0.001, carbon_monoxide = carbon_monoxide +0.001;                                                                                                     _Submarino setVectorUp [0,0,-7], oxygen = oxygen -0.002, carbon_monoxide = carbon_monoxide +0.002;                                                                                              _Submarino setVectorUp [0,0,-15], oxygen = oxygen -0.003; carbon_monoxide = carbon_monoxide +0.003;                                                                                                     _Submarino setVectorUp [0,0,-30], oxygen = oxygen -0.02; carbon_monoxide = carbon_monoxide +0.01;                                                                                                     

 

hintSilent format["oxigeno y dioxido de Carbono,  \n\noxygen-status\n%1%2   \n\nmonoxide-status\n%3%4",oxygen,"%",carbon_monoxide,"%"];
goto "status";