1 files changed, 8 insertions, 0 deletions
diff --git a/KRI.FOR b/KRI.FOR
new file mode 100644
index 0000000..319d329
--- /dev/null
+++ b/KRI.FOR
@@ -0,0 +1,8 @@
+	SUBROUTINE KRI
+	WRITE(*,10)
+10	FORMAT(1X,'To ni nobena zmaga! S tako majhnim stevilom'/,
+     *  1x,'zvezdic se ne igra.')
+	PAUSE '<ENTER>'
+	RETURN
+	END
+