% !TeX encoding = utf8
%  !TeX spellcheck = fr
\NeedsTeXFormat{LaTeX2e}[1999/01/01]
\ProvidesPackage{schemabloc}[version 1.9]

\RequirePackage{ifthen}
\RequirePackage{tikz}

\usetikzlibrary{shapes,arrows,positioning,fit}

%macros dessin des schéma-blocs mise à jour 11 mars 20013
% version 1.6

%initialisation des styles
\tikzset{blocstyle/.style={draw, rectangle,
   minimum height=3em, minimum width=3em,right}
   }

\tikzset{sbStyleLien/.style={->,>=latex'},
sbStyleBloc/.style={draw, rectangle},
sbStyleBlocPatate/.style={},
sbStyleSum/.style={}
}
%\tikzstyle{sbStyleLien}=[,]
%\tikzstyle{sbStyleBloc}=[draw, rectangle,]
%\tikzstyle{sbStyleBlocPatate}=[]
%\tikzstyle{sbStyleSum}=[ ]%style Sum CC
% Commandes de changement de style
\newcommand{\sbStyleLienDefaut}{
%\tikzstyle{sbStyleLien}=[->,>=latex']
\tikzset{sbStyleLien/.style={->,>=latex'}}
}
\newcommand{\sbStyleLien}[1]{
\tikzset{sbStyleLien/.style={->,>=latex',#1}}
%\tikzstyle{sbStyleLien}+=[#1]
}

\newcommand{\sbStyleBloc}[1]{
\tikzset{sbStyleBloc/.style={#1}}
%\tikzstyle{sbStyleBloc}+=[#1]
}
\newcommand{\sbStyleBlocDefaut}{
\tikzset{sbStyleBloc/.style={draw, rectangle}}
%\tikzstyle{sbStyleBloc}=[draw, rectangle,]
}

\newcommand{\sbStyleSum}[1]{
\tikzset{sbStyleSum/.style={#1}}
%\tikzstyle{sbStyleSum}+=[#1]
}

\newcommand{\sbStyleSumDefaut}{
\tikzstyle{sbStyleSum}=[draw, circle,]
}%style Sum default CC


% Commandes d'entrée et sortie
\newcommand{\sbEntree}[2][0,0]{
   \node [coordinate, name=#2] at (#1) {};
\sbDecaleNoeudx[0]{#2}{#2}
}

\newcommand{\sbEntrees}[2][0,0]{
   \node [coordinate, name=#2] at(#1) {};
\sbDecaleNoeudx[0]{#2}{#2}
}
\newcommand{\sbSortie}[3][2]{
   \node [coordinate, right of=#3droite, node distance=#1em,%
minimum size=0em,right] (#2) {};
}

\newcommand{\sbSortieL}[3][2]{
   \node [coordinate, right of=#3droite, node distance=#1em,%
minimum size=0em,right] (#2) {};
\sbRelier{#3}{#2}
}

%Commandes de Bloc
\newcommand{\sbBloc}[4][2]{
\node [blocstyle, right of = #4droite,
node distance=#1em,sbStyleBloc,right] (#2) {#3};
\coordinate (#2droite) at (#2.east);
%\coordinate (BlocdeFindroite) at (#2.east);
}

\newcommand{\sbBlocPatate}[4][2]{
\node [draw, cloud, cloud puffs=5, draw,
   minimum height=3em, minimum width=5em, right of = #4droite,
node distance=#1em,sbStyleBlocPatate,right] (#2) {#3};
\coordinate (#2droite) at (#2.east);
}

\newcommand{\sbBlocr}[4][2]{
\node [blocstyle, left of = #4gauche,
node distance=#1em, sbStyleBloc,left] (#2) {#3};
\coordinate (#2gauche) at (#2.west);
}

\newcommand{\sbBlocL}[4][2]{
\node [blocstyle, right of = #4droite,node distance=#1em%
,sbStyleBloc,right] (#2) {#3};
\coordinate (#2droite) at (#2.east);
\coordinate (BlocdeFindroite) at (#2.east);
\draw [sbStyleLien,auto] (#4) --  (#2) node[midway](#4-#2){};
}

\newcommand{\sbBlocrL}[4][2]{
\node [draw, rectangle,
   minimum height=3em, minimum width=3em, left of = #4gauche,
node distance=#1em, sbStyleBloc,left] (#2) {#3};
\node (#2gauche) at (#2.west){};
\node (BlocdeFingauche) at (#2.west){};
\draw [sbStyleLien,auto] (#4) --  (#2)node[name=#4-#2] {};
}

\newcommand{\sbBlocseul}[4][1.5]{
\sbEntree{E1}
\sbBloc[#1]{Blocseul}{#3}{E1}
\sbSortie[#1]{S1}{Blocseul}
\sbRelier[#2]{E1}{Blocseul}
\sbRelier[#4]{Blocseul}{S1}
}

%\Commande de lien
\newcommand{\sbRelier}[3][]{
\draw [sbStyleLien,auto] (#2) --
  (#3)node[pos=0.5,name=#2-#3]{#1}coordinate[pos=0.25,name=#2-#3-1]coordinate[pos=0.75,name=#2-#3-2];
}

\newcommand{\sbRelieryx}[2]{
\draw [sbStyleLien] (#1.south) --   (#1.south  |-#2) --(#2)  ;
}

\newcommand{\sbRelierxy}[3][]{
\draw [sbStyleLien] (#2)  -|    (#3) coordinate[name=#2-#3-1,pos=0.25]
node[name=#2-#3,near end,right] {#1} ;
}

\newcommand{\sbRenvoi}[4][4]{
\node [below =#1em of #2, minimum size=0em](retour#2) {};
\draw [sbStyleLien] (#2.south)--(retour#2.south)   -|    (#3)node[name=#2-#3,near end,right] {#4} ;
}

\newcommand{\sbNomLien}[3][0.4]{
\node[above of=#2, node distance=#1em] (#2nom) at (#2) {#3};
}
%Commande comparateurs et sommateurs

\newcommand*{\sbCompSum}{\@ifstar\sbCompSumNorm\sbCompSumUsuel}

\newcommand*{\sbCompSumr}{\@ifstar\sbCompSumNormr\sbCompSumUsuelr}


\newcommand{\sbCompSumUsuel}[7][4]{
   \node [draw, circle,minimum size=2em, right of=#3droite%
,sbStyleSum,node distance=#1em] (#2) {};
        \node [draw,sbStyleSum, cross out,minimum size=1.414em,
        right of=#3droite,node distance=#1em] {};
        \node [above of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#4$};
        \node [below of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#5$};
        \node [left of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#6$};
        \node [right of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#7$};
\node (#2droite) at (#2.east){};
\node (#2gauche) at (#2.west){};
}



\newcommand{\sbCompSumUsuelr}[7][4]{
   \node [draw, circle,minimum size=2em, left of=#3gauche%
,sbStyleSum,node distance=#1em] (#2) {};
        \node [draw,sbStyleSum, cross out,minimum size=1.414em,%
left of=#3gauche,node distance=#1em] {};
        \node [above of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#4$};
        \node [below of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#5$};
        \node [left of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#6$};
        \node [right of=#2,node distance=0.6em,sbStyleSum,inner sep=0] {$#7$};
\node (#2droite) at (#2.east){};
\node (#2gauche) at (#2.west){};
}

\newcommand{\sbCompSumNorm}[7][4]{
   \node [draw, circle,minimum size=1.5em, right of=#3,sbStyleSum,node distance=#1em,,sbStyleSum] (#2) {};
   \node [ fit=(#2),inner sep=0.5em] (compext)  {};
\node at( compext.75){$#4$};
\node at( compext.-75){$#5$};
\node at( compext.165){$#6$};
\node at( compext.15){$#7$};
\node (#2droite) at (#2.east){};
\node (#2gauche) at (#2.west){};
}

\newcommand{\sbCompSumNormr}[7][4]{
   \node [draw, circle,minimum size=1.5em, left of=#3%
,sbStyleSum,node distance=#1em,,sbStyleSum] (#2) {};
   \node [ fit=(#2),inner sep=0.5em] (compext)  {};
\node at( compext.75){$#4$};\node at( compext.-75){$#5$};\node at( compext.165){$#6$};\node at( compext.15){$#7$};
\node (#2droite) at (#2.east){};
\node (#2gauche) at (#2.west){};
}

\newcommand{\sbSum}[6][4]{
   \node [draw, circle,minimum size=1.5em, right of=#3,node distance=#1em,
label=175:$#4$,label=-85:$#5$,label=85:$#6$,sbStyleSum] (#2) {};
\node (#2droite) at (#2.east){};
\node (#2gauche) at (#2.west){};
}

\newcommand*{\sbComp}{\@ifstar\sbCompNorm\sbCompUsuel}
\newcommand{\sbCompUsuel}[3][4]{
\sbCompSum[#1]{#2}{#3}{}{-}{+}{}
}
\newcommand{\sbCompNorm}[3][4]{
\sbCompSum*[#1]{#2}{#3}{}{-}{+}{}
}

\newcommand*{\sbCompr}{\@ifstar\sbCompNormr\sbCompUsuelr}
\newcommand{\sbCompUsuelr}[3][4]{
\sbCompSumr[#1]{#2}{#3}{}{-}{}{+}
}
\newcommand{\sbCompNormr}[3][4]{
\sbCompSumr*[#1]{#2}{#3}{}{-}{}{+}
}

\newcommand*{\sbCompL}{\@ifstar\sbCompNormL\sbCompUsuelL}
\newcommand{\sbCompUsuelL}[3][4]{
\sbCompSum[#1]{#2}{#3}{}{-}{+}{}
\sbRelier[]{#3}{#2}
}
\newcommand{\sbCompNormL}[3][4]{
\sbCompSum*[#1]{#2}{#3}{}{-}{+}{}
\sbRelier[]{#3}{#2}
}

\newcommand*{\sbCompLr}{\@ifstar\sbCompNormLr\sbCompUsuelLr}
\newcommand{\sbCompUsuelLr}[3][4]{
\sbCompSumr[#1]{#2}{#3}{}{-}{}{+}
\sbRelier[]{#3}{#2}
}
\newcommand{\sbCompNormLr}[3][4]{
\sbCompSumr*[#1]{#2}{#3}{}{-}{}{+}
\sbRelier[]{#3}{#2}
}

\newcommand*{\sbComph}{\@ifstar\sbComphNorm\sbComphUsuel}
\newcommand{\sbComphUsuel}[3][4]{
\sbCompSum[#1]{#2}{#3}{-}{}{+}{}
}
\newcommand{\sbComphNorm}[3][4]{
\sbCompSum*[#1]{#2}{#3}{-}{}{+}{}
}

\newcommand*{\sbComphr}{\@ifstar\sbComphNormr\sbComphUsuelr}
\newcommand{\sbComphUsuelr}[3][4]{
\sbCompSumr[#1]{#2}{#3}{-}{}{}{+}
}

\newcommand{\sbComphNormr}[3][4]{
\sbCompSumr*[#1]{#2}{#3}{-}{}{}{+}
}

\newcommand*{\sbSumh}{\@ifstar\sbSumhNorm\sbSumhUsuel}
\newcommand{\sbSumhUsuel}[3][4]{
\sbCompSum[#1]{#2}{#3}{+}{}{+}{}
}
\newcommand{\sbSumhNorm}[3][4]{
\sbCompSum*[#1]{#2}{#3}{+}{}{+}{}
}

\newcommand*{\sbSumhr}{\@ifstar\sbSumhNormr\sbSumhUsuelr}
\newcommand{\sbSumhUsuelr}[3][4]{
\sbCompSumr[#1]{#2}{#3}{+}{}{}{+}
}
\newcommand{\sbSumhNormr}[3][4]{
\sbCompSumr*[#1]{#2}{#3}{+}{}{}{+}
}

\newcommand*{\sbSumb}{\@ifstar\sbSumbNorm\sbSumbUsuel}
\newcommand{\sbSumbUsuel}[3][4]{
\sbCompSum[#1]{#2}{#3}{}{+}{+}{}
}
\newcommand{\sbSumbNorm}[3][4]{
\sbCompSum*[#1]{#2}{#3}{}{+}{+}{}
}

\newcommand*{\sbSumbr}{\@ifstar\sbSumbNormr\sbSumbUsuelr}
\newcommand{\sbSumbUsuelr}[3][4]{
\sbCompSumr[#1]{#2}{#3}{}{+}{}{+}
}
\newcommand{\sbSumbNormr}[3][4]{
\sbCompSumr*[#1]{#2}{#3}{}{+}{}{+}
}


%Commandes de d�calage de noeud

\newcommand{\sbDecaleNoeudy}[3][5]{
\node [below of=#2, node distance=#1em, minimum size=0em](#3) {};
\node (#3droite) at (#3){};
\node (#3gauche) at (#3){};
}

\newcommand{\sbDecaleNoeudyZ}[3][5]{
\node [below of=#2, minimum size=0em,inner sep=0](#3) {};
\node (#3droite) at (#3){};
\node (#3gauche) at (#3){};
}
\newcommand{\sbDecaleNoeudx}[3][5]{
\node [right of=#2, node distance=#1em, minimum size=0em](#3) {};
\node (#3droite) at (#3){};
\node (#3gauche) at (#3){};
}

\newcommand{\sbDecaleNoeudxy}[4]{
\sbDecaleNoeudy[#2]{#3}{#4}
\sbDecaleNoeudx[#1]{#4}{4}
}


%==============Chaînes et Boucles===========

\newcommand{\sbChaine}[3][4]{
\foreach \x/\y [remember=\x as \lastx (initially #2)] in {#3}
{\sbBlocL[#1]{\x}{\y}{\lastx}
}
}


\newcommand{\sbChaineComp}[3][4]{
\sbDecaleNoeudx[2]{#2}{V#2}
\sbComp[#1]{Comp#2}{V#2}\sbRelier{#2}{Comp#2}
\sbChaine[#1]{Comp#2}{#3}
}

\newcommand{\sbChaineRetour}[3][4]{
\foreach \x/\y [remember=\x as \lastx (initially #2)] in {#3}
{\sbBlocrL[#1]{\x}{\y}{\lastx}
}
}


\newcommand{\sbBoucleSeule}[4][4]{
\sbDecaleNoeudx[2]{#2}{V#2}
\sbComp[#1]{Comp#2}{V#2}\sbRelier{#2}{Comp#2}
\sbChaine[#1]{Comp#2}{#3}
\sbSortie[#1]{#4}{BlocdeFin}
\draw [sbStyleLien,auto] (BlocdeFindroite.base) --
(#4) node[pos=0.5,name=FindeChaine-#4] {};
\sbRenvoi{FindeChaine-#4}{Comp#2}{}
}


\newcommand{\sbBoucle}[3][4]{
\sbComp[#1]{Comp#2}{#2}\sbRelier{#2}{Comp#2}
\sbChaine[#1]{Comp#2}{#3}
\draw [sbStyleLien,auto,-] (BlocdeFindroite.base) --++(1em,0)%
coordinate[name=FindeChaine];
\sbRenvoi{FindeChaine}{Comp#2}{}
}

\newcommand{\sbBoucleRetour}[4][4]{
\sbDecaleNoeudx[2]{#2}{V#2}
\sbComp[#1]{Comp#2}{V#2}
\sbRelier{#2}{Comp#2}
\sbChaine[#1]{Comp#2}{#3}
\draw [sbStyleLien,auto,-] (BlocdeFindroite.base) --++(1em,0)%
coordinate[name=FindeChaine];
\sbDecaleNoeudy[5]{FindeChaine}{sbDebutRetour}
\sbChaineRetour[#1]{sbDebutRetour}{#4}
\draw [sbStyleLien] (FindeChaine) |- (sbDebutRetour.west) ;
\draw [sbStyleLien] (BlocdeFingauche.base)  --   (BlocdeFingauche.base -|Comp#2) -- (Comp#2) node[name=sbNomRetour,near end,right] {};
}

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.