public void CreateObjects(GLItemsList items, GLRenderProgramSortedList rObjects, GalacticMapping galmap, GLStorageBlock findbufferresults, bool depthtest)
{
this.galmap = galmap;
// first gets the images and make a 2d array texture for them
Bitmap[] images = galmap.RenderableMapTypes.Select(x => x.Image as Bitmap).ToArray();
// 256 is defined normal size
var objtex = new GLTexture2DArray(images, bmpmipmaplevels: 1, wantedmipmaplevels: 3, texturesize: new Size(256, 256), internalformat: OpenTK.Graphics.OpenGL4.SizedInternalFormat.Rgba8, alignment: ContentAlignment.BottomCenter);
IGLTexture texarray = items.Add(objtex, "GalObjTex");
// now build the shaders
const int texbindingpoint = 1;
var vert = new GLPLVertexScaleLookat(rotatetoviewer: dorotate, rotateelevation: doelevation, // a look at vertex shader
autoscale: 500, autoscalemin: 1f, autoscalemax: 20f); // below 500, 1f, above 500, scale up to 20x
var tcs = new GLPLTesselationControl(40f);
tes = new GLPLTesselationEvaluateSinewave(1f, 2f); // this uses the world position from the vertex scaler to position the image, w controls image + animation (b16)
var frag = new GLPLFragmentShaderTexture2DDiscard(texbindingpoint); // binding - takes image pos from tes. imagepos < 0 means discard
objectshader = new GLShaderPipeline(vert, tcs, tes, null, frag);
items.Add(objectshader);
objectshader.StartAction += (s, m) =>
{
texarray.Bind(texbindingpoint); // bind tex array to, matching above
};
// now the RenderControl for the objects
GLRenderState rt = GLRenderState.Patches(4);
rt.DepthTest = depthtest;
// create a quad and all entries of the renderable map objects, zero at this point, with a zero instance count. UpdateEnables will fill it in later
// but we need to give it the maximum buffer length at this point
const float objsize = 10.0f; // size of object on screen
ridisplay = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Patches, rt,
GLShapeObjectFactory.CreateQuadTriStrip(objsize, objsize), // quad2 4 vertexts
new Vector4[galmap.RenderableMapObjects.Length], // world positions
ic: 0, seconddivisor: 1);
modelworldbuffer = items.LastBuffer();
int modelpos = modelworldbuffer.Positions[0];
worldpos = modelworldbuffer.Positions[1];
rObjects.Add(objectshader, "galmapobj", ridisplay);
// add a find shader to look them up
var geofind = new GLPLGeoShaderFindTriangles(findbufferresults, 16);
findshader = items.NewShaderPipeline(null, vert, tcs, tes, geofind, null, null, null);
// hook to modelworldbuffer, at modelpos and worldpos. UpdateEnables will fill in instance count
rifind = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Patches, GLRenderState.Patches(4), modelworldbuffer, modelpos, ridisplay.DrawCount,
modelworldbuffer, worldpos, null, ic: 0, seconddivisor: 1);
GLStatics.Check();
// Text renderer for the labels
textrenderer = new GLBitmaps("bm-galmapobjects", rObjects, new Size(128, 40), depthtest: depthtest, cullface: false, textureformat: OpenTK.Graphics.OpenGL4.SizedInternalFormat.Rgba8);
items.Add(textrenderer);
// now make the text up for all the objects above
using (Font fnt = new Font("Arial", 8.5F))
{
using (StringFormat fmt = new StringFormat())
{
fmt.Alignment = StringAlignment.Center;
var renderablegalmapobjects = galmap.RenderableMapObjects; // list of enabled entries
List <Vector3> posset = new List <Vector3>();
float offscale = objsize * (0.5f + (float)textrenderer.BitmapSize.Height / (float)textrenderer.BitmapSize.Width / 2); // this is the nominal centre of the text bitmap, offset in Y to the object
for (int i = 0; i < renderablegalmapobjects.Length; i++)
{
var o = renderablegalmapobjects[i];
float offset = -offscale;
for (int j = 0; j < i; j++) // look up previous ones and see if we labeled it before
{
var d1 = new Vector3(o.points[0].X, o.points[0].Y + offset, o.points[0].Z);
var d2 = posset[j]; // where it was placed.
var diff = d1 - d2;
if (diff.Length < offscale) // close
{
if (offset > 0) // if offset is positive, flip below and increase again
{
offset = -offset - offscale;
}
else
{
offset *= -1; // flip over top
}
// System.Diagnostics.Debug.WriteLine($"close {renderablegalmapobjects[i].name} {d1} to {renderablegalmapobjects[j].name} {d2} {diff} select {offset}");
}
}
Vector3 pos = new Vector3(o.points[0].X, o.points[0].Y + offset, o.points[0].Z);
posset.Add(pos);
//System.Diagnostics.Debug.WriteLine($"{renderablegalmapobjects[i].name} at {pos} {offset}");
textrenderer.Add(o.id, o.name, fnt,
Color.White, Color.FromArgb(0, 255, 0, 255),
pos,
new Vector3(objsize, 0, 0), new Vector3(0, 0, 0), textformat: fmt, rotatetoviewer: dorotate, rotateelevation: doelevation,
alphafadescalar: -100, alphafadepos: 500); // fade in, alpha = 0 at >500, 1 at 400
}
}
}
UpdateEnables(); // fill in worldpos's and update instance count, taking into
}
private void IntCreatePath(GLItemsList items, GLRenderProgramSortedList rObjects, GLStorageBlock bufferfindresults)
{
HistoryEntry lastone = lastpos != -1 && lastpos < currentfilteredlist.Count ? currentfilteredlist[lastpos] : null; // see if lastpos is there, and store it
if (TravelPathEndDateEnable || TravelPathStartDateEnable)
{
currentfilteredlist = unfilteredlist.Where(x => (!TravelPathStartDateEnable || x.EventTimeUTC >= TravelPathStartDate) && (!TravelPathEndDateEnable || x.EventTimeUTC <= TravelPathEndDate)).ToList();
if (currentfilteredlist.Count > MaxStars)
{
currentfilteredlist = currentfilteredlist.Skip(currentfilteredlist.Count - MaxStars).ToList();
}
}
else
{
if (unfilteredlist.Count > MaxStars)
{
currentfilteredlist = unfilteredlist.Skip(currentfilteredlist.Count - MaxStars).ToList();
}
else
{
currentfilteredlist = unfilteredlist;
}
}
// do date filter on currentfilteredlist
lastpos = lastone == null ? -1 : currentfilteredlist.IndexOf(lastone); // may be -1, may have been removed
var positionsv4 = currentfilteredlist.Select(x => new Vector4((float)x.System.X, (float)x.System.Y, (float)x.System.Z, 0)).ToArray();
var colours = currentfilteredlist.Select(x => x.JumpColor).ToArray();
float seglen = tapesize * 10;
// a tape is a set of points (item1) and indexes to select them (item2), so we need an element index in the renderer to use.
var tape = GLTapeObjectFactory.CreateTape(positionsv4, colours, tapesize, seglen, 0F.Radians(), margin: sunsize * 1.2f);
if (ritape == null) // first time..
{
// first the tape
var tapetex = new GLTexture2D(Properties.Resources.chevron, internalformat: OpenTK.Graphics.OpenGL4.SizedInternalFormat.Rgba8); // tape image
items.Add(tapetex);
tapetex.SetSamplerMode(OpenTK.Graphics.OpenGL4.TextureWrapMode.Repeat, OpenTK.Graphics.OpenGL4.TextureWrapMode.Repeat);
tapefrag = new GLPLFragmentShaderTextureTriStripColorReplace(1, Color.FromArgb(255, 206, 0, 0));
var vert = new GLPLVertexShaderWorldTextureTriStrip();
tapeshader = new GLShaderPipeline(vert, tapefrag);
items.Add(tapeshader);
GLRenderState rts = GLRenderState.Tri(tape.Item3, cullface: false); // set up a Tri strip, primitive restart value set from tape, no culling
rts.DepthTest = depthtest; // no depth test so always appears
// now the renderer, set up with the render control, tape as the points, and bind a RenderDataTexture so the texture gets binded each time
ritape = GLRenderableItem.CreateVector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.TriangleStrip, rts, tape.Item1.ToArray(), new GLRenderDataTexture(tapetex));
tapepointbuf = items.LastBuffer(); // keep buffer for refill
ritape.Visible = tape.Item1.Count > 0; // no items, set not visible, so it won't except over the BIND with nothing in the element buffer
ritape.CreateElementIndex(items.NewBuffer(), tape.Item2.ToArray(), tape.Item3); // finally, we are using index to select vertexes, so create an index
rObjects.Add(tapeshader, "travelpath-tape", ritape); // add render to object list
// now the stars
starposbuf = items.NewBuffer(); // where we hold the vertexes for the suns, used by renderer and by finder
starposbuf.AllocateFill(positionsv4);
//Vector4[] vectors = starposbuf.ReadVector4s(0, starposbuf.Length / 16);
sunvertex = new GLPLVertexShaderModelCoordWorldAutoscale(new Color[] { Color.Yellow, Color.FromArgb(255, 230, 230, 1) },
autoscale: 30, autoscalemin: 1f, autoscalemax: 2f, useeyedistance: false); // below scale, 1f, above scale, scale up to x times (eyedist/scale)
sunshader = new GLShaderPipeline(sunvertex, new GLPLStarSurfaceFragmentShader());
items.Add(sunshader);
var shape = GLSphereObjectFactory.CreateSphereFromTriangles(2, sunsize);
GLRenderState rt = GLRenderState.Tri(); // render is triangles, with no depth test so we always appear
rt.DepthTest = depthtest;
rt.DepthClamp = true;
renderersun = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Triangles, rt, shape, starposbuf, 0, null, currentfilteredlist.Count, 1);
rObjects.Add(sunshader, "travelpath-suns", renderersun);
// find compute
var geofind = new GLPLGeoShaderFindTriangles(bufferfindresults, 16);
findshader = items.NewShaderPipeline(null, sunvertex, null, null, geofind, null, null, null);
rifind = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Triangles, GLRenderState.Tri(), shape, starposbuf, ic: currentfilteredlist.Count, seconddivisor: 1);
// Sun names, handled by textrenderer
textrenderer = new GLBitmaps("bm-travelmap", rObjects, new Size(128, 40), depthtest: depthtest, cullface: false);
items.Add(textrenderer);
}
else
{
tapepointbuf.AllocateFill(tape.Item1.ToArray()); // replace the points with a new one
ritape.RenderState.PrimitiveRestart = GL4Statics.DrawElementsRestartValue(tape.Item3); // IMPORTANT missing bit Robert, must set the primitive restart value to the new tape size
ritape.CreateElementIndex(ritape.ElementBuffer, tape.Item2.ToArray(), tape.Item3); // update the element buffer
ritape.Visible = tape.Item1.Count > 0;
starposbuf.AllocateFill(positionsv4); // and update the star position buffers so find and sun renderer works
renderersun.InstanceCount = positionsv4.Length; // update the number of suns to draw.
rifind.InstanceCount = positionsv4.Length; // update the find list
}
// name bitmaps
HashSet <object> hashset = new HashSet <object>(currentfilteredlist); // so it can find it quickly
textrenderer.CurrentGeneration++; // setup for next generation
textrenderer.RemoveGeneration(textrenderer.CurrentGeneration - 1, hashset); // and remove all of the previous one which are not in hashset.
Font fnt = new Font("Arial", 8.5F);
using (StringFormat fmt = new StringFormat())
{
fmt.Alignment = StringAlignment.Center;
foreach (var isys in currentfilteredlist)
{
if (textrenderer.Exist(isys) == false) // if does not exist already, need a new label
{
textrenderer.Add(isys, isys.System.Name, fnt, Color.White, Color.Transparent, new Vector3((float)isys.System.X, (float)isys.System.Y - 5, (float)isys.System.Z),
new Vector3(20, 0, 0), new Vector3(0, 0, 0), textformat: fmt, rotatetoviewer: true, rotateelevation: false, alphafadescalar: -200, alphafadepos: 300);
}
}
}
fnt.Dispose();
}
public void Start(string name, int maxstars, float sunsize, float tapesize, GLStorageBlock bufferfindresults, bool depthtest, GLItemsList items, GLRenderProgramSortedList rObjects)
{
this.MaxStars = maxstars;
this.tapesize = tapesize;
this.sunsize = sunsize;
// first the tape
var tapetex = new GLTexture2D(BaseUtils.Icons.IconSet.GetBitmap("GalMap.chevron"), internalformat: OpenTK.Graphics.OpenGL4.SizedInternalFormat.Rgba8); // tape image
items.Add(tapetex);
tapetex.SetSamplerMode(OpenTK.Graphics.OpenGL4.TextureWrapMode.Repeat, OpenTK.Graphics.OpenGL4.TextureWrapMode.Repeat);
// configure the fragger, set the replacement color, and set the distance where the replacement color is used for all pixels
tapefrag = new GLPLFragmentShaderTextureTriStripColorReplace(1, Color.FromArgb(255, 206, 0, 0), 1000);
// create the vertex shader with the autoscale required
var vert = new GLPLVertexShaderWorldTextureTriStripNorm(100, 1, 10000);
vert.SetWidth(tapesize); // set the nominal tape width
tapeshader = new GLShaderPipeline(vert, tapefrag);
items.Add(tapeshader);
GLRenderState rts = GLRenderState.Tri(OpenTK.Graphics.OpenGL4.DrawElementsType.UnsignedByte, cullface: false); // set up a Tri strip, Default primitive restart
rts.DepthTest = depthtest; // no depth test so always appears
// now the renderer, set up with the render control, tape as the points, and bind a RenderDataTexture so the texture gets binded each time
var zerotape = new Vector4[] { Vector4.Zero }; // just use an dummy array to get this going
ritape = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.TriangleStrip, rts, zerotape, zerotape, new GLRenderDataTexture(tapetex));
tapepointbuf = items.LastBuffer(); // keep buffer for refill
ritape.ElementBuffer = items.NewBuffer(); // empty buffer for element index for now
ritape.Visible = false; // until its filled, not visible (important, we don't want render to execute unless its been fully set up below)
rObjects.Add(tapeshader, name + "-tape", ritape); // add render to object list
// now the stars
starposbuf = items.NewBuffer(); // where we hold the vertexes for the suns, used by renderer and by finder
// the colour index of the stars is selected by the w parameter of the world position vertexes.
// we autoscale to make them bigger at greater distances from eye
sunvertex = new GLPLVertexShaderModelCoordWorldAutoscale(new Color[] { Color.Yellow, Color.FromArgb(255, 230, 230, 1) },
autoscale: 30, autoscalemin: 1, autoscalemax: 2, useeyedistance: false);
sunshader = new GLShaderPipeline(sunvertex, new GLPLStarSurfaceFragmentShader());
items.Add(sunshader);
var shape = GLSphereObjectFactory.CreateSphereFromTriangles(2, sunsize);
GLRenderState rt = GLRenderState.Tri(); // render is triangles, with no depth test so we always appear
rt.DepthTest = depthtest;
rt.DepthClamp = true;
renderersun = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Triangles, rt, shape, starposbuf, 0, null, 0, 1);
renderersun.Visible = false; // until its filled, not visible
rObjects.Add(sunshader, name + "-suns", renderersun);
// find compute
var geofind = new GLPLGeoShaderFindTriangles(bufferfindresults, 16);
findshader = items.NewShaderPipeline(null, sunvertex, null, null, geofind, null, null, null);
rifind = GLRenderableItem.CreateVector4Vector4(items, OpenTK.Graphics.OpenGL4.PrimitiveType.Triangles, GLRenderState.Tri(), shape, starposbuf, ic: 0, seconddivisor: 1);
// Sun names, handled by textrenderer
textrenderer = new GLBitmaps(name + "-text", rObjects, BitMapSize, depthtest: depthtest, cullface: false);
items.Add(textrenderer);
}