5.1. ÌÎÄÅËÜ ÈÍÒÅÐÔÅÉÑÀ
5.2. ÑÂßÇÜ ÊÎÌÏÎÍÅÍÒ ÂÎ ÂÐÅÌß ÐÅØÅÍÈß ÇÀÄÀ×È (ÎÁÙÀß ÑÕÅÌÀ)
Åñëè ïðîöåäóðå, ëèáî ôóíêöèè â êà÷åñòâå ïàðàìåòðà ïåðåäàåòñÿ Sender òèïà TObject, òî îí íå ÿâëÿåòñÿ âõîäíûì ïàðàìåòðîì ôóíêöèè, òàê êàê îí ÿâëÿåòñÿ ñòàíäàðòíûì ïàðàìåòðîì, ñãåíåðèðîâàííûì ÿçûêîì Delphi. Âõîäíûå æå ïàðàìåòðû áîëüøåé ÷àñòüþ áåðóòñÿ èç ãëîáàëüíûõ ïåðåìåííûõ, ëèáî èç ïîëåé áàç äàííûõ.
Function Belongs(Value : Integer) : Boolean;
Âõîäíûå äàííûå: Ñèìïòîì; Ïîëå áàçû áîëåçíåé
Âûõîäíûå äàííûå: Ñóùåñòâóåò èëè íåò äàííûé ñèìïòîì ó äàííîé áîëåçíè.
Procedure Find_Pred_Bol;
Âõîäíûå äàííûå: Áàçà ñèìïòîìîâ; Áàçà áîëåçíåé
Âûõîäíûå äàííûå: Ïðåäâàðèòåëüíûé ñïèñîê áîëåçíåé
Procedure TForm2.BitBtn1Click(Sender: TObject);
Âõîäíûå äàííûå: Íîìåð ïðåäûäóùåãî ïðîöåññà; Ñîñòîÿíèå ïîëåé âõîäíîãî ïðîöåññà
Âûõîäíûå äàííûå: Íîìåð ñëåäóþùåãî ïðîöåññà
Procedure TForm2.BitBtn2Click(Sender: TObject);
Âõîäíûå äàííûå: Íîìåð òåêóùåãî ïðîöåññà
Âûõîäíûå äàííûå: Íîìåð ñëåäóþùåãî ïðîöåññà
Procedure TForm2.FormActivate(Sender: TObject);
Âõîäíûå äàííûå: Èäåíòèôèêàòîð ïåðâîãî çàïóñêà
Âûõîäíûå äàííûå: Èíèöèàëèçàöèÿ íåêîòîðûõ ïàðàìåòðîâ
Procedure TForm2.N12Click(Sender: TObject);
Âõîäíûå äàííûå: -
Âûõîäíûå äàííûå: Ñáðîñ ÝÑ è ïðèâåäåíèå åå â «ñòàðòîâîå ïîëîæåíèå»
Procedure TForm2.Timer1Timer(Sender: TObject);
Âõîäíûå äàííûå: Çàïîëíåííûå ïîëÿ ôîðì
Âûõîäíûå äàííûå: Ðàçðåøåíèå/çàïðåùåíèå íà âûïîëíåíèå ñëåäóþùåãî ïðîöåññà
Äëÿ òåñòèðîâàíèÿ ïðîãðàììû áûëè èñïîëüçîâàíû ñòàíäàðòíûå âñòðîåííûå â ïðîãðàììíóþ ñðåäó Borland Delphi, ñðåäñòâà îòëàäêè. Òàêæå â ýêñïåðèìåíòàëüíûõ öåëÿõ áûëî ïðîèçâåäåíî íåñêîëüêî ïðîáíûõ çàïóñêîâ íà áàçå çíàíèé, ñîäåðæàùèõ 7 áîëåçíåé è 15 ñèìïòîìîâ. Âî âñåõ ñëó÷àÿõ ñèñòåìà êîððåêòíî ñòàâèëà äèàãíîç.  äàííûé ìîìåíò ñèñòåìà íàõîäèòñÿ íà ñòàäèè êîìïëåêñíîãî òåñòèðîâàíèÿ. Îêîí÷àòåëüíîãî âàðèàíòà íà äðóãèõ áàçàõ çíàíèé íå ñóùåñòâóåò.
Äëÿ ïðîâåðêè êîððåêòíîñòè âû÷èñëåíèÿ êîíå÷íîãî ðåçóëüòàòà áûë ïðîèçâåäåí ñëåäóþùèé òåñò:
Áûëî ñïåöèàëüíî îòîáðàíî äâå áîëåçíè, èìåþùèå î÷åíü áëèçêèå ñèìïòîìû [6]; ñ öåëüþ ïðîâåðêè êîððåêòíîñòè ñèñòåìû áûë ïðîèçâåäåí çàïóñê ñèñòåìû, íà âõîä êîòîðîé áûëè ïîäàíû èìåííî ýòè ñõîæèå ñèìïòîìû. Ñèñòåìà ïîñëå ñáîðà èíôîðìàöèè î áîëåçíÿõ êîððåêòíî âûÿâèëà çàðàíåå íàìå÷åííóþ áîëåçíü ( êîíå÷íîì èòîãå âåðîÿòíîñòè ýòèõ áîëåçíåé áûëè î÷åíü áëèçêè ïî çíà÷åíèþ).
Ïðèìåð (Âûäåðæêà èç êíèãè [7]):
Êîðü – îñòðîå âèðóñíîå çàáîëåâàíèå. Íà÷èíàåòñÿ îñòðî, ñ ïîäúåìà òåìïåðàòóðû äî 39-40 Ñ, ãîëîâíîé áîëè, íåäîìîãàíèÿ, íàñìîðêà, êàøëÿ, ñëåçîòå÷åíèÿ, ñâåòîáîÿçíè. Íà 2-3 äåíü íà ñëèçèñòîé îáîëî÷êå ùåê, äåñåí ïîÿâëÿþòñÿ ïÿòíà Ôèëàòîâà – Êîïëèêà, íàïîìèíàþùèå ðàññûïàííóþ ìàííóþ êðóïó. Çàòåì ïîÿâëÿåòñÿ ïîëèìîðôíàÿ ñûïü,
ïðîõîäÿùàÿ ïåðèîä ïèãìåíòàöèè è îòðóáåâèäíîãî øåëóøåíèÿ.
Ëå÷åíèå â áîëüøèíñòâå ñëó÷àåâ ïðîâîäÿò â äîìàøíèõ óñëîâèÿõ. Ãîñïèòàëèçàöèè ïîäëåæàò äåòè ñ òÿæåëûìè ôîðìàìè áîëåçíè, ñ îñëîæíåíèÿìè, ïî ýïèäåìèîëîãè÷åñêèì è áûòîâûì ïîêàçàíèÿì (èç îáùåæèòèé, èíòåðíàòîâ). Ïðè âûðàæåííîì êîíúþíêòèâèòå ãëàçà ïðîìûâàþò ðàñòâîðîì áîðíîé êèñëîòû, çàêàïûâàþò àëüáóöèä. Áîëüíîìó íåîáõîäèì ïîñòåëüíûé ðåæèì íà ïðîòÿæåíèè âñåãî ëèõîðàäî÷íîãî ïåðèîäà, óäîáíîå ïîëîæåíèå â ïîñòåëè, ÷òîáû ñâåò íå ïàäàë â ãëàçà.  ïîìåùåíèè ïðîâîäÿò òîëüêî âëàæíóþ óáîðêó, ÷àñòî ïðîâåòðèâàþò êîìíàòó. Ðåãóëÿðíîå óìûâàíèå, ÷èñòîòà ïîëîñòè ðòà, ãëàç, íîñà – íåîáõîäèìûå óñëîâèÿ óõîäà çà áîëüíûì êîðüþ. Ïîêàçàíî îáèëüíî ïèòüå: ñîêè, ÷àé ñ ëèìîíîì, êåôèð è ò.ï.
 äàííîì ñëó÷àå âñå ñèìïòîìû ïåðå÷èñëåíû íàëèöî. Âåñîìûìè ñèìïòîìàìè (èìåþùèìè îòíîñèòåëüíî áîëüøîé âåñ) â äàííîì ñëó÷àå ÿâëÿþòñÿ: ñâåòîáîÿçíü, ïîÿâëåíèå ïÿòåí Ôèëàòîâà - Êîïëèêà, ïåðåõîäÿùèõ â ïîëèìîðôíóþ ñûïü. Îñòàëüíûå ñèìïòîìû íå ÿâëÿþòñÿ îñîáî âåñîìûìè (ïîäúåì òåìïåðàòóðû, íåäîìîãàíèå, íàñìîðê…), òàê êàê èõ íàëè÷èå òàêæå âîçìîæíî è â äðóãèõ áîëåçíÿõ, íî îíè âíîñÿò ñâîé âêëàä â îïðåäåëåíèå èòîãîâîãî âåñà áîëåçíè.
