View Distance for Options GUI 1.8.1

Just a quick note.
--You MUST call your sky, skyObject and the slider, vDistance.
--I made this in afx but will still go into Stock 1.8.1


ok add this to your terrain/sky.cpp around line 278

ConsoleMethod( Sky, updateVisibility, void, 2, 2, "...")  
{  
   object->updateVisibility();  
}

Then add this to your optionsDlg.cs.

function OptionsDlg::visibleDistanceSlider(%this)
{
	skyObject.visibleDistance = vDistance.value;
	skyObject.updateVisibility();
};

Then in the at the end of the optionsDlg.gui add this.

new GuiSliderCtrl(vDistance) {
            canSaveDynamicFields = "0";
            Enabled = "1";
            isContainer = "0";
            HorizSizing = "right";
            VertSizing = "bottom";
            position = "272 88";
            Extent = "64 24";
            MinExtent = "8 2";
            canSave = "1";
            Visible = "1";
            Variable = "value";
            AltCommand = "optionsDlg.visibleDistanceSlider();";
            hovertime = "1000";
            range = "200 3e+003";
            ticks = "2800";
            value = "200";
         };

And that should be it. Compile and Run. Just be aware that the slider position is probably in a dumb spot as my options are customized.

If you want fog to draw as well add this to your function

skyObject.fogDistance = vDistanceValue + 50;