3925 ScriptSetInteger('AMMO_INFINITE', AMMO_INFINITE);

  3925 ScriptSetInteger('AMMO_INFINITE', AMMO_INFINITE);

  3926 ScriptSetInteger('JETPACK_FUEL_INFINITE', JETPACK_FUEL_INFINITE);

  3926 ScriptSetInteger('JETPACK_FUEL_INFINITE', JETPACK_FUEL_INFINITE);

  3927 ScriptSetInteger('BIRDY_ENERGY_INFINITE', BIRDY_ENERGY_INFINITE);

  3927 ScriptSetInteger('BIRDY_ENERGY_INFINITE', BIRDY_ENERGY_INFINITE);

  3928 ScriptSetInteger('NoPointX', NoPointX);

  3928 ScriptSetInteger('NoPointX', NoPointX);

  3929 ScriptSetInteger('cMaxHogHealth', cMaxHogHealth);

  3929 ScriptSetInteger('cMaxHogHealth', cMaxHogHealth);

  3930 

  3931 

  3931 // register gear types

  3932 // register gear types

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

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

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

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

  3934 

  3935