Added the Squirrel Programming Language

Author: Undalevein

docs/resources/squirrel-logo-24.png

@@ -0,0 +1,19 @@
+<img src="https://raw.githubusercontent.com/rtoal/polyglot/master/docs/+resources/squirrel-logo-64.png">
+
+# Squirrel Explorations:
+
+Due to a bug with the latest version of Squirrel, you will need to install the Squirrel compiler from a branch of Squirrel 3.2 by downloading the zip file from this [GitHub repo](https://github.com/albertodemichelis/squirrel/tree/f92bc298784ceea459b12e2de33bdff672bfeb83). There, unzip it and follow the instructions in the `COMPILE` file that is in the root folder. Afterwards, copy the path to the bin folder (which is where the executable file is located) and add it to to your environment variables.
+
+If you are sturggling to compile the compiler, you can run Squirrel on [TIO](https://tio.run/#squirrel).
+
+## About Squirrel:
+
+Squirrel is a high-level, imperative, object-oriented scripting language designed to fit within the size, memory bandwith, and real-time requirements for applications, including games. ...
+
+## Squirrel Resources:
+
+Continue your study of Squirrel via:
+
+- [Squirrel GitHub](https://github.com/albertodemichelis/squirrel)
+- [Squirrel Documentation](http://www.squirrel-lang.org/squirreldoc/)
+- [Squirrel Documentation (Dense)](http://www.squirrel-lang.org/doc/squirrel3.html#d0e45)

docs/resources/squirrel-logo-240.png

@@ -0,0 +1,8 @@
+for (local i = 0 ; i < 11 ; i++)
+{
+    local t = (43200 * i + 21600) / 11
+    local h = t / 3600
+    local m = t / 60 % 60
+    local s = t % 60
+    printf("%02d:%02d:%02d\n", h || 12, m, s)
+}

docs/resources/squirrel-logo-64.png

@@ -0,0 +1 @@
+print("Hello, World!\n")

squirrel/README.md

@@ -0,0 +1,28 @@
+function Assert-MatchTests {
+    param (
+        [Parameter(Mandatory = $true, ValueFromPipeline)] $TestResult
+    )
+
+    if ($TestResult) {
+        Write-Error "Output does not match expected results."
+    }
+}
+
+$Error.clear()
+sq "$PSScriptRoot\clockhands.nut" |
+    Compare-Object (Get-Content "$PSScriptRoot\..\test\clockhands_expected") |
+    Assert-MatchTests &&
+sq "$PSScriptRoot\hello.nut" &&
+sq "$PSScriptRoot\triple.nut" |
+    Compare-Object (Get-Content "$PSScriptRoot\..\test\triple_expected") |
+    Assert-MatchTests &&
+ForEach-Object 'foo';
+
+if ($Error -or !$?) { 
+    "*** SQUIRREL TESTS FAILED ***" 
+}
+else { 
+    "SQUIRREL TESTS PASSED" 
+} 
+
+

squirrel/clockhands.nut

@@ -0,0 +1,13 @@
+for (local c = 1; c < 41; c++)
+{
+    for (local b = 1; b < c; b++)
+    {
+        for (local a = 1; a < b; a++)
+        {
+            if (a * a + b * b == c * c)
+            {
+                printf("%d, %d, %d\n", a, b, c)
+            }
+        }
+    }
+}