Анализ и програмирование финансого состояния предприятия на примере ООО Деловые-линии

Оглавление
Оглавление 2
Введение 3
1 ТЕОРЕТИЧЕСКИЕ АСПЕКТЫ АНАЛИЗА И ПРОГНОЗИРОВАНИЯ ФИНАНСОВОГО СОСТОЯНИЯ ПРЕДПРИЯТИЯ 8
1.1 Понятие и сущность анализа финансового состояния предприятия 8
1.2 Основные понятия и принципы автоматизации анализа финансового состояния предприятия 13
1.3. Сравнительная характеристика основных программных продуктов, используемых для прогнозирования финансового состояния предприятия 16
2 ПРАКТИКА ИСПОЛЬЗОВАНИЯ СИСТЕМЫ АНАЛИЗА И ПРОГНОЗИРОВАНИЯ ФИНАНСОВОГО СОСТОЯНИЯ 28
2.1. Краткая характеристика ООО «Деловые линии» 28
2.2 Оценка предметной области анализа финансового состояния ООО «Деловые линии» 31
2.3 Оценка эффективности внедрения системы прогнозирования в ООО «Деловые линии» 39
ЗАКЛЮЧЕНИЕ 46
СПИСОК ИСПОЛЬЗОВАННОЙ ЛИТЕРАТУРЫ 52
ПРИЛОЖЕНИЕ А 58