Çäåñü òàêæå ñêàçàíî è ïðî ëå÷åíèå (ïðîôèëàêòèêó), èíôîðìàöèÿ î êîòîðîì íàõîäèòñÿ â îòäåëüíîì ôàéëå íà äèñêå.
Äëÿ êîððåêòíîé ðàáîòû ñèñòåìû åå íåîáõîäèìî ïðàâèëüíî óñòàíîâèòü (è êîíôèãóðèðîâàòü). Óñòàíîâêà ïðîèçâîäèòñÿ â íåñêîëüêî ýòàïîâ:
Ïðîâåðèòü íàëè÷èå óñòàíîâëåííîãî Borland DBE.
Åñëè îí îòñóòñòâóåò, òî ïðè óñòàíîâêå îäíîãî èç ñëåäóþùèõ ïðîäóêòîâ ôèðìû Borland:
Delphi
Power Builder
C++ âåðñèè 4.0 è âûøå
íåîáõîäèìî îòìåòèòü ãàëî÷êîé ïóíêò óñòàíîâêè DBE.
Ñêîïèðîâàòü ïîñòàâëÿåìûå ôàéëû â ëþáóþ äèðåêòîðèþ ïî æåëàíèþ.
Îòðåäàêòèðîâàòü ôàéë config.cfg:
Ïåðâàÿ ñòðîêà – ïîëíûé ïóòü äî ôàéëîâ áàç äàííûõ. Ïî óìîë÷àíèþ – äèñê:\êàòàëîã\BASE.
Âòîðàÿ ñòðîêà – ïîëíûé ïóòü äî ôàéëîâ êàðòèíîê (ôîòîãðàôèé). Ïî óìîë÷àíèþ – äèñê:\êàòàëîã\image
Òðåòüÿ ñòðîêà – ïîëíûé ïóòü äî ôàéëîâ òåêñòîâ (ðåêîìåíäàöèé ïî èçëå÷åíèþ áîëåçíåé è ñáîðó äîïîëíèòåëüíîé èíôîðìàöèè). Ïî óìîë÷àíèþ – äèñê:\êàòàëîã\TXT.
Ïî æåëàíèþ ïîëüçîâàòåëÿ, âû ìîæåòå ñîçäàòü ÿðëûê íà ðàáî÷åì ñòîëå äëÿ çàïóñêà ñèñòåìû.
Çàïóñòèòå ïðîãðàììó odesa.exe. Åñëè íå çíàåòå, êàê åå çàïóñòèòü, òî îáðàòèòåñü ê ñèñòåìíîìó ïðîãðàììèñòó ñ ïðîñüáîé ñîçäàòü äëÿ íåå ÿðëûê íà ðàáî÷åì ñòîëå Windows. Ïîñëå ïîÿâëåíèÿ îêíà «About» ñëåäóåò íàæàòü êíîïêó «ïðîäîëæèòü».
Ïîñëå ýòîãî ïåðåä âàìè ïîÿâèòñÿ îñíîâíàÿ ôîðìà:
Âûáåðèòå èíòåðåñóþùèé âàñ ïóíêò ìåíþ. Ñëåäóéòå ïîÿâëÿþùèìñÿ íà ýêðàíå èíñòðóêöèÿì.
 ñëó÷àå, åñëè âû çàòðóäíÿåòåñü, òî â ëþáîì ìåñòå ïðîãðàììû ìîæíî âûçâàòü êîíòåêñòíî-çàâèñèìóþ ñïðàâêó.
