diff --git a/QRPGLESRC/Rules.mk b/QRPGLESRC/Rules.mk
index 5b98d87..2808036 100644
--- a/QRPGLESRC/Rules.mk
+++ b/QRPGLESRC/Rules.mk
@@ -31,3 +31,6 @@ PRO202.MODULE: PRO202.SQLRPGLE
 PRO300.MODULE: PRO300.RPGLE PROVIDE1.FILE
 XML001.MODULE: XML001.RPGLE QPROTOSRC/XML.RPGLEINC QPROTOSRC/txt.rpgleinc
 TXT001.MODULE: TXT001.RPGLE
+
+SI\#MPL.PGM: SI\#MPL.RPGLE
+SI$MPL.PGM: SI$MPL.RPGLE
\ No newline at end of file
diff --git a/QRPGLESRC/SI#MPL.RPGLE b/QRPGLESRC/SI#MPL.RPGLE
new file mode 100644
index 0000000..bd44607
--- /dev/null
+++ b/QRPGLESRC/SI#MPL.RPGLE
@@ -0,0 +1,9 @@
+**free
+
+dcl-s i int(10);
+
+for i = 1 to 5;
+    dsply ('Number: ' + %char(i));
+endfor;
+
+*inlr = *on;
\ No newline at end of file
diff --git a/QRPGLESRC/SI$MPL.RPGLE b/QRPGLESRC/SI$MPL.RPGLE
new file mode 100644
index 0000000..e9fe73e
--- /dev/null
+++ b/QRPGLESRC/SI$MPL.RPGLE
@@ -0,0 +1,14 @@
+**free
+
+dcl-s num1 int(10);
+dcl-s num2 int(10);
+dcl-s result int(10);
+
+num1 = 5;
+num2 = 6;
+
+result = num1 * num2;
+
+dsply ('Result: ' + %char(result));
+
+*inlr = *on;
\ No newline at end of file