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 

  3918 

  3919 // other

  3919 // other

  3920 ScriptSetInteger('JETPACK_FUEL_INFINITE', JETPACK_FUEL_INFINITE);

  3921 ScriptSetInteger('JETPACK_FUEL_INFINITE', JETPACK_FUEL_INFINITE);

  3921 ScriptSetInteger('BIRDY_ENERGY_INFINITE', BIRDY_ENERGY_INFINITE);

  3922 ScriptSetInteger('BIRDY_ENERGY_INFINITE', BIRDY_ENERGY_INFINITE);

  3922 

  3924 

  3923 // register gear types

  3925 // register gear types

  3924 for at:= Low(TGearType) to High(TGearType) do

  3926 for at:= Low(TGearType) to High(TGearType) do

  3925     ScriptSetInteger(EnumToStr(at), ord(at));

  3927     ScriptSetInteger(EnumToStr(at), ord(at));

  3926 

  3928