Intial Commit. First Release

RouterOS_File_Screening.rsc

@@ -0,0 +1,2 @@
+:global n [file get value-name=name number=2]
+:if ($n ~ ".txt") do={/file remove $n} else={:put "No"}

RouterOS_LCD_Change.rsc

@@ -0,0 +1,27 @@
+# RouterOS Function
+# Copyright (c) Grzegorz Budny 
+# Changes LCD mode based on time schedule 
+
+:global ChangeLcd do={
+
+    :local systemTime [/system clock get value-name=time];
+    :local lcdMode [/lcd get color-scheme];
+
+    :local lightModeStart $lightModeStartTime;
+    :local darkModeStart $darkModeStartTime;
+
+    :if ($systemTime = $lightModeStart && $lcdMode = "dark") do={
+
+        /lcd set color-scheme=light;
+        /log info "..::Changed LCD mode to LIGHT::.."
+    
+    }
+    :if ($systemTime = $darkModeStart && $lcdMode = "light") do={
+
+        /lcd set color-scheme=light;
+        /log info "..::Changed LCD mode to DARK::.."
+
+    }
+}
+
+$ChangeLcd lightModeStartTime="08:00:00" darkModeStartTime="17:00:00";

RouterOS_Low_Disk_Space.rsc

@@ -0,0 +1,21 @@
+# RouterOS Function
+# Copyright (c) Grzegorz Budny 
+# Generates log alert when free disk space reach specified treshhold 
+
+:global LowDiskSpace do={
+
+    :local alertSpace $treshhold;
+    
+    :local freeSpace [/system resource get free-hdd-space];
+    :local totalSpace [/system resource get total-hdd-space];
+
+    :local diskUsage (($freeSpace * 100)/$totalSpace);
+
+    :if ($diskUsage < $treshhold) do={
+
+        /log warning ("Disk space reached ".$treshhold." % treshold. Free disk space is ".$diskUsage."%");
+
+    }
+}
+
+$LowDiskSpace treshhold=free_disk_space_in_%;