public JCR6_WAD()
{
MKL.Version("JCR6 - WAD.cs", "19.03.27");
MKL.Lic("JCR6 - WAD.cs", "ZLib License");
name = "Where's All the Data?";
JCR6.FileDrivers["WAD"] = this;
}
static public void Init()
{
InitDone = true;
MKL.Lic("Stach - KittyViewer.cs", "GNU General Public License 3");
MKL.Version("Stach - KittyViewer.cs", "21.03.09");
Debug.WriteLine("Init Kitty Source View Drivers");
KittyHigh.Init();
new KittyBlitzMax();
new KittyHighBASIC();
new KittyHighBlitzBasic();
new KittyHighBrainFuck();
new KittyHighC();
new KittyHighCobra();
new KittyHighCS();
new KittyHighGINI();
new KittyHighGo();
new KittyHighHtml();
new KittyHighINI();
new KittyHighJava();
new KittyHighJavaScript();
new KittyHighJSON();
new KittyHighLua();
new KittyHighNeil();
new KittyHighNIL();
new KittyHighPascal();
new KittyHighPython();
new KittyHighSASKIA();
new KittyHighScyndi();
new KittyHighVB();
new KittyHighWhiteSpace();
new KittyHighXml();
//new KittyNiks();
}
static void Main(string[] args)
{
Source.Hello();
Compile.Hello();
Dirry.InitAltDrives();
Instruction.Init();
MKL.Version("Wendicka Project - WASM_Main.cs", "20.03.01");
MKL.Lic("Wendicka Project - WASM_Main.cs", "GNU General Public License 3");
Console.WriteLine($"Wendicka Assembler {MKL.Newest} - (c) {MKL.CYear(2020)} Jeroen P. Broks\n");
if (args.Length == 0)
{
Console.WriteLine("Usage: WASM [options] <File>");
TrickyDebug.AttachWait();
return;
}
var parse = new FlagParse(args);
parse.CrBool("s", false);
parse.Parse();
Silence = parse.GetBool("s");
foreach (string f in parse.Args)
{
Compile.Go(Dirry.AD(f).Replace("\\", "/"));
}
Console.WriteLine($"\tErrors: {Errors}; Warnings: {Warnings}");
TrickyDebug.AttachWait();
}
static public void Init()
{
//System.Console.WriteLine("DEBUG: ZLIB INIT!!!");
JCR6.CompDrivers["zlib"] = new JCR6_zlib(true);
MKL.Lic("JCR6 - zlib.cs", "ZLib License");
MKL.Version("JCR6 - zlib.cs", "21.03.09");
}
static JCR6()
{
MKL.Version("JCR6 - jcr6.cs", "18.09.30");
MKL.Lic("JCR6 - jcr6.cs", "Mozilla Public License 2.0");
CompDrivers["Store"] = new TJCRCStore();
FileDrivers["JCR6"] = new TJCR6DRIVER();
}
public MainWindow()
{
try {
InitializeComponent();
MKL.Version("Stach - MainWindow.xaml.cs", "22.05.21");
MKL.Lic("Stach - MainWindow.xaml.cs", "GNU General Public License 3");
Title = $"Stach - (c) {MKL.CYear(2020)} Jeroen P. Broks";
ExampleSwap.Text = Core.Config[Platform, "ExampleSwap"];
foreach (string ad in Dirry.AltDriveList)
{
List_System.Items.Add(ad);
}
var startd = Directory.GetCurrentDirectory().Replace('\\', '/');
RegisterEntryFields();
Core.IN_Resource = false;
Core.CDirectory = startd;
UpdateDirBox();
RenewUsed();
RenewFavs();
ViewNothing();
} catch (Exception e) {
#if DEBUG
Confirm.Annoy($"{e}\n\n{e.StackTrace}\n\nI will try to continue, but expect things NOT to go so well!", "Start up error!", System.Windows.Forms.MessageBoxIcon.Error);
#else
Confirm.Annoy($"{e.Message}\n\nI will try to continue, but expect things NOT to go so well!", "Start up error!", System.Windows.Forms.MessageBoxIcon.Error);
#endif
} finally {
AutoConfigUpdate = true;
}
}
internal static void Init()
{
MKL.Lic("Wendicka Project - Instruction.cs", "GNU General Public License 3");
MKL.Version("Wendicka Project - Instruction.cs", "20.03.09");
Set("end", new Instruction(0, delegate(Source.Line l) { return(l.Parameters.Length == 0); }));
Set("call", new Instruction(1, delegate(Source.Line l) {
//var ret = true;
var p = l.Parameters;
if (p.Length == 0)
{
WASM_Main.VP("\nNothing to call"); return(false);
}
System.Diagnostics.Debug.WriteLine($"Checking call! Total parameters {p.Length}");
if (p[0].Kind != Source.DataKind.API && p[0].Kind != Source.DataKind.Chunk && p[0].Kind != Source.DataKind.GlobalVar && p[0].Kind != Source.DataKind.LocalVar)
{
WASM_Main.Error($"Uncallable call: {p[0].Kind}"); return(false);
}
return(true);
}));
Set("invoke", new Instruction(2, Get("call").Check));
Set("defer", new Instruction(3, Get("call").Check));
Set("resume", new Instruction(4, delegate { throw new Exception("resume after yield not yet implemented"); }));
Set("return", new Instruction(5));
Set("yield", new Instruction(6));
}
public JCR_a()
{
MKL.Version("JCR6 - a.cs", "20.01.20");
MKL.Lic("JCR6 - a.cs", "ZLib License");
JCR6.FileDrivers["AR"] = this;
JCR6.FileDrivers["AR"].name = "The Archiver";
}
static void Init()
{
MKL.Lic("NJCR - NJCR.cs", "GNU General Public License 3");
MKL.Version("NJCR - NJCR.cs", "21.03.09");
JCR6_lzma.Init();
JCR6_zlib.Init();
JCR6_jxsrcca.Init();
JCR_JCR5.Init();
JCR6_JXSDA.Init();
new JCR6_WAD();
new JCR_QuakePack();
new JCR_a();
new JCR_QuickLink();
new JCR_WestwoodPAK();
Dirry.InitAltDrives();
Register("ADD", new F_Add());
Register("DELETE", new F_Delete());
Register("EXTRACT", new F_Extract());
Register("TYPE", new F_Type());
Register("HEX", new F_HEX());
{
var V = new F_Verbose();
Register("VIEW", V);
Register("LIST", V);
Register("VERBOSE", V);
}
Register("SHOW", new F_Show());
Register("SCRIPT", new F_Script());
Register("SUPPORT", new F_Support());
//Register("QUHELP", new F_QU_Help());
QCol.DoingTab = 20;
}
public JCR_QuakePack()
{
MKL.Version("JCR6 - QuakePAK.cs", "19.03.27");
MKL.Lic("JCR6 - QuakePAK.cs", "ZLib License");
JCR6.FileDrivers["Quake PAK"] = this;
name = "Quake PAK";
}
public static void Init()
{
MKL.Lic("Development Log - GUI.cs", "GNU General Public License 3");
MKL.Version("Development Log - GUI.cs", "21.08.28");
Application.Init();
win = new MainWindow();
win.ModifyBg(StateType.Normal, new Gdk.Color(0, 0, 0));
win.SetSizeRequest(1200, 800);
win.Resizable = false;
win.Title = $"Development log - version {MKL.Newest} - Coded by: Tricky";
Tabber = new Notebook(); Tabber.SetSizeRequest(1000, 770);
Tabber.ModifyBg(StateType.Normal, new Gdk.Color(0, 0, 20));
Console = new TextView();
Console.Editable = false;
Console.ModifyFont(Pango.FontDescription.FromString("Courier 18"));
Console.SizeAllocated += new SizeAllocatedHandler(ConsoleDOWN);
Prompt = new Entry();
var overlord = new VBox();
var superior = new HBox();
var sidebar = new VBox(); sidebar.SetSizeRequest(200, 770);
var mainarea = new VBox();
var cscroll = new ScrolledWindow();
var promptbar = new HBox();
InitSidebar(sidebar);
win.Add(overlord);
overlord.Add(superior); superior.SetSizeRequest(1200, 600);
overlord.Add(cscroll); cscroll.SetSizeRequest(1200, 170); cscroll.Add(Console);
overlord.Add(promptbar); promptbar.SetSizeRequest(1200, 30); promptbar.Add(Prompt);
var pOk = new Button("Ok");
pOk.SetSizeRequest(50, 30);
pOk.Clicked += AndACTION;
Prompt.Activated += AndACTION;
Prompt.SetSizeRequest(1150, 30);
promptbar.Add(pOk);
Console.ModifyBase(StateType.Normal, new Gdk.Color(0, 20, 0));
Console.ModifyText(StateType.Normal, new Gdk.Color(0, 255, 0));
Prompt.ModifyBase(StateType.Normal, new Gdk.Color(25, 18, 0));
Prompt.ModifyText(StateType.Normal, new Gdk.Color(255, 180, 0));
superior.Add(sidebar);
superior.Add(mainarea);
mainarea.Add(Tabber);
GeneralInit(NewTab("General"));
TagsInit(NewTab("Tags"));
InitEntries(NewTab("Entries"));
InitPrefix(NewTab("AutoPrefix"));
InitHistory(NewTab("Command History"));
WriteLn("Welcome to Devlog!");
WriteLn("Coded by: Tricky");
WriteLn($"(c) 2016-20{qstr.Left(MKL.Newest,2)} Jeroen P. Broks");
WriteLn("Released under the terms of the General Public License v3\n");
AutoEnable();
//#if KEYDEBUG
//WriteLn("KEYDEBUG is set!");
//Prompt.KeyPressEvent += KeyDebug;
//Prompt.KeyPressEvent += StoreProperty;
//#endif
}
static public void Init()
{
//System.Console.WriteLine("DEBUG: ZLIB INIT!!!");
JCR6.CompDrivers["jxsda"] = new JCR6_JXSDA(true);
MKL.Lic("JCR6 - jcr_jxsda.cs", "ZLib License");
MKL.Version("JCR6 - jcr_jxsda.cs", "21.07.05");
//JXSDA.Verbose = true;
}
static void Heading()
{
MKL.Version("QuickNIL - QuickNIL.cs", "19.08.31");
MKL.Lic("QuickNIL - QuickNIL.cs", "GNU General Public License 3");
Console.WriteLine($"QuickNIL v{MKL.Newest}");
Console.WriteLine($"(c) Jeroen P. Broks {MKL.CYear(2019)}");
Console.WriteLine($"Released under the terms of the GPL3\n");
}
public MainWindow()
{
MKL.Version("TeddyBear - MainWindow.xaml.cs", "19.03.16");
MKL.Lic("TeddyBear - MainWindow.xaml.cs", "GNU General Public License 3");
InitializeComponent();
MessageBox.Show("This wizard will create only a very simplistic project. If you want TeddyBear to have more power than this wizard can provide, please seek out the Wiki pages on GitHub on what you all can do", "TeddyWizard");
copyright.Content = $"(c) {MKL.CYear(2019)} Jeroen P. Broks, Licensed under the terms of the GPL3";
}
void Header()
{
MKL.Version("Kthura for C# - KthuraExport.cs", "19.04.24");
MKL.Lic("Kthura for C# - KthuraExport.cs", "GNU General Public License 3");
Red($"Kthura Exporter {MKL.Newest}\t");
Magenta($"Built: {BuildDate.sBuildDate}\n");
Yellow("Coded by: ");
Cyan("Jeroen P. Broks\n\n");
}
public static void Init(bool doit = true)
{
if (doit)
{
MKL.Version("JCR6 - JCR5.cs", "18.09.30");
MKL.Lic("JCR6 - JCR5.cs", "ZLib License");
JCR6.FileDrivers["JCR5"] = new JCR_JCR5();
JCR6.FileDrivers["JCR5"].name = "JCR5";
}
}
static MainClass()
{
MKL.Version("MyData For C# - Main.cs", "21.02.09");
MKL.Lic("MyData For C# - Main.cs", "GNU General Public License 3");
new JCR6_WAD();
new JCR6_lzma();
var rd = new JCR6_RealDir(); rd.automerge = false;
new JCR_QuakePack();
}
static Program()
{
MKL.Lic("Wendicka Project - Program.cs", "GNU General Public License 3");
MKL.Version("Wendicka Project - Program.cs", "20.03.10");
WRT.Hello();
qstr.Hello();
QuickStream.Hello();
GINI.Hello();
FileList.Hello();
GINIE.Hello();
MKL.AllWidth = 60;
}
public static void Main(string[] args)
{
MKL.Version("ScenLang - Creation Wizard - ScenLangCreate.cs", "18.10.23");
MKL.Lic("ScenLang - Creation Wizard - ScenLangCreate.cs", "GNU General Public License 3");
JCR6_lzma.Init();
Application.Init();
MainWindow win = new MainWindow();
win.ModifyBg(StateType.Normal, new Gdk.Color(0, 0, 25));
win.Title = "ScenLang Creator - version " + MKL.Newest;
win.SetSizeRequest(1000, 500);
var mainbox = new HBox(); win.Add(mainbox);
mainbox.SetSizeRequest(400, 500);
var mascot = new Image();
mascot.SetAlignment(0, 1);
mainbox.Add(mascot);
LoadMascot(mascot);
mascot.SetSizeRequest(400, 500);
workbox = new VBox(); mainbox.Add(workbox);
workbox.SetSizeRequest(600, 500);
AddEntry("Project", "Project directory:", true);
AddEntry("Author", "Author:");
AddEntry("License", "License:");
var langbox = new HBox();
langbox.SetSizeRequest(600, 380);
var langlabel = new Label("Laguages:\n(Put every language on a new line)");
langlabel.SetSizeRequest(300, 380);
langlabel.SetAlignment(0, 0);
langlabel.ModifyFg(StateType.Normal, new Gdk.Color(255, 255, 0));
var scroll = new ScrolledWindow();
Languages = new TextView();
scroll.Add(Languages);
scroll.SetSizeRequest(300, 380);
Languages.ModifyBase(StateType.Normal, new Gdk.Color(0, 18, 25));
Languages.ModifyText(StateType.Normal, new Gdk.Color(0, 180, 255));
langbox.Add(langlabel);
langbox.Add(scroll);
workbox.Add(langbox);
var finbox = new HBox();
var goforit = new Button("Create Project");
finbox.Add(new HBox());
finbox.Add(goforit);
goforit.Clicked += OnGoForIt;
workbox.Add(finbox);
win.ShowAll();
Application.Run();
}
static void Main(string[] args)
{
JCR6_lzma.Init();
JCR6_zlib.Init();
MKL_Run.MKL_See();
Extension.VER();
License.VER();
MKL.Lic("MKL Update - Main.cs", "GNU General Public License 3");
MKL.Version("MKL Update - Main.cs", "20.04.28");
#if argdebug
for (int i = 0; i < args.Length; i++)
{
Console.Write(qstr.sprintf("%d:%s", i, args[i]));
}
#endif
MyArgs = new FlagParse(args);
InitArgs();
Head();
string[] dirs;
if (MyArgs.Args.Length == 0)
{
dirs = new string[] { System.IO.Directory.GetCurrentDirectory() }
}
; else
{
dirs = MyArgs.Args;
}
foreach (string q in dirs)
{
Console.Write("Will process: ");
Console.ForegroundColor = ConsoleColor.Magenta;
Console.WriteLine(q);
Console.ResetColor();
}
foreach (string dir in dirs)
{
MKL_Run.Run(dir);
}
#if DEBUG
// Only meant for running in debug mode, as in release mode this doesn't matter.
// Visual Studio closes the window immediately and I may need the last output, you see!
Console.WriteLine("Hit any key");
Console.ReadKey();
#else
Console.ForegroundColor = ConsoleColor.Cyan;
Console.WriteLine("Ok"); // Homage to my old P2000T experiences!
Console.ForegroundColor = ConsoleColor.Gray;
#endif
}
static void Main(string[] args)
{
try {
MKL.Lic("Quick Neil - QuickNeil.cs", "GNU General Public License 3");
MKL.Version("Quick Neil - QuickNeil.cs", "20.08.14");
if (args.Length == 0)
{
Head();
QCol.Cyan("Usage: ");
QCol.Yellow($"{qstr.StripAll(MKL.MyExe)} ");
QCol.Green("<script file> ");
QCol.Magenta("[<arguments>]\n\n");
QCol.White($"{MKL.All()}\n\n");
return;
}
else
{
var addargs = new StringBuilder("{");
for (int i = 1; i < args.Length; i++)
{
if (i >= 2)
{
addargs.Append(", ");
}
var arg = args[i].Replace("\\", "\\\\");
for (int j = 0; j < 256; j++)
{
if (j < 32 || j > 120 || (char)j == '"')
{
arg = arg.Replace($"{(char)j}", $"\\{qstr.Right($"00{j}", 3)}");
}
}
addargs.Append($"\"{arg}\"");
}
addargs.Append("}");
Debug.WriteLine($"DBG:Argument array {addargs}");
//throw new Exception ($"Argument array {addargs}"); // debug only!
LoadScript(args[0], $"{addargs}");
}
} catch (Exception e) {
QCol.QuickError(e.Message);
#if DEBUG
QCol.Cyan("Traceback\n");
QCol.White($"{e.StackTrace}\n");
#endif
} finally {
TrickyDebug.AttachWait();
}
}
void main(string[] args)
{
MKL.Version("TeddyBear - TeddyXPort.cs", "19.04.05");
MKL.Lic("TeddyBear - TeddyXPort.cs", "GNU General Public License 3");
cwrite(ConsoleColor.Yellow, "TeddyBear Exporter ");
cwriteln(ConsoleColor.Cyan, "\tCoded by: Jeroen P. Broks");
cwriteln(ConsoleColor.Magenta, $"(c) {MKL.CYear(2019)} Jeroen P. Broks, Released under the terms of the GPL 3\n");
XPort.init();
JCR6_lzma.Init();
JCR6_zlib.Init();
LoadMainConfig();
SetupProject(args);
CreateTo();
TranslateMaps();
}
private Program(string[] args)
{
fp = new FlagParse(args);
Dirry.InitAltDrives();
MKL.Lic("Alternate Dir - Program.cs", "GNU General Public License 3");
MKL.Version("Alternate Dir - Program.cs", "19.10.27");
fp.CrBool("p", false);
fp.CrBool("all", false);
fp.CrBool("ansi", OnWindows);
fp.CrBool("s", false);
fp.CrBool("w", false);
fp.CrBool("b", false);
fp.CrBool("h", false);
fp.Parse();
}
static Core()
{
MKL.Lic("Stach - Core.cs", "GNU General Public License 3");
MKL.Version("Stach - Core.cs", "21.03.09");
FFS.Hello();
Debug.WriteLine($"Running on {Platform}");
Dirry.InitAltDrives();
Config = GINIE.FromFile($"{Dirry.C("$AppSupport$/Stach.ini")}");
Config.AutoSaveSource = $"{Dirry.C("$AppSupport$/Stach.ini")}";
JCR6_lzma.Init();
JCR6_jxsrcca.Init();
JCR6_zlib.Init();
new JCR_QuakePack();
new JCR_a();
new JCR_QuickLink();
JCR_JCR5.Init();
new JCR6_WAD();
new JCR_WestwoodPAK();
}
public static void Main(string[] args)
{
MKL.Version("Kthuta Quick Project Setup - Program.cs", "18.09.02");
MKL.Lic("Kthuta Quick Project Setup - Program.cs", "ZLib License");
Application.Init();
win = new MainWindow();
win.SetSizeRequest(500, 400);
win.Title = "Quick Kthura Setup Wizard";
InitMainBox();
if (args.Length == 0)
{
Fields["*KTHURA"].Buffer.Text = AppDomain.CurrentDomain.BaseDirectory;
}
else
{
Fields["*KTHURA"].Buffer.Text = args[0];
}
win.ShowAll();
Application.Run();
}
public static void Main(string[] getargs)
{
#if DEBUG
string[] args = { "C", "Test" };
#else
string[] args = getargs;
#endif
Dirry.C("$AppSupport"); // Just forces MKL to be properly set :P
QOpen.Hello();
qstr.Chr(1);
Compile.Hi();
MKL.Lic("DevLog Compiler - DevLogCompiler.cs", "GNU General Public License 3");
MKL.Version("DevLog Compiler - DevLogCompiler.cs", "18.11.17");
Console.WriteLine($"DevLog - version {MKL.Newest}");
Console.WriteLine($"(c) Jeroen P. Broks 2018-20{qstr.Left(MKL.Newest,2)}");
#if DEBUG
Console.WriteLine("\n\nWARNING! This is the debug version!\nAs the name suggests this build should be used for debugging purposes ONLY!\n");
#endif
if (args.Length == 0)
{
Console.WriteLine("\n\n");
Console.WriteLine("DevLogCompiler c <project> - Compiles Project Into Binary form");
//Console.WriteLine("DevLogCompiler d <project> - Decompiles Project From Binary form back to text form");
Console.WriteLine("DevlogCompiler v - Full version information");
return;
}
switch (args[0].ToUpper())
{
case "C": if (args.Length != 2)
{
Console.WriteLine("Invalid command line input!"); return;
}
Compile.Go($"{WorkSpace}/Projects/{args[1]}");
break;
case "V": Console.WriteLine($"\n{MKL.All()}"); break;
default: Console.WriteLine("Unknown command switch"); break;
}
}
public Export()
{
MKL.Version("MyData For C# - export.cs", "21.02.09");
MKL.Lic("MyData For C# - export.cs", "GNU General Public License 3");
}
/// <summary>
/// Call this function to install the jxsrcca driver into JCR6
/// That's all you need to do, as JCR6 will take care of the rest ALL BY ITSELF ;)
/// </summary>
public static void Init()
{
JCR6.CompDrivers["jxsrcca"] = new JCR6_jxsrcca(true);
MKL.Lic("JCR6 - jxsrcca.cs", "ZLib License");
MKL.Version("JCR6 - jxsrcca.cs", "19.03.06");
}
static Field2Gui()
{
MKL.Version("MyData For C# - Field2Gui.cs", "21.02.09");
MKL.Lic("MyData For C# - Field2Gui.cs", "GNU General Public License 3");
}
/// <summary>
/// Does nothing, but can be used to force the MKL values to be properly parsed
/// </summary>
static public void Hello()
{
MKL.Version("Tricky Units for C# - QuickGTK.cs", "19.03.09");
MKL.Lic("Tricky Units for C# - QuickGTK.cs", "ZLib License");
}