Ïðè ðàáîòå ñ áàçîé çíàíèé âû ìîæåòå èñïîëüçîâàòü âñïëûâàþùåå ìåíþ, ïðåäîñòàâëÿþùåå âàì äîïîëíèòåëüíûå óäîáñòâà.
Íàæàòèå êíîïêè ìîæíî îñóùåñòâèòü ñëåäóþùèìè ñïîñîáàìè:
Ïðè ïîìîùè ìàíèïóëÿòîðà «ìûøü» óñòàíîâèòå êóðñîð íà íóæíóþ êíîïêó è íàæìèòå ëåâóþ êëàâèøó «ìûøè».
Ïðè ïîìîùè êëàâèø óïðàâëåíèÿ êóðñîðîì èëè êëàâèøè «TAB» óñòàíîâèòå ôîêóñ íà íóæíóþ êíîïêó (ïðè ýòîì îíà áóäåò îáâåäåíà æèðíîé ÷åðíîé ðàìêîé) è íàæìèòå êëàâèøó «Enter».
Åñëè íà íóæíîé êíîïêå èìååòñÿ ïîä÷åðêíóòûé ñèìâîë, òî îñóùåñòâèòü íàæàòèå ýòîé êíîïêè ìîæíî ñ ïîìîùüþ óäåðæèâàíèÿ êëàâèøè «Alt» è íàæàòèÿ ñîîòâåòñòâóþùåãî ñèìâîëà.
Âûçîâ ñîîòâåòñòâóþùåãî ïóíêòà ìåíþ:
Ïðè ïîìîùè ìàíèïóëÿòîðà «ìûøü» óñòàíîâèòå êóðñîð íà íóæíûé ïóíêò ìåíþ è íàæìèòå ëåâóþ êëàâèøó «ìûøè».
Íàæìèòå êëàâèøó «F10». Ïðè ýòîì ó âàñ âûäåëèòñÿ ïåðâûé ïóíêò ìåíþ. Ïðè ïîìîùè êëàâèø óïðàâëåíèÿ êóðñîðîì èëè êëàâèøè «TAB» óñòàíîâèòå ôîêóñ íà íóæíûé ïóíêò ìåíþ (ïðè ýòîì îíà áóäåò îáâåäåíà æèðíîé ÷åðíîé ðàìêîé) è íàæìèòå êëàâèøó «Enter».
Åñëè íà íóæíîì ïóíêòå ìåíþ èìååòñÿ ïîä÷åðêíóòûé ñèìâîë, òî îñóùåñòâèòü íàæàòèå ýòîé êíîïêè ìîæíî ñ ïîìîùüþ óäåðæèâàíèÿ êëàâèøè «Alt» è íàæàòèÿ ñîîòâåòñòâóþùåãî ñèìâîëà.
Íàïðîòèâ íåêîòîðûõ êîìàíä ìåíþ ñòîÿò êîìáèíàöèè óïðàâëÿþùèõ êëàâèø, çà ñ÷åò êîòîðûõ âû ìîæåòå âûçâàòü òîò èëè èíîé ïóíêò. Íàïðèìåð, «Ctrl+O».
Âûçîâ âñïëûâàþùåãî ìåíþ:
Íàæìèòå ïðàâóþ êíîïêó «ìûøè». Ïðè ýòîì íà ìåñòå óêàçàòåëÿ êóðñîðà ïîÿâèòñÿ âåðòèêàëüíî ðàñïîëîæåííîå ìåíþ. Âûáðàòü íåîáõîäèìûé ïóíêò äàííîãî ìåíþ ìîæíî ëþáûì èç ñïîñîáîâ, îïèñàííûõ â ïðèìå÷àíèè 2.
 ðàìêàõ ïîñòàâëåííîé çàäà÷è òðåáîâàëîñü ñîçäàòü ñèñòåìó ìåäèöèíñêîé äèàãíîñòèêè (ñ âîçìîæíîñòüþ äàëüíåéøåãî ðàñøèðåíèÿ îáëàñòè åå çíàíèé). Îñîáåííîñòüþ ñèñòåìû ÿâëÿåòñÿ âîçìîæíîñòü åå ðàáîòû ñ íå÷åòêèìè âõîäíûìè äàííûìè. Çíàíèÿ ýêñïåðòà òàêæå ìîãóò äîïóñêàòü ýëåìåíòû íå÷åòêîñòè è íåäîîïðåäåëåííîñòè.
