anchor.diff:                              false -> RecvTag ++ "\\\\[-0.5em]\\tiny " ++ SendTag
                           end,
                       io:format(File,
  -                              "\\draw[->, color=~s] (~pcm, -~p)"
  +                              "\\draw[->, color=~s] (~fcm, -~f)"
                                 " to node[inner sep=1pt, anchor=west,sloped,rotate=-90, align=left] "
  -                              "{\\tiny ~s} (~pcm, -~p) "
  +                              "{\\tiny ~s} (~fcm, -~f) "
                                 "node [anchor=west, inner sep=1pt, rotate=60] {\\tiny ~s};~n",
                                 [Color, SendTime/ScaleX, SrcNum/2,
                                  MsgTag,
  
positive.code:           fun(X, Acc) ->
                    LatexNode = term_to_latex_string(X),
                    io:format(File,
                              "\\draw (0, -~p) node[anchor=east] {~s};~n",
                              [length(Acc)/2, LatexNode]),
                    io:format(File,
                              "\\draw[color=gray,very thin] (0, -~p) -- (~pcm, -~p);~n",
                              [length(Acc)/2, (EndTime+10)/ScaleX, length(Acc)/2]),
                    case EndTime > 600 of
                        true ->
                            io:format(File,
                                      "\\foreach \\x in {~p,~p,...,~p}~n"
                                      "  \\node[anchor=south east,gray,inner sep=0pt] at (\\x, -~p) {\\tiny ~s};~n",
                                      [15, 30,
                                       ((trunc((EndTime+10)) div 15) * 15) div ScaleX,
                                       length(Acc)/2, LatexNode]);
  
negative.code:       1, EndSlot,
        fun(I) ->
                io:format(File,
                "  \\draw[color=gray, very thin] (~fcm, 0.5)"
                "  node[above] {~B" ++ ?IIF(HaveRealTime, "$\\mu$s", "") ++ "} --"
                " (~f, -~f);~n",
                [I*TicsFreq/ScaleX,
                 I*TicsFreq,
                 I*TicsFreq/ScaleX, length(Nodes)/2])
  