docs/master
annotate input/mail-agents.pic @ 193:74a76ad00ba0
Improvements in the graphs.
author | markus schnalke <meillo@marmaro.de> |
---|---|
date | Wed, 11 Jul 2012 20:34:01 +0200 |
parents | |
children |
rev | line source |
---|---|
meillo@187 | 1 .PS 3.5 |
meillo@187 | 2 arrowhead = 18 |
meillo@187 | 3 |
meillo@187 | 4 define disk { |
meillo@187 | 5 Disk: [ |
meillo@187 | 6 ellipsewid=ellipsewid/2 |
meillo@187 | 7 ellipseht=ellipseht/2 |
meillo@187 | 8 ellipse |
meillo@187 | 9 spline down ellipseht*4/3 from last ellipse.w \ |
meillo@187 | 10 then right ellipsewid \ |
meillo@187 | 11 then up ellipseht*4/3 to last ellipse.e |
meillo@187 | 12 ] |
meillo@187 | 13 } |
meillo@187 | 14 |
meillo@187 | 15 define machine { |
meillo@187 | 16 box wid $1.wid+.3 ht $1.ht+.3 dashed at $1 |
meillo@187 | 17 } |
meillo@187 | 18 |
meillo@187 | 19 up |
meillo@187 | 20 Sender: [ |
meillo@187 | 21 ellipse "\fBMUA\fP" |
meillo@187 | 22 ellipse "MSA" |
meillo@187 | 23 ] |
meillo@187 | 24 machine(Sender) |
meillo@187 | 25 |
meillo@187 | 26 arrow 3*linewid from Sender.n |
meillo@187 | 27 |
meillo@187 | 28 right |
meillo@187 | 29 Server1: [ |
meillo@187 | 30 ellipse "MTA" |
meillo@187 | 31 ] with .s at last arrow.end |
meillo@187 | 32 machine(Server1) |
meillo@187 | 33 |
meillo@187 | 34 arrow 2*linewid from Server1.e |
meillo@187 | 35 box invis ". . ." |
meillo@187 | 36 arrow 2*linewid |
meillo@187 | 37 |
meillo@187 | 38 Server2: [ |
meillo@187 | 39 ellipse "MTA" |
meillo@187 | 40 ellipse "MDA" |
meillo@187 | 41 arrow linewid/2 |
meillo@187 | 42 disk |
meillo@187 | 43 move to Disk.s - (0,.05) |
meillo@187 | 44 ] |
meillo@187 | 45 machine(Server2) |
meillo@187 | 46 |
meillo@187 | 47 down |
meillo@187 | 48 arrow <- 3*linewid dashed from Server2.s+(.86,0) |
meillo@187 | 49 arrow 3*linewid from Server2.s+(.9,0) |
meillo@187 | 50 |
meillo@187 | 51 Recipient: [ |
meillo@187 | 52 ellipse "MRA" |
meillo@187 | 53 ellipse "MDA" |
meillo@187 | 54 move to last ellipse.w |
meillo@187 | 55 left |
meillo@187 | 56 arrow linewid/2 |
meillo@187 | 57 disk |
meillo@187 | 58 arrow <-> linewid/2 |
meillo@187 | 59 #arrow <-> linewid/2 from Disk.w+(0,.03) |
meillo@187 | 60 #arrow linewid/2 from Disk.w+(0,-.03) |
meillo@187 | 61 ellipse "\fBMUA\fP" |
meillo@187 | 62 ] with .n at last arrow.end-(.8,0) |
meillo@187 | 63 machine(Recipient) |
meillo@187 | 64 |
meillo@187 | 65 line from .5 <Sender.nw,Server1.sw> to .5 <Server2.se,Recipient.ne> dotted |
meillo@187 | 66 .PE |