static IHTMLCode InternalConstructor(string e)
{
IHTMLCode z = new IHTMLCode();
z.innerHTML = e;
return(z);
}
static IHTMLCode InternalConstructor(string e)
{
IHTMLCode z = new IHTMLCode();
z.innerHTML = e;
return z;
}
public override void Write(string value)
{
var p = new IHTMLCode { innerText = value }.AttachToDocument();
var s = p.style;
// jsc, enum tostring?
if (Console.ForegroundColor == ConsoleColor.Red)
s.color = "red";
if (Console.ForegroundColor == ConsoleColor.Blue)
s.color = "blue";
if (Console.ForegroundColor == ConsoleColor.Gray)
s.color = "gray";
}
//public const string Alias = "Class1";
//public const string DefaultData = "Class1Data";
/// <summary>
/// Creates a new control
/// </summary>
/// <param name="DataElement">The hidden data element</param>
public GoogleGearsSimple()
{
// this ctor creates a new div which has a text and a button element
// on mouseover over the color text is changed
// on pressing the button the next message in text element is displayed
IHTMLDiv Control = new IHTMLDiv();
Control.AttachToDocument();
Func<string, string, IHTMLElement> link = (href, text) => new IHTMLDiv(new IHTMLAnchor(href, text));
Control.appendChild(link("http://gears.google.com/", "Google Gears"));
Control.appendChild(link("http://code.google.com/apis/gears/samples/hello_world_database.html", "Google Example # 1"));
Control.appendChild(new IHTMLElement(IHTMLElement.HTMLElementEnum.h3, "This page uses Google Gears to record your entries on the local disk. If you navigate away and revisit this page, all your data will still be here. Try it!"));
// http://code.google.com/apis/gears/samples/hello_world_database.html
GoogleGearsFactory.Database db = null;
try
{
db = new GoogleGearsFactory.Database();
}
catch (Exception exc)
{
var err = new IHTMLCode(exc.Message);
err.style.color = Color.Red;
Control.appendChild(err);
}
IStyleSheet.Default.AddRule(".odd").style.backgroundColor = Color.FromGray(0xa0);
IStyleSheet.Default.AddRule(".even").style.backgroundColor = Color.FromGray(0xef);
if (db != null)
{
db.open("demo1");
db.execute(@"
create table if not exists Demo
(Phrase varchar(255), Timestamp int)
");
var textfield = new IHTMLInput(HTMLInputTypeEnum.text, "text1", "");
var btnadd = new IHTMLButton("Add new entry");
var btnrefresh = new IHTMLButton("Refresh");
var btnclear = new IHTMLButton("Clear");
Control.appendChild(textfield, btnadd, btnclear, btnrefresh,
new IHTMLCode(GoogleGearsFactory.Default.getBuildInfo())
);
var list = new IHTMLElement(IHTMLElement.HTMLElementEnum.ol);
Control.appendChild(list);
var read = default(Action);
read = delegate
{
//from i in Demo
//select new { Phrase, Timestamp }
//order by Timestamp desc
list.removeChildren();
Func<string, IHTMLElement> AddItem =
text => new IHTMLElement(IHTMLElement.HTMLElementEnum.li, text).Aggregate(v => list.appendChild(v));
// this could be rewritten as an expression once they are supported by jsc
int counter = 0;
var query = from Data in db.AsEnumerable<DemoDataEntity>(
"select * from Demo order by Timestamp desc",
typeof(DemoDataEntity)
)
// let ListItem = AddItem(Data.Timestamp + " - " + Data.Phrase)
select new __Type2 { ListItem = AddItem(Data.Timestamp + " - " + Data.Phrase), Data = Data};
foreach (var v in query)
{
counter++;
var vx = v;
if (counter % 2 == 0)
v.ListItem.className = "odd";
else
v.ListItem.className = "even";
#region -
var btndel = new IHTMLButton("-");
btndel.style.color = Color.Red;
btndel.onclick +=
delegate
{
db.execute("delete from Demo where Timestamp = ?", vx.Data.Timestamp);
read();
};
#endregion
#region +
var btnclone = new IHTMLButton("+");
btnclone.style.color = Color.Blue;
btnclone.onclick +=
delegate
{
db.Insert("Demo", vx.Data);
read();
};
#endregion
v.ListItem.insertBefore(btnclone, v.ListItem.firstChild);
v.ListItem.insertBefore(btndel, v.ListItem.firstChild);
}
#region raw
//var rs = db.execute("select * from Demo order by Timestamp desc");
//while (rs.isValidRow())
//{
// var xt = typeof(DemoDataEntity);
// var xx = (DemoDataEntity)Activator.CreateInstance(xt);
// for (int i = 0; i < rs.fieldCount(); i++)
// {
// xt.GetField(rs.fieldName(i)).SetValue(xx, rs.field(i));
// }
// AddItem(xx.Timestamp + " - " + xx.Phrase);
// rs.next();
//}
//rs.close();
#endregion
};
btnclear.onclick +=
delegate
{
db.execute("delete from Demo");
read();
};
btnadd.onclick +=
delegate
{
db.Insert("Demo",
new DemoDataEntity
{
Phrase = textfield.value,
Timestamp = IDate.Now.getTime()
}
);
//db.execute("insert into Demo (Phrase, Timestamp) values (?, ?)", textfield.value, IDate.Now.getTime());
textfield.value = "";
read();
};
btnrefresh.onclick +=
delegate
{
read();
};
read();
}
// not array
// is object
// no prototype
}
public Tycoon4(Action<Tycoon4> yield)
{
Native.Document.body.style.overflow = IStyle.OverflowEnum.hidden;
Native.Document.body.style.color = Color.White;
Native.Document.body.style.backgroundColor = Color.Black;
//var info_text =
// ((ApplicationDescriptionAttribute)typeof(Tycoon4).GetCustomAttributes(typeof(ApplicationDescriptionAttribute), false).Single()).Description;
var infoc = new IHTMLDiv();
new fullbox().AttachTo(infoc);
var info = new IHTMLCode().AttachTo(infoc);
infoc.style.SetLocation(4, 4, Native.window.Width - 8, 0);
infoc.style.height = "auto";
info.style.Float = IStyle.FloatEnum.right;
var paused = false;
var ZeroPoint = new Point<double>();
// http://en.wikipedia.org/wiki/Isometric_projection
// http://en.wikipedia.org/wiki/Dimetric_projection
// http://en.wikipedia.org/wiki/Axonometric_projection
// http://en.wikipedia.org/wiki/First_angle_projection
// http://en.wikipedia.org/wiki/3/4_perspective
var RotationA = 45.ToRadians();
var RotationB = 0.5;
var Zoom = 1;
var Dot = 4;
var MapSize = new Rectangle
{
Left = -12,
Width = 24,
Top = -12,
Height = 24
};
var MapMargins = new Point
(
4,
4
);
var bg_size = new
{
w = (64 * Zoom).ToInt32(),
h = (32 * Zoom).ToInt32()
};
Func<Point<double>> GetCenter = () => new Point<double>
{
X = bg_size.w * (MapSize.Width + MapMargins.X) / 2 /*Native.Window.Width / 2*/,
Y = bg_size.h * (MapSize.Height + MapMargins.Y) / 2 /*Native.Window.Height / 2*/
};
var arena = new ArenaControl();
arena.Control.AttachToDocument();
arena.Layers.Canvas.style.backgroundColor = Color.FromRGB(0, 0, 0);
//arena.SetCanvasViewCenter();
arena.SetCanvasSize(new Point(
((MapSize.Width + +MapMargins.X) * bg_size.w).ToInt32(),
((MapSize.Height + +MapMargins.Y) * bg_size.h).ToInt32()
));
var PauseFog = new IHTMLDiv().AttachTo(arena.Layers.Info);
PauseFog.style.backgroundColor = Color.Black;
PauseFog.style.Opacity = 1;
PauseFogTween = new TweenDataDouble(
delegate
{
}
) { Value = 1 };
PauseFogTween.ValueChanged +=
() => PauseFog.style.Opacity = PauseFogTween.Value;
#region onresize
Action onresize =
delegate
{
infoc.style.SetLocation(4, 4, Native.window.Width - 8, 0);
infoc.style.height = "auto";
var rect = Rectangle.Of(0, 0, Native.window.Width, Native.window.Height);
arena.SetLocation(rect);
PauseFog.style.SetLocation(rect);
};
Native.window.onresize +=
ev =>
{
onresize();
};
onresize();
#endregion
infoc.AttachTo(arena.Layers.Info);
#region TileResources
var TileResources = new
{
Grass = new { Source = new _0_192x95().src, Height = 32 },
//Rocks = new { Source = new _1().src, Height = 32 },
TileSelector = new { Source = new _3().src, Height = 32 },
RoughLand = new { Source = new _2x192x95().src, Height = 32 },
Dirt = new { Source = new _4_192x95().src, Height = 32 },
//DirtDirtGrass = new { Source = new _5().src, Height = 32 },
//DirtGrassGrass = new { Source = new _6().src, Height = 32 },
Track1 = new { Source = new r2_192x95().src, Height = 32 },
Road2 = new { Source = new r1_192x95().src, Height = 32 },
Road2_Track1 = new { Source = new r3_192x95().src, Height = 32 },
Road1 = new { Source = new r4_192x95().src, Height = 32 },
Road1_Road2 = new { Source = new r5_192x95().src, Height = 32 },
Tree = new { Source = new t1_192x192().src, Height = 64 },
Tree2 = new { Source = new t2_192x192().src, Height = 128 },
House1a = new { Source = new h1a_192x384().src, Height = 128 },
House1b = new { Source = new h1b_192x384().src, Height = 128 },
House1x = new { Source = new h1x_192x384().src, Height = 128 },
//House2 = new { Source = new h2().src, Height = 96 },
//House3 = new { Source = new h3().src, Height = 50 },
//House4 = new { Source = new h4().src, Height = 53 },
//House5a = new { Source = new h5a().src, Height = 33 },
//House5b = new { Source = new h5b().src, Height = 40 },
//House5c = new { Source = new h5c().src, Height = 40 },
//House5 = new { Source = new h5().src, Height = 40 },
//House11a = new { Source = new h11a().src, Height = 89 },
//House11b = new { Source = new h11b().src, Height = 89 },
//House11c = new { Source = new h11c().src, Height = 89 },
//House11x = new { Source = new h11x().src, Height = 89 }
};
var TileResourcesList = new[]
{
TileResources.Grass,
//TileResources.Rocks,
TileResources.TileSelector,
TileResources.RoughLand ,
TileResources.Dirt ,
//TileResources.DirtDirtGrass ,
//TileResources.DirtGrassGrass,
TileResources.Track1 ,
TileResources.Road2 ,
TileResources.Road2_Track1 ,
TileResources.Road1 ,
TileResources.Road1_Road2,
TileResources.Tree ,
TileResources.Tree2 ,
TileResources.House1a,
TileResources.House1b,
TileResources.House1x,
//TileResources.House2,
//TileResources.House3 ,
//TileResources.House4 ,
//TileResources.House5a ,
//TileResources.House5b ,
//TileResources.House5c ,
//TileResources.House5 ,
//TileResources.House11a ,
//TileResources.House11b ,
//TileResources.House11c ,
//TileResources.House11x ,
};
#endregion
var MyFrames_Soldier = new DudeAnimationInfo
{
Frames_Stand = Frames.WolfSoldier,
Frames_Walk = Frames.WolfSoldier_Walk
};
var MyFrames_Imp = new DudeAnimationInfo
{
Frames_Stand = Frames.DoomImp,
Frames_Walk = Frames.DoomImp_Walk
};
var MyFrames_TwinClone = new DudeAnimationInfo
{
Frames_Stand = DoomImp,
Frames_Walk = DoomImp_Walk
};
#region Preloading
Action AllImagesLoaded = delegate { };
var ImagesThatAreCurrentlyLoading = new List<IHTMLImage>();
var ImagesThatAreCurrentlyLoadingCounter = 0;
//Action<IHTMLImage> LoadingSingleImageDone = img =>
//{
// ImagesThatAreCurrentlyLoading.Remove(img);
// Console.WriteLine("loaded: " + img.src);
// if (ImagesThatAreCurrentlyLoading.Count == 0)
// AllImagesLoaded();
// else
// info.innerText = "Loading images... (" + ImagesThatAreCurrentlyLoading.Count + ")";
//};
info.innerText = "Loading images...";
#region StartLoadingSingleImage
Action<IHTMLImage> StartLoadingSingleImage = Image =>
{
ImagesThatAreCurrentlyLoading.Add(Image);
Image.InvokeOnComplete(img => { ImagesThatAreCurrentlyLoadingCounter++; }, 30);
//LoadingSingleImageDone(Image);
};
#endregion
#region StartLoadingDudeAnimationInfo
Action<DudeAnimationInfo> StartLoadingDudeAnimationInfo =
a =>
{
a.Frames_Stand.ForEach(i => StartLoadingSingleImage(i.Image));
a.Frames_Walk.ForEach(j => j.ForEach(i => StartLoadingSingleImage(i.Image)));
};
#endregion
var Argh = new Argh();
var CloneAffirmative = new EN_000002();
var Affirmative = new Affirmative();
var click = new click();
var Hammertime = new SAMPLES234 { volume = 0.1 };
var Sawtime = new SAMPLES216 { volume = 0.1 };
var StoneHammerTime = new SAMPLES233 { volume = 0.1 };
#endregion
#region AllImagesLoaded
AllImagesLoaded +=
delegate
{
Console.WriteLine("AllImagesLoaded");
info.innerText = "Loading images... done!";
#region Translate
Func<double, double, Point<double>> Translate =
(_x, _y) =>
{
var _r = ZeroPoint.GetRotation(_x, _y) + RotationA;
var _d = ZeroPoint.GetDistance(_x, _y) * bg_size.h * 2d.Sqrt();
_x = Math.Cos(_r) * _d;
_y = Math.Sin(_r) * _d * RotationB;
return new Point<double> { X = _x, Y = _y };
};
#endregion
#region Translator
var Translator = new CoordTranslatorBase
{
ConvertMapToCanvas = map_coords =>
{
var canvas_coords = Translate(map_coords.X, map_coords.Y);
var c = GetCenter();
canvas_coords.X += c.X;
canvas_coords.Y += c.Y;
return canvas_coords;
},
ConvertCanvasToMap = canvas =>
{
var c = GetCenter();
var offset = new Point<double> { X = canvas.X - c.X, Y = (canvas.Y - c.Y) / RotationB };
var d = ZeroPoint.GetDistance(offset) / (bg_size.h * 2d.Sqrt());
var r = ZeroPoint.GetRotation(offset) - RotationA;
var realoffset = new Point<double>
{
X = Math.Cos(r) * d,
Y = Math.Sin(r) * d
};
return realoffset;
}
};
#endregion
#region ApplyPosition
Action<double, double, IHTMLDiv> ApplyPosition =
(_x, _y, _div) =>
{
try
{
var _pos = GetCenter();
var p = Translate(_x, _y);
var _dot = (Zoom * Dot).ToInt32();
_div.style.SetLocation(
(_pos.X + p.X).ToInt32() - _dot / 2,
(_pos.Y + p.Y).ToInt32() - _dot / 2,
_dot,
_dot
);
_div.AttachToDocument();
_div.onmouseover +=
delegate
{
Native.Document.title = new { _x, _y }.ToString();
};
}
catch (Exception ex)
{
ex.ToConsole();
}
};
#endregion
#region CreateDiv
Func<double, double, IHTMLDiv> CreateDiv =
(_x, _y) =>
{
var _div = new IHTMLDiv();
_div.style.backgroundColor = Color.Red;
ApplyPosition(_x, _y, _div);
return _div;
};
#endregion
var TileColor = Color.Gray;
var TileColor2 = Color.White;
var TileColorHouse1 = Color.FromRGB(41, 0, 0);
//var TileColorHouse2 = Color.FromRGB(42, 0, 0);
//var TileColorHouse3 = Color.FromRGB(43, 0, 0);
//var TileColorHouse11 = Color.FromRGB(44, 0, 0);
var TileColorTree1 = Color.FromRGB(51, 0, 0);
var TileColorTree2 = Color.FromRGB(52, 0, 0);
var TileColorTree3 = Color.FromRGB(53, 0, 0);
var TileColorRoad1 = Color.FromRGB(61, 0, 0);
var TileColorRoad2 = Color.FromRGB(62, 0, 0);
var TileColorRoad3 = Color.FromRGB(63, 0, 0);
var TileColorTrack1 = Color.FromRGB(70, 0, 0);
var TileColorRoadTrack1 = Color.FromRGB(71, 0, 0);
var data = new[] {
new { x = -0.5, y = -0.5, color = Color.Red },
new { x = 0.5, y = -0.5, color = Color.Green },
new { x = 0.5, y = 0.5, color = Color.Blue },
new { x = -0.5, y = 0.5, color = Color.Yellow },
};
#region IsDefined
Func<double, double, bool> IsDefined =
(x, y) => data.Any(
i =>
{
if (i.x != x) return false;
if (i.y != y) return false;
return true;
}
);
#endregion
data = data.Concat(
from x in Enumerable.Range(MapSize.Left, MapSize.Width + 1)
from y in Enumerable.Range(MapSize.Top, MapSize.Height + 1)
select new { x = (double)x, y = (double)y, color = TileColor }
).ToArray();
#region CreateNewItemsRandomly
Action<int, Color> CreateNewItemsRandomly =
(x, c) =>
x.Times(
delegate
{
var loc = data.Where(i => i.color == TileColor).Random();
data = data.ConcatSingle(
new { x = loc.x, y = loc.y, color = c }
).ToArray();
}
);
#endregion
#region ApplyTileToCanvas
Action<double, double, IHTMLImage, double> ApplyTileToCanvas =
(x, y, bg, height) =>
{
height *= Zoom;
var c = GetCenter();
var p = Translate(x, y);
c.X += p.X.ToInt32(bg_size.w / 2);
c.Y += p.Y.ToInt32(bg_size.h / 2);
var _x = (c.X - bg_size.w / 2);
var _y = (c.Y - bg_size.h / 2 - (height - bg_size.h));
bg.style.SetLocation(
_x.ToInt32(),
_y.ToInt32(),
bg_size.w, height.ToInt32()
);
if (height > bg_size.h)
{
bg.style.zIndex = (_y + height - bg_size.h / 2).ToInt32();
}
else
{
bg.style.zIndex = (_y).ToInt32();
}
};
#endregion
// http://wiki.openttd.org/index.php/Enhanced_GFX_replacement
var KnownTileElements = new List<TileElement>();
var KnownDirtTileElements = new List<TileElement>();
#region SpawnItems
Action<Color, Func<string>, double> SpawnItems =
(c, src, h) =>
{
var tiles_query =
from point in data
where point.color == c
let img = new IHTMLImage(src())
let update = (Action)(() => ApplyTileToCanvas(point.x, point.y, img, h))
let img2 = img.Aggregate(
i =>
{
update();
}).AttachTo(arena.Layers.Canvas)
select
new TileElement
{
Position = new Point<double> { X = point.x, Y = point.y },
Image = img,
Source = src()
//, update
};
var aa0 = tiles_query.ToArray();
var aa1 = aa0;
var aa2 = aa1;
KnownTileElements.AddRange(aa2);//.ForEach(i => i.update());
};
#endregion
CreateNewItemsRandomly(12, TileColorHouse1);
//CreateNewItemsRandomly(4, TileColorHouse2);
//CreateNewItemsRandomly(5, TileColorHouse3);
//CreateNewItemsRandomly(5, TileColorHouse11);
CreateNewItemsRandomly(20, TileColorTree1);
CreateNewItemsRandomly(10, TileColorTree2);
CreateNewItemsRandomly(5, TileColorTree3);
CreateNewItemsRandomly(2, TileColorRoad1);
CreateNewItemsRandomly(1, TileColorRoad2);
CreateNewItemsRandomly(1, TileColorTrack1);
// expand the random roads through the map
#region expand
data.Where(i => i.color == TileColorRoad1).ToArray().ForEach(
road =>
{
data = data.Concat(
from y in Enumerable.Range(MapSize.Top, MapSize.Height + 1)
select new { x = road.x, y = (double)y, color = TileColorRoad1 }
).ToArray();
}
);
data.Where(i => i.color == TileColorRoad2).ToArray().ForEach(
road =>
{
data = data.Concat(
from x in Enumerable.Range(MapSize.Left, MapSize.Width + 1)
select new { x = (double)x, y = road.y, color = TileColorRoad2 }
).ToArray();
}
);
data.Where(i => i.color == TileColorTrack1).ToArray().ForEach(
road =>
{
data = data.Concat(
from x in Enumerable.Range(MapSize.Left, MapSize.Width + 1)
select new { x = (double)x, y = road.y, color = TileColorTrack1 }
).ToArray();
}
);
#endregion
// remove buildings on the roads
#region clean road1
{
var AllRoads = data.Where(i => i.color == TileColorRoad1).ToArray();
data = data.Where(
v =>
{
if (v.color == TileColor)
return true;
if (v.color == TileColorRoad1)
return true;
if (v.color == TileColorRoad2)
return true;
if (v.color == TileColorTrack1)
return true;
return !AllRoads.Any(i => i.x == v.x && i.y == i.y);
}
).ToArray();
}
{
var query = from a in data
where a.color == TileColorRoad1
let b = data.FirstOrDefault(i =>
{
var SameColor = i.color == TileColorRoad2;
var SameLocation = i.x == a.x && i.y == a.y;
return SameColor && SameLocation;
})
where b != null
let c = new { a.x, a.y, color = TileColorRoad3 }
select new { a, b, c };
foreach (var v in query)
{
var data0 = data.Where(i =>
{
if (i == v.a) return false;
if (i == v.b) return false;
return true;
});
data = data0.ConcatSingle(v.c)
.ToArray();
}
}
{
var query = from a in data
where a.color == TileColorRoad1
let b = data.FirstOrDefault(i =>
{
var SameColor = i.color == TileColorTrack1;
var SameLocation = i.x == a.x && i.y == a.y;
return SameColor && SameLocation;
})
where b != null
let c = new { a.x, a.y, color = TileColorRoadTrack1 }
select new { a, b, c };
foreach (var v in query)
{
var data0 = data.Where(i =>
{
if (i == v.a) return false;
if (i == v.b) return false;
return true;
});
data = data0.ConcatSingle(v.c)
.ToArray();
}
}
{
var AllRoads = data.Where(i => i.color == TileColorRoad2).ToArray();
data = data.Where(
v =>
{
if (v.color == TileColor)
return true;
if (v.color == TileColorRoad1)
return true;
if (v.color == TileColorRoad2)
return true;
return !AllRoads.Any(i => i.x == v.x && i.y == v.y);
}
).ToArray();
}
#endregion
info.innerText = "Loading items...";
Timer.DoAsync(
delegate
{
SpawnItems(TileColor,
() =>
{
//if (0.05.ByChance()) return new _1().src;
if (0.33.ByChance()) return new _2x192x95().src;
return new _0_192x95().src;
}, 32);
SpawnItems(TileColorRoad1, () => new r1_192x95().src, 32);
SpawnItems(TileColorRoad2, () => new r4_192x95().src, 32);
SpawnItems(TileColorRoad3, () => new r5_192x95().src, 32);
SpawnItems(TileColorTrack1, () => new r2_192x95().src, 32);
SpawnItems(TileColorRoadTrack1, () => new r3_192x95().src, 32);
SpawnItems(TileColorHouse1, () => new h1x_192x384().src, 128);
//SpawnItems(TileColorHouse11, () => new h11x().src, 89);
//SpawnItems(TileColorHouse2, () => new h2().src, 96);
//SpawnItems(TileColorHouse3, () => new h3().src, 50);
SpawnItems(TileColorTree1, () => new t1_192x192().src, 65);
SpawnItems(TileColorTree2, () => new t2_192x192().src, 128);
SpawnItems(TileColorTree3, () => new t3_192x192().src, 128);
Func<bool> IsDoneRotatingA = () => RotationA.ToDegrees() == 45;
#region SpawnLookingDude
Func<FrameInfo[], int, int, Dude2> SpawnLookingDude =
(f, x, y) =>
{
var r = new Dude2
{
Frames = f,
};
r.AnimationInfo.Frames_Stand = f;
r.Zoom.DynamicZoomFunc = a => 1;
r.Zoom.StaticZoom = 1;
r.SetSize(48, 72);
r.TeleportTo(x, y);
r.Control.AttachTo(arena.Layers.Canvas);
r.Direction = Math.PI.Random() * 2;
return r;
};
#endregion
var Dudes = new List<Dude2>();
var RoadVehicles = new List<Dude2>();
#region GetRandomCanvasPosition
Func<Point> GetRandomCanvasPosition =
() =>
{
var x = (MapSize.Width - 1).Random() + MapSize.Left + 1;
var y = (MapSize.Height - 1).Random() + MapSize.Top + 1;
var target = Translate(
x, y
);
var c = GetCenter();
var p = new Point(
(target.X + c.X).ToInt32(),
(target.Y + c.Y).ToInt32()
);
return p;
}
;
#endregion
#region CreateDude
Func<DudeAnimationInfo, IdleBehaviour, double, Dude2> CreateDude =
(ani, idle, dudezoom) =>
{
var w2c = GetRandomCanvasPosition();
var w2 = SpawnLookingDude(ani.Frames_Stand, w2c.X.ToInt32(), w2c.Y.ToInt32());
w2.Zoom.StaticZoom = dudezoom;
w2.AnimationInfo.Frames_Walk = ani.Frames_Walk;
w2.TargetLocationDistanceMultiplier = 1;
Action<Action> GoSomeWhere =
done =>
{
w2.DoneWalkingOnce += done;
w2.WalkTo(GetRandomCanvasPosition().ToDouble());
};
#region WaitSomeAndGoSomeWhere
Action WaitSomeAndGoSomeWhere = null;
WaitSomeAndGoSomeWhere =
() => 5000.Random().AtTimeout(
t =>
{
if (paused)
{
WaitSomeAndGoSomeWhere();
return;
}
var CurrentlyWalking = Dudes.Count(i => i.IsWalking);
if (w2.IsWalking)
{
WaitSomeAndGoSomeWhere();
return;
}
// if we've been selected, then wait for orders
if (w2.IsSelected)
{
WaitSomeAndGoSomeWhere();
return;
}
if (w2.IsHot)
{
WaitSomeAndGoSomeWhere();
return;
}
// dont make them all walk at the same time
if (CurrentlyWalking > 3)
{
w2.Direction = (Math.PI * 2).Random();
WaitSomeAndGoSomeWhere();
return;
}
if (idle == IdleBehaviour.Scout)
GoSomeWhere(WaitSomeAndGoSomeWhere);
else
WaitSomeAndGoSomeWhere();
}
);
// make only imps wander on their own
if (idle != IdleBehaviour.None)
WaitSomeAndGoSomeWhere();
#endregion
return w2;
};
#endregion
info.innerHTML = "Creating dudes...";
1.Times(() => Dudes.Add(CreateDude(MyFrames_Soldier, IdleBehaviour.Look, 0.5)));
4.Times(() => Dudes.Add(CreateDude(MyFrames_Soldier, IdleBehaviour.Scout, 0.5)));
1.Times(() => Dudes.Add(CreateDude(MyFrames_Imp, IdleBehaviour.Look, 0.5)));
4.Times(() => Dudes.Add(CreateDude(MyFrames_Imp, IdleBehaviour.Scout, 0.5)));
1.Times(() => Dudes.Add(CreateDude(MyFrames_TwinClone, IdleBehaviour.Look, 0.5)));
4.Times(() => Dudes.Add(CreateDude(MyFrames_TwinClone, IdleBehaviour.Scout, 0.5)));
Func<Point, Point<double>> GetNearestMapPosition =
p => Translator.ConvertCanvasToMap(p.ToDouble()).Round().BoundTo(MapSize);
#region GetNearestMapRect
Func<Rectangle, Rectangle> GetNearestMapRect =
rect =>
{
var from = GetNearestMapPosition(new Point(rect.Left, rect.Top));
var to = GetNearestMapPosition(new Point(rect.Right, rect.Bottom));
return new Rectangle
{
Left = from.X.ToInt32(),
Top = from.Y.ToInt32(),
Right = to.X.ToInt32(),
Bottom = to.Y.ToInt32()
};
};
#endregion
#region GetTileElementsAt
Func<Point<double>, IEnumerable<TileElement>> GetTileElementsAt =
map_coords =>
from i in KnownTileElements
where i != null
where i.Position.X == map_coords.X && i.Position.Y == map_coords.Y
select i;
#endregion
#region AddTileElement
Func<Point<double>, string, int, TileElement> AddTileElement =
(map_coords, source, height) =>
{
var n = new TileElement
{
Position = map_coords,
Image = new IHTMLImage(source),
Source = source,
Height = height
};
KnownTileElements.Add(n);
ApplyTileToCanvas(map_coords.X, map_coords.Y, n.Image, height);
n.Image.AttachTo(arena.Layers.Canvas);
return n;
};
#endregion
#region RemoveAllTilesAt
Action<Point<double>> RemoveAllTilesAt =
map_coords =>
{
foreach (var t in GetTileElementsAt(map_coords).ToArray())
{
t.Image.Orphanize();
t.RemoveFrom(KnownTileElements);
t.RemoveFrom(KnownDirtTileElements);
}
};
#endregion
#region ReplaceTileWithDirt
Func<Point<double>, TileElement> ReplaceTileWithDirt =
map_coords =>
{
RemoveAllTilesAt(map_coords);
var r = AddTileElement(map_coords, TileResources.Dirt.Source, TileResources.Dirt.Height);
r.AddTo(KnownDirtTileElements);
return r;
};
#endregion
#region ReplaceTileWithNewBuilding
Func<Point<double>, TileElement> ReplaceTileWithNewBuilding =
map_coords =>
{
var n = ReplaceTileWithDirt(map_coords);
n.DirtAge = -200 - (3 + 5.Random());
return n;
};
#endregion
#region interesting predicates
var IsGrass =
new[]
{
TileResources.Grass.Source,
TileResources.Dirt.Source,
//TileResources.DirtDirtGrass.Source,
//TileResources.DirtGrassGrass.Source,
//TileResources.Rocks.Source,
TileResources.RoughLand.Source,
}.ToEqualsAny();
var IsGrassStrict = TileResources.Grass.Source.ToEquals();
var IsRoad1 = TileResources.Road1.Source.ToEquals();
var IsRoad2 = TileResources.Road2.Source.ToEquals();
var IsTrack1 = TileResources.Track1.Source.ToEquals();
var IsTree = TileResources.Tree.Source.ToEquals();
var IsTileSelector = TileResources.TileSelector.Source.ToEquals();
#endregion
// create a draggable toolbar
#region creating the toolbar
var toolbar_color = Color.FromRGB(0x40, 0x40, 0x40);
var infotoolbar = ToolbarDialog.CreateToolbar(
new Point(64, 64),
new Point(200, 64), toolbar_color
);
var infotoolbar_content = new IHTMLDiv().AttachTo(infotoolbar.Control);
infotoolbar_content.style.SetLocation(2, 8, infotoolbar.Size.X - 6, infotoolbar.Size.Y - 12);
infotoolbar_content.SetDialogColor(infotoolbar.Color, false);
infotoolbar_content.onmousedown += Native.DisabledEventHandler;
Action<IStyle> SetInfoAnchorStyle =
style =>
{
style.display = IStyle.DisplayEnum.block;
style.textDecoration = "none";
style.color = Color.White;
style.textAlign = IStyle.TextAlignEnum.center;
};
new IHTMLAnchor("http://zproxy.wordpress.com", "zproxy.wordpress.com").AttachTo(infotoolbar_content).style.Aggregate(SetInfoAnchorStyle);
new IHTMLAnchor("http://jsc.sf.net", "jsc.sf.net").AttachTo(infotoolbar_content).style.Aggregate(SetInfoAnchorStyle);
var toolbar_size = new Point(96, 32);
var toolbar_pos = new Point(8, Native.window.Height - toolbar_size.Y - 8);
Console.WriteLine("toolbar!");
var toolbar = ToolbarDialog.CreateToolbar(toolbar_pos, toolbar_size, toolbar_color);
Native.window.onresize +=
delegate
{
infotoolbar.ApplyPosition();
toolbar.ApplyPosition();
};
infotoolbar.Control.Hide();
infotoolbar.Control.AttachToDocument();
toolbar.Control.AttachToDocument();
toolbar_btn_pause = new ToolbarButton(
toolbar, new btn_pause().src
)
{
Title = "Pause"
};
var aww = new aww();
var gong = new gong();
toolbar_btn_pause.Clicked +=
btn =>
{
paused = btn.IsActivated;
Dudes.ForEach(i => i.Paused = paused);
};
#region toolbar_btn_demolish
var toolbar_btn_demolish = new ToolbarButton(
toolbar, new btn_demolish().src
)
{
Title = "Demolish"
};
var ShowingTileSelector = default(Func<bool>);
#endregion
var toolbar_btn_track1 = new ToolbarButton(
toolbar, new btn_track1().src
) { Title = "Build rail tracks" };
// var toolbar_btn_road2 = new ToolbarButton(
// toolbar, new btn_road2().src
//) { Title = "Build road" };
// var toolbar_btn_road1 = new ToolbarButton(
// toolbar, new btn_road1().src
// ) { Title = "Build road" };
var toolbar_btn_road1_road2 = new ToolbarButton(
toolbar, new btn_road1_road2().src
) { Title = "Build road" };
/*
var toolbar_btn_sign = new ToolbarButton(
toolbar, "assets/ThreeDStuff/btn_sign.png"
);
*/
var toolbar_btn_trees = new ToolbarButton(
toolbar, new btn_trees().src
) { Title = "Build trees" };
var toolbar_btn_trees2 = new ToolbarButton(
toolbar, new btn_trees().src
) { Title = "Build trees" };
var TileSelectorModes = new Dictionary<ToolbarButton, TileSelectorMode>
{
{toolbar_btn_demolish, TileSelectorMode.Rectangle},
{toolbar_btn_track1, TileSelectorMode.Horizontal},
//{toolbar_btn_road2, TileSelectorMode.Vertical},
//{toolbar_btn_road1, TileSelectorMode.Horizontal},
{toolbar_btn_road1_road2, TileSelectorMode.HorizontalOrVertical},
{toolbar_btn_trees, TileSelectorMode.Rectangle},
{toolbar_btn_trees2, TileSelectorMode.Rectangle},
};
var __before_error = "__before_error";
var __Keys = TileSelectorModes.Keys;
var __KeysArray = __Keys.ToArray();
var __after_error = "__after_error";
var toolbar_btngroup = new ToolbarButtonGroup
{
Buttons = __KeysArray
};
var toolbar_btn_city = new ToolbarButton(
toolbar, new btn_city().src
) { Title = "Build city" };
var toolbar_btn_landinfo = new ToolbarButton(
toolbar, new btn_landinfo().src
) { Title = "Show info" };
toolbar_btn_landinfo.Clicked +=
btn =>
{
infotoolbar.Control.Show(btn.IsActivated);
};
ShowingTileSelector =
() => toolbar_btngroup.IsActivated;
var MultipleTileSelector = new List<TileElement>();
#region MultipleTileSelector_Clear
Action MultipleTileSelector_Clear =
delegate
{
// framework bug: while iterating and the collection changes an exception sould be thrown
foreach (var v in MultipleTileSelector.ToArray())
{
if (v.Image != null)
{
v.Image.Orphanize();
v.Image = null;
}
v.RemoveFrom(KnownTileElements);
}
MultipleTileSelector.Clear();
};
#endregion
#region MultipleTileSelector_Add
Action<Point<double>> MultipleTileSelector_Add =
p =>
{
AddTileElement(
p,
TileResources.TileSelector.Source,
TileResources.TileSelector.Height
).AddTo(MultipleTileSelector);
};
#endregion
// show tile selection
#region arena.MouseMove
arena.MouseMove +=
p =>
{
if (paused)
return;
if (ShowingTileSelector())
{
if (arena.InSelectionMode)
return;
// get map coords from canvas coords
var map_coords = GetNearestMapPosition(p);
if (MultipleTileSelector.Count == 1)
{
var n = MultipleTileSelector.SingleOrDefault();
ApplyTileToCanvas(map_coords.X, map_coords.Y, n.Image, n.Height);
}
else
{
MultipleTileSelector_Clear();
MultipleTileSelector_Add(map_coords);
}
// must be on top of new dirt
//SingleTileSelector.style.zIndex++;
}
};
#endregion
#region GetActivatedTileSelectorMode
Func<TileSelectorMode> GetActivatedTileSelectorMode =
delegate
{
if (toolbar_btngroup.ActivatedButton == null)
return TileSelectorMode.Unknown;
if (!TileSelectorModes.ContainsKey(toolbar_btngroup.ActivatedButton))
return TileSelectorMode.Unknown;
return TileSelectorModes[toolbar_btngroup.ActivatedButton];
};
#endregion
#region arena.SelectionPointsPreview - just apply the current TileSelectorMode
arena.SelectionPointsPreview +=
(from, to) =>
{
if (paused)
return;
if (!ShowingTileSelector())
return;
//SingleTileSelector.Hide();
var map_coords = new
{
from = GetNearestMapPosition(from),
to = GetNearestMapPosition(to)
};
#region CurrentMode
var CurrentMode = GetActivatedTileSelectorMode();
if (CurrentMode == TileSelectorMode.Unknown)
return;
if (CurrentMode == TileSelectorMode.HorizontalOrVertical)
{
if ((map_coords.from.X - map_coords.to.X).Abs() > (map_coords.from.Y - map_coords.to.Y).Abs())
CurrentMode = TileSelectorMode.Horizontal;
else
CurrentMode = TileSelectorMode.Vertical;
}
#endregion
if (CurrentMode == TileSelectorMode.Horizontal)
{
MultipleTileSelector_Clear();
foreach (var x in map_coords.from.X.ToInt32().RangeTo(map_coords.to.X.ToInt32()))
MultipleTileSelector_Add(new Point<double> { X = x, Y = map_coords.from.Y });
}
if (CurrentMode == TileSelectorMode.Vertical)
{
MultipleTileSelector_Clear();
foreach (var y in map_coords.from.Y.ToInt32().RangeTo(map_coords.to.Y.ToInt32()))
MultipleTileSelector_Add(new Point<double> { X = map_coords.from.X, Y = y });
}
if (CurrentMode == TileSelectorMode.Rectangle)
{
MultipleTileSelector_Clear();
foreach (var x in map_coords.from.X.ToInt32().RangeTo(map_coords.to.X.ToInt32()))
foreach (var y in map_coords.from.Y.ToInt32().RangeTo(map_coords.to.Y.ToInt32()))
{
MultipleTileSelector_Add(new Point<double> { X = x, Y = y });
}
}
};
#endregion
#region UseCurrentToolAt
Action<Point<double>, TileSelectorMode> UseCurrentToolAt =
(map_coords, CurrentMode) =>
{
//"UseCurrentToolAt".ToConsole();
var Subject = GetTileElementsAt(map_coords).ToArray();
var StatsQuery = Subject.Select(i => i.Source);
if (toolbar_btn_demolish)
{
ReplaceTileWithDirt(map_coords);
}
#region toolbar_btn_trees
if (toolbar_btn_trees)
{
Func<string, bool> IsOther = s =>
!(IsGrass(s) || IsTileSelector(s));
var Stats = new
{
GrassStrict = StatsQuery.Any(IsGrassStrict),
Other = StatsQuery.Any(IsOther)
};
if (!Stats.Other)
{
if (!Stats.GrassStrict)
{
RemoveAllTilesAt(map_coords);
AddTileElement(map_coords, TileResources.Grass.Source, TileResources.Grass.Height);
}
AddTileElement(map_coords, TileResources.Tree.Source, TileResources.Tree.Height);
}
}
#endregion
#region toolbar_btn_trees2
if (toolbar_btn_trees2)
{
Func<string, bool> IsOther = s =>
!(IsGrass(s) || IsTileSelector(s));
var Stats = new
{
GrassStrict = StatsQuery.Any(IsGrassStrict),
Other = StatsQuery.Any(IsOther)
};
if (!Stats.Other)
{
if (!Stats.GrassStrict)
{
RemoveAllTilesAt(map_coords);
AddTileElement(map_coords, TileResources.Grass.Source, TileResources.Grass.Height);
}
AddTileElement(map_coords, TileResources.Tree2.Source, TileResources.Tree2.Height);
}
}
#endregion
#region toolbar_btn_track1
if (toolbar_btn_track1)
{
#region Stats
Func<string, bool> IsOther = s =>
!(IsRoad2(s) || IsGrass(s) || IsTree(s) || IsTileSelector(s));
var Stats = new
{
Grass = StatsQuery.Any(IsGrass),
Road2 = StatsQuery.Any(IsRoad2),
Other = StatsQuery.Any(IsOther)
};
#endregion
if (!Stats.Other)
{
RemoveAllTilesAt(map_coords);
if (!Stats.Road2)
AddTileElement(map_coords, TileResources.Track1.Source, TileResources.Track1.Height);
else
AddTileElement(map_coords, TileResources.Road2_Track1.Source, TileResources.Road2_Track1.Height);
}
else
{
// should show that red error dialog now :)
"Cannot build tracks!".ToConsole();
foreach (var v in Subject)
{
v.Source.ToConsole();
}
}
}
#endregion
bool ActiveIsRoad1 = false;
bool ActiveIsRoad2 = false;
if (toolbar_btn_road1_road2)
{
ActiveIsRoad1 = CurrentMode == TileSelectorMode.Horizontal;
ActiveIsRoad2 = CurrentMode == TileSelectorMode.Vertical;
}
#region toolbar_btn_road1
if (ActiveIsRoad1)
{
#region Stats
Func<string, bool> IsOther = s =>
!(IsRoad2(s) || IsTrack1(s) || IsGrass(s) || IsTree(s) || IsTileSelector(s));
var Stats = new
{
Grass = StatsQuery.Any(IsGrass),
Road2 = StatsQuery.Any(IsRoad2),
Track1 = StatsQuery.Any(IsTrack1),
Other = StatsQuery.Any(IsOther)
};
#endregion
if (!Stats.Other)
{
RemoveAllTilesAt(map_coords);
if (!Stats.Road2)
AddTileElement(map_coords,
TileResources.Road1.Source,
TileResources.Road1.Height);
else
AddTileElement(map_coords, TileResources.Road1_Road2.Source, TileResources.Road1_Road2.Height);
}
else
{
// should show that red error dialog now :)
"Cannot build tracks!".ToConsole();
}
}
#endregion
#region toolbar_btn_road2
if (ActiveIsRoad2)
{
#region Stats
Func<string, bool> IsOther = s =>
!(IsRoad1(s) || IsTrack1(s) || IsGrass(s) || IsTree(s) || IsTileSelector(s));
var Stats = new
{
Grass = StatsQuery.Any(IsGrass),
Road1 = StatsQuery.Any(IsRoad1),
Track1 = StatsQuery.Any(IsTrack1),
Other = StatsQuery.Any(IsOther)
};
#endregion
if (!Stats.Other)
{
RemoveAllTilesAt(map_coords);
if (Stats.Road1)
AddTileElement(map_coords, TileResources.Road1_Road2.Source, TileResources.Road1_Road2.Height);
else if (!Stats.Track1)
AddTileElement(map_coords, TileResources.Road2.Source, TileResources.Road2.Height);
else
AddTileElement(map_coords, TileResources.Road2_Track1.Source, TileResources.Road2_Track1.Height);
}
else
{
// should show that red error dialog now :)
"Cannot build tracks!".ToConsole();
}
}
#endregion
};
#endregion
#region arena.ApplyPointsSelection - using current tool
arena.ApplyPointsSelection +=
(from, to, ev) =>
{
if (!ShowingTileSelector())
return;
if (paused)
return;
var map_coords = new
{
from = GetNearestMapPosition(from),
to = GetNearestMapPosition(to)
};
#region CurrentMode
var CurrentMode = GetActivatedTileSelectorMode();
if (CurrentMode == TileSelectorMode.Unknown)
return;
if (CurrentMode == TileSelectorMode.HorizontalOrVertical)
{
if ((map_coords.from.X - map_coords.to.X).Abs() > (map_coords.from.Y - map_coords.to.Y).Abs())
CurrentMode = TileSelectorMode.Horizontal;
else
CurrentMode = TileSelectorMode.Vertical;
}
#endregion
Console.WriteLine("mode: " + CurrentMode);
if (CurrentMode == TileSelectorMode.Vertical)
{
MultipleTileSelector_Clear();
foreach (var y in map_coords.from.Y.ToInt32().RangeTo(map_coords.to.Y.ToInt32()))
{
UseCurrentToolAt(new Point<double> { X = map_coords.from.X, Y = y }, CurrentMode);
}
}
if (CurrentMode == TileSelectorMode.Horizontal)
{
MultipleTileSelector_Clear();
foreach (var x in map_coords.from.X.ToInt32().RangeTo(map_coords.to.X.ToInt32()))
UseCurrentToolAt(new Point<double> { X = x, Y = map_coords.from.Y }, CurrentMode);
}
if (CurrentMode == TileSelectorMode.Rectangle)
{
MultipleTileSelector_Clear();
foreach (var x in map_coords.from.X.ToInt32().RangeTo(map_coords.to.X.ToInt32()))
foreach (var y in map_coords.from.Y.ToInt32().RangeTo(map_coords.to.Y.ToInt32()))
{
UseCurrentToolAt(new Point<double> { X = x, Y = y }, CurrentMode);
}
}
MultipleTileSelector_Clear();
MultipleTileSelector_Add(map_coords.to);
click.play();
click = new click(); ;
};
#endregion
#region arena.SelectionClick - just use the current tool
arena.SelectionClick +=
(p, ev) =>
{
if (paused)
return;
if (!ShowingTileSelector())
return;
var map_coords = GetNearestMapPosition(p);
#region CurrentMode
var CurrentMode = GetActivatedTileSelectorMode();
if (CurrentMode == TileSelectorMode.Unknown)
return;
if (CurrentMode == TileSelectorMode.HorizontalOrVertical)
{
var map_coords0 = Translator.ConvertCanvasToMap(p.ToDouble()).Wrap(1).Abs();
if (map_coords0.X > map_coords0.Y)
CurrentMode = TileSelectorMode.Horizontal;
else
CurrentMode = TileSelectorMode.Vertical;
}
#endregion
UseCurrentToolAt(map_coords, CurrentMode);
MultipleTileSelector_Clear();
MultipleTileSelector_Add(map_coords);
click.play();
click = new click(); ;
};
#endregion
#region toolbar_btngroup.Clicked - a tool has been selected
toolbar_btngroup.Clicked +=
btn =>
{
arena.ShowSelectionRectangle = !ShowingTileSelector();
if (!ShowingTileSelector())
MultipleTileSelector_Clear();
};
#endregion
#endregion
#region arena.SelectionClick - move dudes
arena.SelectionClick +=
(p, ev) =>
{
if (paused)
return;
if (ShowingTileSelector())
return;
var selection = Dudes.Where(i => i.IsSelected).ToArray();
//KnownCanvasPosition = p;
var target = Translator.ConvertCanvasToMap(p.ToDouble()).BoundTo(MapSize);
if (selection.Length == 0)
{
// single select?
return;
}
selection.WithEach(
v =>
{
if (v.AnimationInfo.Frames_Stand[0].Source == Frames.WolfSoldier[0].Source)
{
CloneAffirmative.play();
CloneAffirmative = new EN_000002();
}
else if (v.AnimationInfo.Frames_Stand[0].Source == MyFrames_TwinClone.Frames_Stand[0].Source)
{
CloneAffirmative.play();
CloneAffirmative = new EN_000002();
}
else
{
Argh.play();
Argh = new Argh();
}
}
);
if (selection.Length == 1)
{
var canvas = Translator.ConvertMapToCanvas(target);
//canvas.X += GetCenter().X;
//canvas.Y += GetCenter().Y;
//new
//{
// target = new { target.X, target.Y },
// canvas = new { canvas.X, canvas.Y }
//}.ToConsole(); ;
selection.ForEach(i => i.WalkTo(
canvas
));
}
else
{
#region Circle
var center = GetCenter();
#region GetRotatedTargetPoint
Func<double, double, Point<double>> GetRotatedTargetPoint =
(direction, distance) =>
new Point<double>
{
X = target.X + (Math.Cos(direction) * distance),
Y = target.Y + (Math.Sin(direction) * distance),
};
#endregion
Func<Point<double>, Point> OffsetToCenter =
mcanvas =>
new Point
(
(mcanvas.X + center.X).ToInt32(),
(mcanvas.Y + center.Y).ToInt32()
);
var dest =
from index in selection.Length.ToRange()
let direction = (((double)index / (selection.Length)) * (Math.PI * 2)).ToConsole()
let distance = 0.5
let mtarget = GetRotatedTargetPoint(direction, distance)
let mcanvas = Translate(mtarget.X, mtarget.Y)
select new
{
index,
canvas = OffsetToCenter(mcanvas)
};
foreach (var v in dest)
{
selection[v.index].WalkTo(v.canvas.ToDouble());
}
#endregion
}
};
#endregion
#region arena.ApplySelection
arena.ApplySelection +=
(r, ev) =>
{
if (paused)
return;
if (ShowingTileSelector())
return;
Console.WriteLine("ApplySelection " + new { ev.shiftKey });
foreach (var v in Dudes)
{
// chrome always reports shiftKey?
//if (ev.shiftKey)
// v.IsSelected |= r.Contains(v.CurrentLocation.ToInt32());
//else
v.IsSelected = r.Contains(v.CurrentLocation.ToInt32());
}
};
#endregion
#region toolbar_btn_city.Clicked
var toolbar_btn_city_StopTimer = default(Action);
toolbar_btn_city.Clicked +=
delegate
{
if (toolbar_btn_city_StopTimer != null)
{
Console.WriteLine("stopping city building");
toolbar_btn_city_StopTimer();
toolbar_btn_city_StopTimer = null;
return;
}
#region TryBuildHere
Func<Point<double>, bool> TryBuildHere =
n =>
{
if (IsDefined(n.X, n.Y))
if (GetTileElementsAt(n).All(i => IsGrassStrict(i.Source)))
{
new IHTMLAudio[]
{
Hammertime,
Sawtime,
StoneHammerTime
}.Random().With(
snd =>
{
snd.play();
Hammertime = new SAMPLES234 { volume = 0.1 };
Sawtime = new SAMPLES216 { volume = 0.1 };
StoneHammerTime = new SAMPLES233 { volume = 0.1 };
}
);
ReplaceTileWithNewBuilding(n);
return true;
}
return false;
};
#endregion
var Query = from i in KnownTileElements
let Road2 = IsRoad2(i.Source)
let Road1 = IsRoad1(i.Source)
where Road2 || Road1
select new { i, Road1, Road2 };
Console.WriteLine("starting city building");
toolbar_btn_city_StopTimer = new Timer(
t =>
{
if (paused)
return;
var v = Query.Random();
Console.WriteLine("try building city at road {0}", new { v.i.Position.X, v.i.Position.Y });
if (v.Road2)
{
if (0.5.ByChance())
TryBuildHere(v.i.Position.Round().WithOffset(-1, 0));
else
TryBuildHere(v.i.Position.Round().WithOffset(1, 0));
}
else
if (v.Road1)
{
if (0.5.ByChance())
TryBuildHere(v.i.Position.Round().WithOffset(0, -1));
else
TryBuildHere(v.i.Position.Round().WithOffset(0, 1));
}
},
3000, 20000
).Stop;
//toolbar_btn_city.RaiseClicked
};
#endregion
toolbar_btn_city.RaiseClicked();
#region grass growth
1500.AtInterval(
t =>
{
if (paused)
return;
//"got dirt?".ToConsole();
#region KnownDirtTileElements
foreach (var v in KnownDirtTileElements.ToArray())
{
new { v.DirtAge, v.Position.X, v.Position.Y }.ToConsole();
if (v.DirtAge > 5)
{
v.RemoveFrom(KnownDirtTileElements);
}
#region House1a building animation
if (v.Source == TileResources.House1a.Source)
if (v.DirtAge > 3)
{
new IHTMLAudio[]
{
Hammertime,
Sawtime,
StoneHammerTime
}.Random().With(
snd =>
{
snd.play();
Hammertime = new SAMPLES234 { volume = 0.1 };
Sawtime = new SAMPLES216 { volume = 0.1 };
StoneHammerTime = new SAMPLES233 { volume = 0.1 };
}
);
RemoveAllTilesAt(v.Position);
AddTileElement(v.Position,
TileResources.House1b.Source,
TileResources.House1b.Height
)
.AddTo(KnownDirtTileElements);
}
if (v.Source == TileResources.House1b.Source)
if (v.DirtAge > 3)
{
new IHTMLAudio[]
{
Hammertime,
Sawtime,
StoneHammerTime
}.Random().With(
snd =>
{
snd.play();
Hammertime = new SAMPLES234 { volume = 0.1 };
Sawtime = new SAMPLES216 { volume = 0.1 };
StoneHammerTime = new SAMPLES233 { volume = 0.1 };
}
);
RemoveAllTilesAt(v.Position);
AddTileElement(v.Position,
TileResources.House1x.Source,
TileResources.House1x.Height
)
.AddTo(KnownDirtTileElements);
}
#endregion
#region make that dirt grow into grass over time
if (v.Source == TileResources.Dirt.Source)
{
if (v.DirtAge == -200)
{
RemoveAllTilesAt(v.Position);
var NewHouse = new[]
{
TileResources.House1a,
//TileResources.House2,
//TileResources.House3,
//TileResources.House4,
//TileResources.House5a,
//TileResources.House5a
}.Random();
AddTileElement(v.Position,
NewHouse.Source,
NewHouse.Height
)
.AddTo(KnownDirtTileElements);
}
if (v.DirtAge > 3)
{
RemoveAllTilesAt(v.Position);
v.RemoveFrom(KnownDirtTileElements);
AddTileElement(v.Position, TileResources.Grass.Source, TileResources.Grass.Height)
.AddTo(KnownDirtTileElements);
}
}
#endregion
v.DirtAge++;
}
#endregion
}
);
#endregion
// wont work correctly on IE
//Native.Window.onblur +=
// delegate
// {
// if (!toolbar_btn_pause.IsActivated)
// toolbar_btn_pause.RaiseClicked();
// };
Console.WriteLine("ready!");
info.innerHTML = "LBA Redux";
if (!paused)
PauseFogTween.Value = 0;
toolbar.Buttons.WithEach(
btn =>
{
btn.Clicked +=
delegate
{
click.play();
click = new click(); ;
};
}
);
arena.Layers.User.oncontextmenu +=
e =>
{
e.preventDefault();
};
yield(this);
});
};
#endregion
StartLoadingDudeAnimationInfo(MyFrames_Soldier);
StartLoadingDudeAnimationInfo(MyFrames_Imp);
StartLoadingDudeAnimationInfo(MyFrames_TwinClone);
TileResourcesList.ForEach(i => StartLoadingSingleImage(i.Source));
new Timer(
t =>
{
info.innerHTML = ImagesThatAreCurrentlyLoadingCounter + " of " + ImagesThatAreCurrentlyLoading.Count;
if (ImagesThatAreCurrentlyLoading.Count == ImagesThatAreCurrentlyLoadingCounter)
{
t.Stop();
AllImagesLoaded();
}
}
).StartInterval(1);
}
private void RenderWriteHistory(Dictionary<SolutionFileTextFragment, Color> Lookup, SolutionFile f, IHTMLElement Container)
{
Func<SolutionFileTextFragment, Color> LookupOrDefault =
ff =>
{
if (this.Colors.ContainsKey(ff))
return this.Colors[ff];
return this.Colors[SolutionFileTextFragment.None];
};
var Content = new IHTMLDiv().AttachTo(Container);
Content.style.position = IStyle.PositionEnum.relative;
var ViewBackground = new IHTMLDiv().AttachTo(Content);
ViewBackground.style.position = IStyle.PositionEnum.absolute;
ViewBackground.style.left = "0px";
ViewBackground.style.top = "0px";
ViewBackground.style.width = "4em";
ViewBackground.style.borderRight = "1px dotted gray";
ViewBackground.style.paddingRight = "0.5em";
var ViewTrap = new IHTMLDiv().AttachTo(Content);
ViewTrap.style.position = IStyle.PositionEnum.absolute;
ViewTrap.style.left = "0px";
ViewTrap.style.top = "0px";
ViewTrap.style.right = "0px";
ViewTrap.style.bottom = "0px";
//ViewTrap.style.backgroundColor = Color.White;
var ViewTrapContainer = new IHTMLDiv().AttachTo(ViewTrap);
ViewTrapContainer.style.cursor = IStyle.CursorEnum.text;
ViewTrapContainer.style.position = IStyle.PositionEnum.relative;
ViewTrapContainer.style.paddingLeft = "5em";
var View = new IHTMLDiv().AttachTo(ViewTrapContainer);
var ContentHeightDummy = new IHTMLDiv().AttachTo(Content);
var RegionStack = new Stack<List<Action<bool>>>();
var RegionGlobal = new List<Action<bool>>();
RegionStack.Push(RegionGlobal);
var Lines = new List<IHTMLDiv>();
var CurrentLineDirty = false;
var CurrentLine = default(IHTMLDiv);
var CurrentLineContent = default(IHTMLDiv);
Action NextLine = delegate
{
CurrentLineDirty = false;
var c = new IHTMLDiv();
var cc = new IHTMLDiv();
var cb = new IHTMLDiv();
CurrentLine = c.AttachTo(View);
CurrentLineContent = cc.AttachTo(c);
var CurrentRegion = RegionStack.Peek();
RegionStack.WithEach(
k =>
{
k.Add(
IsActive =>
{
// should we react when in a global region
if (k == RegionGlobal)
return;
if (IsActive)
{
cc.style.backgroundColor = Color.FromGray(0xf9);
cb.style.backgroundColor = Color.FromGray(0xf9);
}
else
{
cc.style.backgroundColor = Color.None;
cb.style.backgroundColor = Color.None;
}
}
);
}
);
CurrentLine.onmouseover +=
delegate
{
CurrentRegion.Invoke(true);
cc.style.backgroundColor = Color.FromGray(0xf0);
cb.style.backgroundColor = Color.FromGray(0xf0);
};
CurrentLine.onmouseout +=
delegate
{
CurrentRegion.Invoke(false);
cc.style.backgroundColor = Color.None;
cb.style.backgroundColor = Color.None;
};
Lines.Add(CurrentLine);
//CurrentLineContent.style.marginLeft = "5em";
var BCurrentLine = cb.AttachTo(ViewBackground);
BCurrentLine.style.textAlign = IStyle.TextAlignEnum.right;
var span = new IHTMLCode { innerText = "" + Lines.Count };
span.style.color = Lookup[SolutionFileTextFragment.Type];
span.AttachTo(BCurrentLine);
//Content.style.height = Lines.Count + "em";
new IHTMLDiv { new IHTMLCode { innerText = Environment.NewLine } }.AttachTo(ContentHeightDummy);
};
foreach (var item in f.WriteHistory.ToArray())
{
if (item is SolutionFileWriteArguments.BeginRegion)
{
RegionStack.Push(new List<Action<bool>>());
}
if (item is SolutionFileWriteArguments.EndRegion)
{
RegionStack.Pop();
}
if (CurrentLine == null)
NextLine();
var innerText = item.Text;
innerText = innerText.TakeUntilLastIfAny(Environment.NewLine);
if (!string.IsNullOrEmpty(innerText))
{
var span = new IHTMLCode { innerText = innerText };
if (item.Fragment == SolutionFileTextFragment.Indent)
{
span.style.width = "2em";
span.style.display = IStyle.DisplayEnum.inline_block;
if (CurrentLineDirty)
span.style.borderLeft = "1px dotted #afafaf";
}
span.style.color = LookupOrDefault(item.Fragment);
CurrentLineDirty = true;
span.AttachTo(CurrentLineContent);
if (item.Tag != null)
{
span.style.cursor = ScriptCoreLib.JavaScript.DOM.IStyle.CursorEnum.pointer;
span.onmouseover +=
delegate
{
span.style.textDecoration = "underline";
};
span.onmouseout +=
delegate
{
span.style.textDecoration = "";
};
var Type = item.Tag as SolutionProjectLanguageType;
if (Type != null)
{
span.title = Type.FullName;
}
var Method = item.Tag as SolutionProjectLanguageMethod;
if (Method != null)
{
span.title = Method.Name;
}
var Uri = item.Tag as Uri;
if (Uri != null)
{
var a = new IHTMLAnchor();
a.style.color = LookupOrDefault(item.Fragment);
a.href = Uri.ToString();
a.target = "_blank";
a.Add(span);
a.AttachTo(CurrentLineContent);
a.onclick +=
e =>
{
// https://sites.google.com/a/jsc-solutions.net/backlog/knowledge-base/2015/201511/20151103
e.preventDefault();
if (LinkCommentClick != null)
LinkCommentClick(Uri);
};
}
}
}
if (item.Text.EndsWith(Environment.NewLine))
{
if (!CurrentLineDirty)
{
var span = new IHTMLCode { innerText = " " };
span.AttachTo(CurrentLineContent);
}
CurrentLine = null;
}
}
}
private static TreeNode ApplyLocalName(TreeNode t, XElement cc)
{
t.IsExpanded = true;
t.Element.TextArea.Clear();
var c = new IHTMLCode();
t.Element.TextArea.Add(c);
t.Element.ButtonArea.Hide();
t.Element.IconArea.Hide();
Action<string, JSColor> Write =
(Text, Color) =>
{
var cs = new IHTMLSpan { innerText = Text };
cs.style.color = Color;
cs.AttachTo(c);
};
Write("<", JSColor.Blue);
Write(cc.Name.LocalName, JSColor.FromRGB(0xa0, 0, 0));
foreach (var item in cc.Attributes().ToArray())
{
Write(" ", JSColor.None);
Write("foo", JSColor.Red);
Write("='", JSColor.Blue);
Write(item.Value, JSColor.Blue);
Write("'", JSColor.Blue);
}
if (!cc.Elements().Any())
{
Write(">", JSColor.Blue);
Write(cc.Value, JSColor.None);
Write("</", JSColor.Blue);
Write(cc.Name.LocalName, JSColor.FromRGB(0xa0, 0, 0));
Write(">", JSColor.Blue);
}
else
{
Write("/>", JSColor.Blue);
}
return t;
}
private void AddType(IHTMLDiv parent, CompilationType type, Action<string> UpdateLocation)
{
var div = new IHTMLDiv().AttachTo(parent);
div.style.marginTop = "0.1em";
div.style.fontFamily = ScriptCoreLib.JavaScript.DOM.IStyle.FontFamilyEnum.Verdana;
div.style.whiteSpace = ScriptCoreLib.JavaScript.DOM.IStyle.WhiteSpaceEnum.nowrap;
var i = default(IHTMLImage);
if (type.IsInterface)
{
i = new PublicInterface();
}
else
{
i = new PublicClass();
}
i.AttachTo(div);
i.style.verticalAlign = "middle";
i.style.marginRight = "0.5em";
var s = new IHTMLAnchor { innerText = type.Name, title = "" + type.MetadataToken }.AttachTo(div);
if (!string.IsNullOrEmpty(type.HTMLElement))
{
var c = new IHTMLCode();
Action<string, JSColor> Write =
(Text, Color) =>
{
var cs = new IHTMLSpan { innerText = Text };
cs.style.color = Color;
cs.AttachTo(c);
};
Write("<", JSColor.Blue);
Write(type.HTMLElement, JSColor.FromRGB(0xa0, 0, 0));
Write("/>", JSColor.Blue);
//c.style.marginLeft = "1em";
c.style.Float = ScriptCoreLib.JavaScript.DOM.IStyle.FloatEnum.right;
c.AttachTo(s);
}
s.href = "#";
s.style.textDecoration = "none";
s.style.color = JSColor.System.WindowText;
Action onclick = delegate
{
};
s.onclick +=
e =>
{
e.PreventDefault();
s.focus();
if (TouchTypeSelected != null)
TouchTypeSelected(type);
UpdateLocation(type.FullName + " - " + type.Summary + " - HTML:" + type.HTMLElement);
onclick();
};
s.onfocus +=
delegate
{
s.style.backgroundColor = JSColor.System.Highlight;
s.style.color = JSColor.System.HighlightText;
};
s.onblur +=
delegate
{
s.style.backgroundColor = JSColor.None;
s.style.color = JSColor.System.WindowText;
};
onclick =
delegate
{
var children = new IHTMLDiv().AttachTo(div);
children.style.paddingLeft = "1em";
Func<IHTMLDiv> Group = () => new IHTMLDiv().AttachTo(children);
var Groups = new
{
Nested = Group(),
Constructors = Group(),
Methods = Group(),
Events = Group(),
Fields = Group(),
Properties = Group(),
};
type.GetNestedTypes().ForEach(
(Current, Next) =>
{
AddType(Groups.Nested, Current, UpdateLocation);
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
);
type.GetConstructors().ForEach(
(Current, Next) =>
{
AddTypeConstructor(Groups.Constructors, Current, UpdateLocation);
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
);
var HiddenMethods = new List<int>();
Action<CompilationMethod> AddIfAny =
SourceMethod =>
{
if (SourceMethod == null)
return;
HiddenMethods.Add(SourceMethod.MetadataToken);
};
Action AfterEvents = delegate
{
type.GetMethods().ForEach(
(Current, Next) =>
{
if (!HiddenMethods.Contains(Current.MetadataToken))
{
AddTypeMethod(Groups.Methods, Current, UpdateLocation);
}
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
);
};
Action AfterProperties = delegate
{
type.GetEvents().ForEach(
(Current, Next) =>
{
AddIfAny(Current.GetAddMethod());
AddIfAny(Current.GetRemoveMethod());
AddTypeEvent(Groups.Events, Current, UpdateLocation);
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
)(AfterEvents);
};
type.GetProperties().ForEach(
(Current, Next) =>
{
AddIfAny(Current.GetSetMethod());
AddIfAny(Current.GetGetMethod());
AddTypeProperty(Groups.Properties, Current, UpdateLocation);
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
)(AfterProperties);
type.GetFields().ForEach(
(Current, Next) =>
{
AddTypeField(Groups.Fields, Current, UpdateLocation);
ScriptCoreLib.Shared.Avalon.Extensions.AvalonSharedExtensions.AtDelay(
50,
Next
);
}
);
var NextClickHide = default(Action);
var NextClickShow = default(Action);
NextClickHide =
delegate
{
children.Hide();
onclick = NextClickShow;
};
NextClickShow =
delegate
{
children.Show();
onclick = NextClickHide;
};
onclick = NextClickHide;
};
}