Áûëà âûïîëíåíà ñëåäóþùàÿ ðàáîòà:
Ñîçäàíà ìàøèíà âûâîäà äèàãíîñòè÷åñêîé ýêñïåðòíîé ñèñòåìû.
Ñîçäàí ìîäóëü äëÿ îáðàáîòêè âõîäíûõ äàííûõ, êàê ïðè ââîäå ñ êëàâèàòóðû, òàê è ïðè ñ÷èòûâàíèè èíôîðìàöèè èç ôàéëîâ áàçû çíàíèé íà äèñêå.
Âûïîëíåíî íåñêîëüêî ïðîáíûõ çàïóñêîâ ïðîãðàììû íà îñíîâå áàçû çíàíèé âåëè÷èíîé â 7 áîëåçíåé è 15 ñèìïòîìîâ.
Äîðàáîòêà è «îòøëèôîâêà» ïðîãðàììû äëÿ âîçìîæíîñòè åå äàëüíåéøåé ïåðåäà÷è.
Ïîñòàâëåííàÿ çàäà÷à áûëà âûïîëíåíà.  ðåçóëüòàòå áûëà ñîçäàíà äèàãíîñòè÷åñêàÿ ñèñòåìà ñ ìàøèíîé âûâîäà.  äàííûé ìîìåíò îíà íàõîäèòñÿ â ñòàäèè êîìïëåêñíîãî òåñòèðîâàíèÿ. Ðåçóëüòàòû ïðåäâàðèòåëüíîãî òåñòèðîâàíèÿ âûÿâèëè íåñêîëüêî íåäîñòàòêîâ, è â íàñòîÿùèé ìîìåíò èäåò ðàáîòà ïî èõ óñòðàíåíèþ.
 çàêëþ÷åíèè ÿ õî÷ó âûðàçèòü áëàãîäàðíîñòü ñâîåìó íàó÷íîìó ðóêîâîäèòåëþ çà óìåëîå ðóêîâîäñòâî ì.í.ñ. ÈÑÈ ÑÎ ÐÀÍ Ïîïîâó Èâàíó Ãåííàäüåâè÷ó è çàâåäóþùåìó êàôåäðîé èñêóññòâåííîãî èíòåëëåêòà, ñ.í.ñ. ê.ò.í. ÈÑÈ ÑÎ ÐÀÍ Çàãîðóëüêî Þðèþ Àëåêñååâè÷ó.
