Initial Commit

RouterOS_Format_Drive.rsc

@@ -0,0 +1,18 @@
+# RouterOS Function
+# Copyright (c) Grzegorz Budny 
+# Formats RouterOS additional drive 
+
+:global FormatDrive do={
+
+    :local driveLabel [/disk get number=$drive label];
+
+    :log warning ("...:::Drive ".$drive." ".$driveLabel." will be formatted!");
+    
+    /disk eject-drive $drive;
+    /disk format-drive $drive file-system=$fileSystem label=$label;
+
+    :log info ("...:::Drive ".$drive." has been formatted to ".$fileSystem." with label ".$label);
+
+}
+
+$FormatDrive drive=0 fileSystem=ext3 label=data; 

RouterOS_R_ARP.rsc

@@ -0,0 +1,20 @@
+# RouterOS Function
+# Copyright (c) Grzegorz Budny 
+# ARP/RARP Function (shortange syntax) 
+
+:global R_ARP do={
+
+    :if ($mode="ARP") do={
+
+        :return [/ip arp print where mac-address=$ip];
+
+    }
+
+    :if ($mode="RARP") do={
+
+        :return [/ip arp print where mac-address=$mac];
+
+    }
+}
+
+$R_ARP mode=mode; 

RouterOS_Substring_Variable.rsc

@@ -0,0 +1,23 @@
+# RouterOS Function
+# Copyright (c) Grzegorz Budny 
+# Substring variable 
+
+:global Subtring do={
+
+    :global substring;
+
+    :if ($findMode=true) do={
+
+        :set $substring [:pick $string [:find $string $signA] [:find $string $signB]];
+        :return $substring; 
+
+    }\
+    else={
+
+        :set $substring [:pick $string $signA $signB];
+        :return $substring;
+
+    }
+}
+
+$Substring findMode=true string="string" signA="A" signB "b";