.PS
# masqmail-typical-usage
scale = 1.2

[
moveht = 0.3
lineht = 0.3


down
line <-
ISP: ellipse "ISP"
line <-
R: box invis "router" ht .2
S1: box dashed wid 3.6 ht 1.95
" Internet" at S1.nw above ljust
" Local network" at S1.nw below ljust
move to S1.n
move 2*moveht+boxht

[
right
W1: box "workstation" "(masqmail)"
line <-> 0.3
W2: box "workstation" "(masqmail)"
line <-> 0.3
W3: box "workstation" "(masqmail)"
]

line from last [].W1.n to R.s-(0.05,lineht) then to R.s-(0.05,0)
line from last [].W2.n to R.s-(0,lineht) then to R.s
line from last [].W3.n to R.s+(0.05,-lineht) then to R.s+(0.05,0)

arrow from R.n-(0.05,0) to ISP.s-(0.05,0)
arrow from R.n+(0.05,0) to ISP.s+(0.05,0)

#spline -> from last [].W1.n to R.s-(0.05,0) then to ISP.s-(0.05,0)
#spline -> from last [].W2.n to R.s then to ISP.s
#spline -> from last [].W3.n to R.s+(0.05,0) then to ISP.s+(0.05,0)

#circle "mail" "box" with .w at ISP.e

]


move


[

moveht = 0.3
lineht = 0.3

down
line <-
ISP: ellipse "ISP"
line <-
R: box invis "router" ht .2
S1: box dashed wid 3.6 ht 1.95
" Internet" at S1.nw above ljust
" Local network" at S1.nw below ljust
move to S1.n
line
S: box "server" "(masqmail)"
move

[
right
W1: box "workstation" "(forwarder)"
move 0.3
W2: box "workstation" "(forwarder)"
move 0.3
W3: box "workstation" "(forwarder)"
]

arrow from last [].W1.n to S.s-(0.05,0)
arrow from last [].W2.n to S.s
arrow from last [].W3.n to S.s+(0.05,0)

#circle "mail" "box" with .w at ISP.e
#circle "mail" "box" with .w at S.e

]

.PE