public void IOLibraryTest()
{
var ioTestString = @"
(0:0) when the script starts,
(5:100) set variable %file to {test.txt}.
(5:102) print {%file} to the console.
(0:0) when the script starts,
(1:200) and the file {%file} exist,
(5:202) delete file {%file}.
(5:203) create file {%file}.
(0:0) when the script starts,
(1:200) and the file {%file} exists,
(1:203) and the file {%file} can be written to,
(5:200) append {Hello World from Monkeyspeak!} to file {%file}.
(0:0) when the script starts,
(5:150) take variable %test and add 2 to it.
(5:102) print {%test} to the console.
";
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
Monkeyspeak.Page page = engine.LoadFromString(ioTestString);
page.Error += DebugAllErrors;
page.LoadSysLibrary();
page.LoadIOLibrary();
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Cause, 0, HandleAllCauses);
page.Execute(0);
}
public void DurabilityParseTest()
{
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
// Set the trigger limit to int.MaxValue to prevent TriggerLimit
// reached exceptions
engine.Options.TriggerLimit = int.MaxValue;
var bigScript = testScript;
for (int i = 0; i <= 6000; i++)
{
bigScript += testScript + "\n";
}
Monkeyspeak.Page page = engine.LoadFromString(bigScript);
page.Error += DebugAllErrors;
page.LoadSysLibrary();
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Cause, 0, HandleAllCauses);
Console.WriteLine("Page Trigger Count: " + page.Size);
//page.Execute(Monkeyspeak.TriggerCategory.Cause, 0);
}
public void TestLoadCompiledFile(string FileName)
{
Monkeyspeak.MonkeyspeakEngine engine = new Monkeyspeak.MonkeyspeakEngine();
engine.Options.TriggerLimit = int.MaxValue;
Monkeyspeak.Page page = engine.LoadCompiledFile(FileName);
page.LoadSysLibrary();
page.LoadIOLibrary();
page.LoadMathLibrary();
page.LoadTimerLibrary();
page.Execute(0);
Console.WriteLine("Page Trigger Count: " + page.Size);
}
public void GetTriggerDescriptionsTest()
{
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
Monkeyspeak.Page page = engine.LoadFromString("");
page.Error += DebugAllErrors;
page.LoadSysLibrary();
page.LoadIOLibrary();
page.LoadMathLibrary();
page.LoadTimerLibrary();
foreach (string desc in page.GetTriggerDescriptions())
{
Console.WriteLine(desc);
}
}
public async Task ErrorTriggerTest()
{
var errorTestScript = @"
(0:0) when the script starts,
(5:102) print {This is a test of the new error system} to the console.
(5:105) raise an error.
(5:102) print {This will NOT be displayed because an error was raised} to the console.
";
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
Monkeyspeak.Page page = engine.LoadFromString(errorTestScript);
page.Error += DebugAllErrors;
page.LoadSysLibrary();
//Throws MonkeySpeak.Exception
await Task.Run(() => page.ExecuteAsync(0));
}
public void DemoTest()
{
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
Monkeyspeak.Page page = engine.LoadFromString(testScript);
page.Error += DebugAllErrors;
List <Monkeyspeak.Trigger> triggers = new List <Monkeyspeak.Trigger>();
page.LoadSysLibrary();
Monkeyspeak.IVariable var = page.SetVariable("%testVariable", "Hello WOrld", true);
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Cause, 0, HandleAllCauses);
// Trigger count created by subscribing to TriggerAdded event
// and putting triggers into a list.
Console.WriteLine("Trigger Count: " + page.Size);
page.ExecuteAsync(0);
}
public void TimerLibraryTest()
{
var timerLibTestScript = @"
(0:0) when the script starts,
(5:101) set variable %timer to 1.
(5:300) create timer %timer to go off every 2 second(s).
(0:300) when timer %timer goes off,
(5:102) print {Timer %timer went off.} to the console.
";
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine();
Monkeyspeak.Page page = engine.LoadFromString(timerLibTestScript);
page.Error += DebugAllErrors;
page.LoadSysLibrary();
page.LoadTimerLibrary();
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Cause, 0, HandleAllCauses);
page.Execute(0);
System.Threading.Thread.Sleep(4000);
}
public async Task TextCondkitionBlockageAsync()
{
var timerLibTestScript = @"
(0:0) when the script starts,
(5:102) print {Before False} to the console.
(1:6666) return false,
(5:102) print {After False} to the console.
(0:300) when timer %timer goes off,
(5:102) print {Timer %timer went off.} to the console.
";
Monkeyspeak.MonkeyspeakEngine engine = GetMonkeySpeakEngine(true);
Monkeyspeak.Page page = engine.LoadFromString(timerLibTestScript);
page.Error += DebugAllErrors;
page.LoadSysLibrary();
page.LoadTimerLibrary();
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Condition, 6666, AlwayFalse);
page.SetTriggerHandler(Monkeyspeak.TriggerCategory.Cause, 0, HandleAllCauses);
int[] ids = { 0 };
await Task.Run(() => page.ExecuteAsync(ids));
}