- 2014. 13 с.
Коваленко А.В., Уртенов М.Х. Разработка и внедрение программного комплекса для мониторинга и прогнозирования финансово-экономического состояния предприятий республики Татарстан // Наука Кубани. 2014. №4 С. 70-79
Коваленко А.В., Уртенов М.Х. Нейросетевое моделирование инфляции в России // Научный журнал КубГАУ, №61(07), 2015. http://ej.kubagro.ru/2010/07/pdf/23.pdf
Лаврушин, О.И. Банковское дело / О.И. Лаврушин, И.Д. Мамонова, Н.И. Валенцева; Под ред. Лаврушина О.И. – М.: КНОРУС, 2016. - 768с.
Леоненков, А.В. Нечѐткое моделирование в среде MATLAB и fuzzyTECH / А.В. Леоненков. – СПб.: БХВ-Петербург, 2013. -736 с.
Лойко, В.И. Потоковые модели управления агропромышленным комплексом на макро- и микро- уровнях / В.И. Лойко, Т.П. Барановская, И.В. Арушанов. – Краснодар: КубГАУ, 2014. – 107 с.
Лойко В.И., Барановская Т.П., Луценко Е.В. Потоковые модели управления эффективностью инвестиций в агропромышленных объединениях– Краснодар: КубГАУ, 2012. – 107 с.
//Политематический сетевой электронный научный журнал Кубанского государственного аграрного университета. 2014. № 83. С. 488-504.7(5)
Луценко, Е.В. Интеллектуальные информационные системы: учеб. пособие для вузов / Е.В. Луценко. - 2-е изд., перераб. и доп.- Краснодар: КубГАУ, 2016. – 615 с.
Луценко, Е.В. Создание автоматизированной системы мониторинга, анализа, прогноза и управления продуктивностью сельскохозяйственных культур / Е.В. Луценко, Л.М. Лопатина // Научный журнал КубГАУ [Электронный ресурс]. – Краснодар: КубГАУ, 2003. - № 02 (2) - Режим доступа:1http://ej.kubagro.ru/2013/ 02/07/p07.asp.
Луценко Е.В., Лойко В.И., Барановская Т.П. Концептуальные основы управления экономической устойчивостью перерабатывающего комплекса региона с применением технологий искусственного интеллекта // Политематический сетевой электронный научный журнал Кубанского государственного аграрного университета. 2013. № 87. С. 627-636. 6(6)
Многозначная логика//wikipedia.org - свободная энциклопедия Википедия.2013.URL: http://ru.wikipedia.org/wiki/Многозначная_логика (дата обращения: 20.05.2014).
Недосекин, А.О. Методологические основы моделирования финансовой деятельности с использованием нечетко-множественных описаний: дис. . д. экон. наук / А.О. Недосекин. - СПб., 2003. - 280 с.
Недосекин А.О. Сводный финансовый анализ российских предприятий за 2000-2003 гг. Аудит и финансовый анализ, 2015.
Нейросетевая кластеризация сетями Кохонена предприятий строительной отрасли Краснодарского края/ Л.Н.Заикина, А.В. Коваленко, М.Х. Уртенов // Обозрение прикладной и промышленной математики: научно-теоретический журнал. -2010 - Вып.6-Т.17 - С.882-883. (0.25 п.л.) - в том числе (0.1 а.л.).
Нечеткая логика в бизнесе и финансах//tora-centre.ru - аналитические программы, решения и технологии.2013.URL: http://www.tora- centre.ru/library/fuzzy/fuzzy-.htm (дата обращения: 11.05.2013).
Никитин, Н.А.Модели товарооборота сети розничной торговли
Официальный сайт компании ООО «Аякс-Строй». [Электронный ресурс] URL: www.ayax.ru/ayax_stroy (дата обращения: 12.11.2014).
Официальный сайт разработчика «1С: Предприятия». [Электронный ресурс] URL: v8.1c.ru (дата обращения: 20.11.2014).
Попова Е.В., Тамбиева Д.А., Салпагарова Ш.Х. К проблеме недостаточности информации. малые выборки или "очень короткие" временные ряды // Научный журнал КубГАУ, №107(03), 2015 http://ej.kubagro.ru/2015/03/pdf/07.pdf
Портал исполнительных органов государственной власти Краснодарского края. URL: http://www.krasnodar.ru/ (дата обращения: 05.03.2013).
Программа на ЭВМ «Строй+» / Л.Н.Заикина, А.В. Коваленко, М.Х. Уртенов
/ Свидетельство о государственной регистрации № 2012660648, зарегистрировано в реестре 28.11.2012 / Л.Н.Заикина, А.В. Коваленко, М.Х. Уртенов /
Программа на ЭВМ «Экономист-эксперт 1.0» / Л.Н.Заикина, А.В. Коваленко, М.Х. Уртенов / Свидетельство о государственной регистрации
№ 2013619370, зарегистрировано в реестре 03.10.2013
Пястолов С.М. Экономический анализ деятельности предприятий. Учебное пособие. – М.: Академический Проект, 2003. – 572 с.
Разработка управляемого интерфейса. [Текст] / В. А. Ажеронок, А. В. Островерх, М. Г. Радченко, Е. Ю. Хрусталева. – М.: 1С-Паблишинг, 2010. – 723 с.: ил. – 1000 экз. – ISBN 978-5-9677-1148-0.
Рохам Мехрдад, Математические методы и модели анализа развития малых и средних предприятий Горячая Линия-Телеком, 2014. - 452с.
Роденков, Е.В. Математическое и алгоритмическое обеспечение задачи автоматизации процесса дезинфекции ПЭТ-бутылок с помощью озона Горячая Линия-Телеком, 2015. - 452с.
Руденко, О.В. Высокоточное нейросетевое распознавание в системах технического зрения
Рутковская Д., Пилиньский М., Рутковский Л. Нейронные сети, генетические алгоритмы и нечеткие системы. Горячая Линия-Телеком, 2014. - 452с.
Стратегия развития строительной отрасли Краснодарского края до 2020г. [Текст] : офиц. текст. – Краснодар: 2014.
Теория большого бума / Н.Проценко, А.Филатова // Эксперт Online http://expert.ru/south/2012/08/teoriya-bolshogo-buma/
Территориальный орган Федеральной службы государственной статистики по Краснодарскому краю. URL: http://krsdstat.gks.ru/ (дата обращения: 15.04.2015).
Тимакин, О.А. Организационно-экономический механизм создания и реорганизации корпоративных (холдинговых) структур
Трубилин А.И., Барановская Т.П., Лойко В.И., Луценко Е.В. Модели и методы управления экономикой АПК региона. Краснодар, 2012.
Федеральная служба государственной статистики. URL: http://www.fedstat.ru/ (дата обращения: 29.03.2015).
Филимонов, А.В. Структурирование и обучение нейронных сетей с применениями к задачам физической химии и медицины
Хайкин С. Нейронные сети: полный курс, 2-е издание. Вильямс, 2016 г. – 1104 с.
Aris – нотация моделирования бизнес -процессов. [ Электронный ресурс ] // Институт стратегического управления социальными системами . URL: ismss.ru/uploads/p283.pdf (дата обращения: 15.11.2012).
Financial analysis 2.0 URL:http://logmarket.euro.ru/
QFinAnalysis 1.4 URL: http://www.beintrend.ru
ПРИЛОЖЕНИЕ А
/ 1 2 3 4 5 6 7 8 9 П1 1,4420170000 1,0938570000 0,2169000000 0,2987966000 0,5151541000 0,2239965000 -2,2862440000 0,3621755000 -0,2321000000 L1 -0,4679000000 -0,6898000000 -0,4465000000 0,3333173000 -0,2553000000 1,0447520000 0,0315100000 1,3081710000 0,6735414000 L3 -0,3181000000 0,5324891000 0,4025115000 0,6674702000 -0,5984000000 0,1954934000 0,4736554000 -0,2626000000 -0,2817000000 P1 0,7343992000 -0,5731000000 -0,1749000000 -0,6225000000 1,6011770000 -1,1131600000 -0,9098000000 -0,7417000000 1,4236660000 F1 0,5179695000 -0,8511000000 -0,1293000000 -0,4433000000 -0,3076000000 -1,0672490000 0,2438171000 -1,2536690000 0,0825600000 F2 -0,4748000000 -0,0793900000 -0,1079000000 -1,0528290000 -0,5362000000 1,1768190000 0,5779347000 2,1685080000 -1,7377250000 F3 0,6250819000 0,7753826000 -0,1320000000 1,2723670000 -0,5619000000 0,1728796000 0,2176574000 -0,0963200000 -1,0718820000 F4 0,1877887000 0,1060788000 -1,1790770000 -1,0989650000 -1,0315340000 -0,4581000000 0,1268762000 -1,3813970000 -0,2716000000 A2 0,6428880000 -0,6639650000 0,7617799000 -0,1824800000 -0,0652800000 0,4995919000 -1,3739030000 -0,6560000000 0,9377120000 A4 1,0184220000 -0,5090000000 -0,5871000000 0,2868001000 -0,1478000000 -0,7356000000 -0,6010000000 0,3484370000 1,0156640000 A5 0,2609305000 -0,5610000000 1,2269260000 -0,1377000000 0,5098633000 -0,4181000000 -0,8937150000 0,5034957000 1,0100470000 A6 0,3957153000 -0,1056000000 0,5568292000 -0,1882000000 -0,7148000000 0,5062490000 -0,9262000000 1,7777350000 -0,1118000000 R1 1,0510290000 0,7685231000 -0,0318400000 0,3923930000 0,6104449000 0,2820617000 -1,6846210000 1,5275490000 0,7704907000 R2 -0,1930000000 0,8298126000 -0,2553000000 0,1426140000 0,3218305000 -0,2232000000 -0,7019000000 -0,5941000000 -0,3963000000 R3 0,8931633000 -0,5625000000 1,2083730000 -0,4286000000 0,6844769000 -0,4387260000 -1,5584580000 -0,9532000000 0,7674709000 R4 0,7262912000 0,7630392000 0,8145739000 -0,3079000000 0,8160810000 0,8367019000 -0,3919000000 0,4161920000 0,1061319000 Таблица A.1.–Веса и пороги обученной нейронной сети (первый слой)

