From 54c9b43bfd9b82caf8c55be9fbb6278f7dc662d3 Mon Sep 17 00:00:00 2001
From: gre-ilya <ilya.grebenyuk.01@mail.ru>
Date: Fri, 4 Jul 2025 10:21:29 +0500
Subject: [PATCH] updated vimrc

---
 .vimrc | 90 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 88 insertions(+), 2 deletions(-)

diff --git a/.vimrc b/.vimrc
index eede72b..e2a9251 100644
--- a/.vimrc
+++ b/.vimrc
@@ -32,8 +32,94 @@ nnoremap <M-n> :NERDTree<CR>
 
 
 "MACROS
-"PASCAL
-:iab fii <Esc>^ifunction <Esc>eli(<Esc>lxea: integer): integer;<CR>
+"PASCAL_BEGIN
+:iab ifi <Esc>^ifunction <Esc>eli(<Esc>lxhea: integer): integer;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab ift <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE): integer;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab ifii <Esc>^ifunction <Esc>eli(<Esc>lxhea: integer,
+                                   \<Esc>ea: integer): integer;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab iftt <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE,
+                                   \<Esc>ea: TYPE): integer;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+
+:iab tft <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE): TYPE;<CR>
+        \var<CR><ESC>20xi
         \begin<CR>
         \end;<Esc>O<BS>
         
+:iab tftt <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE,<Esc>ea: TYPE): TYPE;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab tfttt <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE,
+                                  \<Esc>ea: TYPE,
+                                  \<Esc>ea: TYPE): TYPE;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab tftttt <Esc>^ifunction <Esc>eli(<Esc>lxhea: TYPE,
+                                  \<Esc>ea: TYPE,
+                                  \<Esc>ea: TYPE,
+                                  \<Esc>ea: TYPE): TYPE;<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab pi <Esc>^iprocedure <Esc>eli(<Esc>lxhea: integer);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab pt <Esc>^iprocedure <Esc>eli(<Esc>lxhea: TYPE);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab ptt <Esc>^iprocedure <Esc>eli(<Esc>lxhea: TYPE,
+                                   \<Esc>ea: TYPE);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab pttt <Esc>^iprocedure <Esc>eli(<Esc>lxhea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab ptttt <Esc>^iprocedure <Esc>eli(<Esc>lxhea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+:iab pttttt <Esc>^iprocedure <Esc>eli(<Esc>lxhea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE,
+                                   \<Esc>ea: TYPE);<CR>
+        \var<CR><ESC>20xi
+        \begin<CR>
+        \end;<Esc>O<BS>
+
+"PASCAL_END
+