Ãðèíáåðã Ñ.ß. Îáçîð ñðåäñòâ ïîñòðîåíèÿ ýêñïåðòíûõ ñèñòåì // Ðîòàïðèíò ÂÖ ÑÎ ÐÀÍ, 1993ã.
Ïîñòðîåíèå ýêñïåðòíûõ ñèñòåì // ïîä ðåä. Õåéåñà-Ðîòà Ô., Óîòåðìàíà Ä., Ëåíàòà Ä.; Ì.:Ìèð,1987ã.
Ãðèíáåðã Ñ.ß.,ßõíî Ò.Ì. Ðåøåíèå çàäà÷ òåõíè÷åñêîé äèàãíîñòèêè ñ èñïîëüçîâàíèåì îáîëî÷êè Di*Gen // Òåõíè÷åñêàÿ êèáåðíåòèêà N5, 1990ã., ñ.147-153.
Ïðîáëåìû ïðåäñòàâëåíèÿ è îáðàáîòêè íå ïîëíîñòüþ îïðåäåëåííûõ çíàíèé // ïîä ðåä. Øâåöîâà È.Å. Ìîñêâà-Íîâîñèáèðñê, 1996.
Â.Â. Òåëåðìàí, Â.Å. Äìèòðèåâ. Òåõíîëîãèÿ ïðîãðàììèðîâàíèÿ íà îñíîâå íåäîîïðåäåëåííûõ ìîäåëåé // Íîâîñèáèðñê, 1995.
Êîñòðóá À.À. Ìåäèöèíñêèé ñïðàâî÷íèê òóðèñòà // Ìîñêâà. Ïðîôèçäàò: 1996ã.
Ñïðàâî÷íèê ìåäèöèíñêîé ñåñòðû ïî óõîäó // ïîä ðåä. Í.Ð. Ïàëååâà // Èçäàòåëüñòâî «Ìåäèöèíà», Ìîñêâà, 1981.
... ðåñóðñû è íà ïîñëåäíåì ýòàïå ïðîâåäåíà îöåíêà ýôôåêòèâíîñòè ïðîòîòèïà ÈÑ, êîòîðàÿ ïîêàçàëà, ÷òî âíåäðåíèå ïðîåêòà öåëåñîîáðàçíî. Çàêëþ÷åíèå Öåëüþ äèïëîìíîãî ïðîåêòà ÿâëÿëàñü ðàçðàáîòêà ïîäñèñòåìû ó÷åòà ãåìàòîëîãè÷åñêèõ àíàëèçîâ äëÿ ÊÄË ÃÁÑÌÏ-2 ã. Ðîñòîâà. Ïåðâûì ýòàïîì äèïëîìíîãî ïðîåêòà ÿâëÿëàñü îïðåäåëåíèå öåëè è çàäà÷ äèïëîìíîãî ïðîåêòà. Áûë ïðîâåäåí àíàëèç ñóùåñòâóþùèõ ñèñòåì.  ïåðâîì ...
... ñïåöèàëèñòîâ, îáëàäàþùèõ óêàçàííîé ñîâîêóïíîñòüþ çíàíèé è âûïîëíÿþùèõ ôóíêöèè “ïîñðåäíèêîâ” ìåæäó ýêñïåðòàìè â ïðåäìåòíîé îáëàñòè è êîìïüþòåðíûìè (ýêñïåðòíûìè) ñèñòåìàìè. Îíè ïîëó÷èëè íàçâàíèå èíæåíåðû çíàíèé (â îðèãèíàëå - knowledge engineers), à ñàì ïðîöåññ ðàçðàáîòêè ÝÑ è äðóãèõ èíòåëëåêòóàëüíûõ ïðîãðàìì, îñíîâàííûõ íà ïðåäñòàâëåíèè è îáðàáîòêå çíàíèé - èíæåíåðèåé çíàíèé (knowledge engineering ...
... â ýêñïåðòíîé ñèñòåìå ñ íåîáõîäèìîñòüþ äîëæíû áûòü ñëîæíûìè ëèáî â ñìûñëå ñëîæíîñòè êàæäîãî ïðàâèëà, ëèáî â ñìûñëå èõ îáèëèÿ. Ýêñïåðòíûå ñèñòåìû, êàê ïðàâèëî, ðàáîòàþò ñ ïðåäìåòíûìè îáëàñòÿìè ðåàëüíîãî ìèðà, à íå ñ òåì, ÷òî ñïåöèàëèñòû â îáëàñòè èñêóññòâåííîãî èíòåëëåêòà íàçûâàþò èãðóøå÷íûìè ïðåäìåòíûìè îáëàñòÿìè.  ïðåäìåòíîé îáëàñòè ðåàëüíîãî ìèðà òîò, êòî ðåøàåò çàäà÷ó, ïðèìåíÿåò ôàêòè÷åñêóþ ...
... è àïïàðàòíîé ðåàëèçàöèè, âûïîëíåííûå íà ýòîì ÿçûêå îïèñàíèÿ, ïåðåâîäÿòñÿ íà áîëåå ïîäõîäÿùèå ÿçûêè äðóãîãî óðîâíÿ. 4. Ýêñïåðòíûå ñèñòåìû (ÝÑ), èõ ñòðóêòóðà è êëàññèôèêàöèÿ. Èíñòðóìåíòàëüíûå ñðåäñòâà ïîñòðîåíèÿ ÝÑ. Òåõíîëîãèÿ ðàçðàáîòêè ÝÑ 4.1 Íàçíà÷åíèå ýêñïåðòíûõ ñèñòåì  íà÷àëå âîñüìèäåñÿòûõ ãîäîâ â èññëåäîâàíèÿõ ïî èñêóññòâåííîìó èíòåëëåêòó ñôîðìèðîâàëîñü ñàìîñòîÿòåëüíîå íàïðàâëåíèå ...
0 êîììåíòàðèåâ