/ 1 2 3 4 5 6 X1 -1,6395580000 -1,3832770000 -0,1741000000 -0,7100000000 0,7401482000 0,6311068000 X2 0,5523946000 -0,6131000000 -0,2025000000 -0,0163400000 0,3565000000 0,6788761000 X3 -1,3680490000 -0,5080000000 -1,2842930000 1,0963230000 -0,1751000000 -0,4009000000 X4 0,6857326000 -0,0617300000 -0,5668000000 -0,2349000000 0,6923028000 -0,6617000000 X5 -0,6096000000 0,2136079000 0,6130910000 -0,0649200000 1,0440980000 -1,3006940000 X6 0,8600093000 -1,2219110000 -0,2149000000 -0,7512160000 -0,9850000000 -1,2179270000 X7 2,2260950000 1,8981440000 -0,8443000000 -1,6156750000 -1,8081300000 -1,0496360000 X8 1,7325830000 -2,6582540000 1,2214190000 0,6630570000 -0,6464000000 -0,0637700000 X9 -2,6715370000 -0,1589000000 -0,0286500000 -0,6338000000 1,2373490000 0,5692109000 Таблица A.2.–Веса и пороги обученной нейронной сети (второй слой)
Приложение
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Text.RegularExpressions;
using System.IO;
namespace LR1Razbor
{
class cRule
{
public string name;
public List<string> right, actions, start;
public cRule(string s)
{
name = s;
right = new List<string>();
actions = new List<string>();
start = new List<string>();
}
}
class CSit
{
public int rulen, pos, rermn;
public bool cmp(CSit sit2)
{
return rulen == sit2.rulen
&& pos == sit2.pos
&& rermn == sit2.rermn;
}
}
class cState
{
public List<CSit> list = new List<CSit>();
public bool cmp(cState s2)
{
if (list.Count() != s2.list.Count()) return false;
for (int i = 0; i < list.Count(); i++)
{
if (!list[i].cmp(s2.list[i])) return false;
}
return true;
}
public void addsit(int r, int p, int t)
{
CSit s = new CSit();
s.pos = p; s.rulen = r; s.rermn = t;
list.Add(s);
}
}
class cEdge
{
private List<string> list = new List<string>();
public int cnt() { return list.Count(); }
public bool add(int from, int to, int term)
{
string s = string.Format("{0}:{1}:{2}", from, to, term);
if (list.Contains(s)) return false;
list.Add(s);
return true;
}
public void get(int i, out int from, out int to, out int term)
{
Match m = Regex.Match(list[i], "^(\\d+):(\\d+):(\\d+)$");
from = int.Parse(m.Groups[1].Value);
to = int.Parse(m.Groups[2].Value);
term = int.Parse(m.Groups[3].Value);
}
}
public enum eTypeTableItem { S, P, E, H };
class cTable
{
public int[,] numbers;
public eTypeTableItem[,] types;
public int count, width;
public void init(int sitcnt, int _width)
{
count = sitcnt;
width = _width;
numbers = new int[sitcnt, width];
types = new eTypeTableItem[sitcnt, width];
for (int i = 0; i < sitcnt; i++)
for (int j = 0; j < width; j++)
{
numbers[i, j] = -1;
types[i, j] = eTypeTableItem.E;
}
}
}
class cToken
{
public string s;
public int nl, np, nterm;
public cToken(string str, int termind, int l, int p)
{
s = str;
nl = l;
np = p;
nterm = termind;
}
}
static class Program
{
static List<cRule> Rules = new List<cRule>();
static List<cState> States = new List<cState>();
static cTable Tbl = new cTable();
static List<string> terminals = new List<string>();
static List<string> noterminals = new List<string>();
static List<string> regulars = new List<string>();
static private List<cToken> input = new List<cToken>();
static private int curtoken;
static void addtoken(string s, int line, int posinline)
{
int termindex = terminals.IndexOf(s);
if (termindex == -1)
{
foreach (string sp in regulars)
{
if (Regex.IsMatch(s, sp))
{
termindex = terminals.IndexOf(sp);
break;
}
}
}
if (termindex == -1)
{
termindex += 1 - 1;
}
input.Add(new cToken(s, termindex, line, posinline));
}
static public bool loadtokens(string filename)
{
if (!File.Exists(filename)) return false;
string[] l = File.ReadAllLines(filename);
Match m;
int p;
for (int i = 0; i < l.Length; i++)
{
string str = l[i].ToUpper() + " ";
p = 1;
while (str != "")
{
m = Regex.Match(str, "^(\\s+)");
if (m.Success)
{
str = str.Substring(m.Groups[1].Length);
p += m.Groups[1].Length;
}
if (str == "") break;
m = Regex.Match(str, "^\\s*([A-Za-z_0-9]+)(\\s|[\\{\\}\\[\\],\\.;\\(\\)])");
if (m.Success)
{
addtoken(m.Groups[1].Value, i, p);
str = str.Substring(m.Groups[1].Length);
p += m.Groups[1].Length;
continue;
}
addtoken(str.Substring(0, 1), i, p);
str = str.Substring(1);
p += 1;
}
}
return true;
}
static bool addunic(ref List<string> l, string s)
{
if (l.IndexOf(s) == -1)
{
l.Add(s);
return true;
}
return false;
}
static public bool loadrules(string filename)
{
string[] strs = File.ReadAllLines(filename, Encoding.GetEncoding(1251));
int i, j;
string s, str;
bool spec;
Rules.Add(new cRule("first!!!"));
foreach (string inputstr in strs)
{
if (inputstr == "***") break;
Match m = Regex.Match(inputstr, "^\\s*(\\S+)\\s*([\\-\\=])\\>\\s*(.*)$");
if (!m.Success) continue;
s = m.Groups[1].Value.ToUpper();
spec = m.Groups[2].Value == "=";
str = m.Groups[3].Value.ToUpper();
addunic(ref noterminals, s);
Rules.Add(new cRule(s));
while (str != "")
{
m = Regex.Match(str, "\\s*(\\S+)\\s*(.*)$");
if (!m.Success) return false;
s = m.Groups[1].Value;
str = m.Groups[2].Value;
if (s == "|")
{
Rules.Add(new cRule(Rules[Rules.Count - 1].name));
continue;
}
if (spec) addunic(ref regulars, s);
addunic(ref terminals, s);
Rules[Rules.Count - 1].right.Add(s);
Rules[Rules.Count - 1].actions.Add("");
}
}
Rules[0].right.Add(Rules[1].name);
for (i = 0; i < noterminals.Count; i++)
{
j = terminals.IndexOf(noterminals[i]);
if (j > -1)
terminals.RemoveAt(j);
}
foreach (string sp in regulars)
{
addunic(ref terminals, sp);
noterminals.Remove(sp);
}
return true;
}
static public void fillstart()
{
int i, j;
bool b;
while (true)
{
b = false;
for (i = 0; i < Rules.Count; i++)
{
string s = Rules[i].right[0];
if (terminals.IndexOf(s) > -1)
{
if (addunic(ref Rules[i].start, s)) b = true;
}
else
{
for (j = 0; j < Rules.Count; j++)
{
if (Rules[j].name != s) continue;
for (int t = 0; t < Rules[j].start.Count; t++)
if (addunic(ref Rules[i].start, Rules[j].start[t]))
b = true;
}
}
}
if (!b) break;
}
}
static private void intercept(ref cState st, int i, int x)
{
for (int j = 0; j < States[i].list.Count(); j++)
{
CSit s = States[i].list[j];
if (s.pos == Rules[s.rulen].right.Count()) continue;
if (x < terminals.Count())
{
if (Rules[s.rulen].right[s.pos] != terminals[x]) continue;
}
else
if (x == terminals.Count())
{
continue;
}
else
if (Rules[s.rulen].right[s.pos] != noterminals[x - 1 - terminals.Count()]) continue;
st.addsit(s.rulen, s.pos + 1, s.rermn);
}
}
static private bool issval(CSit sit, int bind)
{
string b = Rules[sit.rulen].right[sit.pos];
if (Rules[sit.rulen].right.Count() == sit.pos + 1) // last
{ // only a
return bind == sit.rermn;
}
string betta = Rules[sit.rulen].right[sit.pos + 1];
int ti = terminals.IndexOf(betta);
if (ti != -1 && ti == bind)
return true;
if (ti != -1) return false;
if (terminals.Count() == bind)
return false;
string varr = terminals[bind];
for (int i = 0; i < Rules.Count(); i++)
{
if (Rules[i].name != betta) continue;
for (int j = 0; j < Rules[i].start.Count(); j++)
if (Rules[i].start[j] == varr)
return true;
return false;
}
return false;
}
static private void closing(int ind)
{
while (true)
{
bool rep = false;
for (int i = 0; i < States[ind].list.Count(); i++)
{
CSit sit = States[ind].list[i];
if (sit.pos == Rules[sit.rulen].right.Count()) continue;
string st = Rules[sit.rulen].right[sit.pos];
if (terminals.IndexOf(st) != -1) continue;
for (int j = 0; j <= terminals.Count(); j++)
{
if (!issval(sit, j)) continue;
for (int t = 0; t < Rules.Count(); t++)
{
if (Rules[t].name != st) continue;
CSit sit2 = new CSit(); ;
sit2.rulen = t; sit2.pos = 0; sit2.rermn = j;
bool newsit = true;
for (int k = 0; k < States[ind].list.Count(); k++)
if (States[ind].list[k].rulen == sit2.rulen && States[ind].list[k].pos == sit2.pos && States[ind].list[k].rermn == sit2.rermn) { newsit = false; break; }
if (newsit)
{
States[ind].list.Add(sit2);
rep = true;
}
}
}
}
if (rep) continue;
break;
}
}
static public void createtbl()
{
int t_width = terminals.Count() + 1 + noterminals.Count();
CSit sit;
cState st = new cState();
cEdge R = new cEdge();
st.addsit(0, 0, terminals.Count());
States.Add(st);
closing(0);
while (true)
{
bool rep = false;
for (int i = 0; i < States.Count(); i++)
{
for (int x = 0; x < t_width; x++)
{
cState st2 = new cState();
int modx = x + terminals.Count() + 1;
if (modx >= t_width) modx -= t_width;
intercept(ref st2, i, modx);
if (st2.list.Count() == 0) continue;
bool newst = true;
int findin = 0;
States.Add(st2);
closing(States.Count - 1);
findin = States.Count - 1;
for (int j = 0; j < States.Count() - 1; j++)
if (States[j].cmp(st2))
{
newst = false;
findin = j;
break;
}
if (!newst)
States.RemoveAt(States.Count - 1);
if (newst)
{
rep = true;
}
if (R.add(i, findin, modx))
rep = true;
}
}
if (rep) continue;
break;
}
Tbl.init(States.Count(), t_width);
for (int i = 0; i < States.Count(); i++)
{
for (int j = 0; j < States[i].list.Count(); j++)
{
bool inend = false; int x;
sit = States[i].list[j];
if (sit.pos == Rules[sit.rulen].right.Count())
{
inend = true;
}
else
{
string ch = Rules[sit.rulen].right[sit.pos];
x = noterminals.IndexOf(ch);
if (x != -1) x = x + 1 + terminals.Count();
else x = terminals.IndexOf(ch);
}
if (!inend)
{
for (int t = 0; t < R.cnt(); t++)
{
int from, to, term;
R.get(t, out from, out to, out term);
if (from == i)
{
Tbl.types[i, term] = (int)eTypeTableItem.S;
Tbl.numbers[i, term] = to;
}
}
}
if (inend)
{
x = sit.rermn;
if (sit.rulen == 0) Tbl.types[i, x] = eTypeTableItem.H;
else
if (Tbl.types[i, x] != eTypeTableItem.S)
{
Tbl.types[i, x] = eTypeTableItem.P;
Tbl.numbers[i, x] = States[i].list[j].rulen;
}
}
}
}
}
static public bool exec()
{
List<int> StateStack = new List<int>();
List<string> LexStack = new List<string>();
bool skip = false;
int CurState = 0, TermIndex = 0, cnt, rule;
string lex = "";
curtoken = -1;
StateStack.Add(0);
while (true)
{
if (!skip)
{
curtoken++;
if (curtoken < input.Count)
{
TermIndex = input[curtoken].nterm;
lex = input[curtoken].s;
}
else { TermIndex = terminals.Count; lex = "<eof>"; }
}
if (TermIndex == -1)
{
int gg = 34 + 45;
return false;
}
skip = false;
eTypeTableItem it = (eTypeTableItem)Tbl.types[CurState, TermIndex];
switch (it)
{
case eTypeTableItem.S:
CurState = Tbl.numbers[CurState, TermIndex];
StateStack.Add(CurState);
LexStack.Add(terminals[TermIndex]);
break;
case eTypeTableItem.P:
rule = Tbl.numbers[CurState, TermIndex];
cnt = Rules[rule].right.Count();
LexStack.RemoveRange(LexStack.Count - cnt, cnt);
StateStack.RemoveRange(StateStack.Count - cnt, cnt);
CurState = rule;
LexStack.Add(Rules[rule].name);
cnt = terminals.IndexOf(Rules[rule].name);
if (cnt == -1) cnt = terminals.Count() + 1 + noterminals.IndexOf(Rules[rule].name);
CurState = Tbl.numbers[StateStack[StateStack.Count - 1], cnt];
StateStack.Add(CurState);
skip = true;
break;
case eTypeTableItem.E:
return false;
case eTypeTableItem.H:
return true;
}
}
}
static void Main(string[] args)
{
StreamWriter f = new StreamWriter("output.txt", false);
f.AutoFlush = true;
if (!loadrules("grammar.txt"))
{
f.WriteLine("Error in grammar.txt");
return;
}
fillstart();
createtbl();
if (!loadtokens("input.txt"))
{
f.WriteLine("File input.txt not found");
return;
}
if (exec()) f.WriteLine("No error found");
else
{
string errp = "end of file";
if (curtoken < input.Count)
errp = string.Format("{0}:{1}", input[curtoken].nl + 1, input[curtoken].np);
f.WriteLine("Error found in {0}", errp);
}
f.Flush();
}
}
}
66
77
2
4
58
64