hedgewars/uScript.pas
changeset 13598 083733ec7941
parent 13587 517b26009073
child 13600 0adc82afb784
equal deleted inserted replaced
13592:818134c33f54 13598:083733ec7941
  3913 
  3913 
  3914 // speech bubbles
  3914 // speech bubbles
  3915 ScriptSetInteger('SAY_SAY', 1);
  3915 ScriptSetInteger('SAY_SAY', 1);
  3916 ScriptSetInteger('SAY_THINK', 2);
  3916 ScriptSetInteger('SAY_THINK', 2);
  3917 ScriptSetInteger('SAY_SHOUT', 3);
  3917 ScriptSetInteger('SAY_SHOUT', 3);
       
  3918 
       
  3919 // other
       
  3920 ScriptSetInteger('JETPACK_FUEL_INFINITE', JETPACK_FUEL_INFINITE);
       
  3921 ScriptSetInteger('BIRDY_ENERGY_INFINITE', BIRDY_ENERGY_INFINITE);
  3918 
  3922 
  3919 // register gear types
  3923 // register gear types
  3920 for at:= Low(TGearType) to High(TGearType) do
  3924 for at:= Low(TGearType) to High(TGearType) do
  3921     ScriptSetInteger(EnumToStr(at), ord(at));
  3925     ScriptSetInteger(EnumToStr(at), ord(at));
  3922 
  3926