--- a/thesis/Makefile	Thu Jan 01 21:36:55 2009 +0100
+++ b/thesis/Makefile	Sun Jan 04 10:05:56 2009 +0100
@@ -26,6 +26,6 @@
 	latexmk -ps -pdfps $(COVER)
 
 .PHONY: img
-img:
+img: img/*.pic
 	cd img ; $(MAKE) ; cd -
 

--- a/thesis/img/comm-classification.pic	Thu Jan 01 21:36:55 2009 +0100
+++ b/thesis/img/comm-classification.pic	Sun Jan 04 10:05:56 2009 +0100
@@ -1,37 +1,36 @@
 .PS
 
+#scale = 1.3
+
+
 boxwid = 2
 boxht = 1
 colheaderh = 0.4
-rowheaderw = 1.0
-
+rowheaderw = 1.3
 
 
-define header {
-	[
-		right
-		box invis "" ht colheaderh wid rowheaderw
-		box dotted "\fI" $1 "\fR" ht colheaderh
-		box dotted "\fI" $2 "\fR" ht colheaderh
-	]
-}
+copy "marker.pic.inc"
+
 define row {
 	[
 		right
-		box dotted "\fI" $1 "\fR" wid rowheaderw
-		box $2
-		box $3
+		B1: box $1
+		B2: box $2
 	]
 }
-down
 
 
-header("written",  "recorded")
-row("asynchronous" "(messages)",  "email" "SMS",  "voice mail" "video messages")
-row("synchronous" "(dialog)",  "IM" "chat",  "VoIP" "video conferencing")
+down
+row("email" "SMS",  "voice mail" "video messages")
+row("instant messaging" "chat",  "VoIP" "video conferencing")
+
+marker_top(1st [].B1, "written")
+marker_top(1st [].B2, "recorded")
+
+marker_left(1st [], "asyncronous" rjust "(messages)" rjust)
+marker_left(2nd [], "syncronous" rjust "(dialog)" rjust)
 
 
 
-
-
+#circle diam 0.1 at (0,0)
 .PE

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/thesis/img/comm-lifecycle.pic	Sun Jan 04 10:05:56 2009 +0100
@@ -0,0 +1,75 @@
+.PS
+
+#scale = 1.4
+
+boxwid = 1.25
+boxht = 3
+colheaderh = 0.4
+rowheaderw = 1.0
+ad = 0.1 # arrow distance
+
+copy "marker.pic.inc"
+
+"X" with .c at (0,0)
+
+
+define segment {
+	[
+		down
+		A: box "" invis
+		line dotted from A.ne to A.se
+		#B: box invis "\fI" $1 "\fR" ht 0.5
+		marker_bot(last box, $1)
+	]
+}
+
+
+move up boxht/2-markerlen/2
+right
+
+segment("introduction")
+segment("growth")
+segment("mature")
+segment("saturation")
+segment("decline")
+
+
+arrow from 1st [].A.sw to last [].A.se
+"\fI" "time" above rjust "\fR" at last arrow.end + (-0.2,0.00)
+arrow from 1st [].A.sw to 1st [].A.nw
+"\fI" "sales," ljust  "market share," ljust  "importance," ljust  "etc." ljust "\fR" at last arrow.end + (0.05,-0.45)
+#line dotted from 1st [].B.nw to 1st [].B.sw
+
+
+spline from 1st [].A.sw right boxwid*0.7 up 0.1 \
+	then right boxwid*0.8 up 1.0 \
+	then right boxwid up 1.2 \
+	then right boxwid up 0.5 \
+	then right boxwid down 0.3 \
+	then right boxwid/2 down 0.1
+
+
+move to (0,0)
+
+line left ad up ad*3 with .start at (0.38*boxwid, 0.1)
+box "video" "messages" invis wid 0.6 ht 0.4
+
+line left ad up ad*3 with .start at (0.77*boxwid, 0.3)
+box "voice" "mail" invis same
+
+line left ad up ad*3 with .start at (1.61*boxwid, 1.3)
+box "Voice" "over IP" invis same
+
+line right ad down ad*3 with .start at (2.31*boxwid, 2.0)
+box "instant" "messaging" invis same
+
+line right ad down ad*3 with .start at (3.23*boxwid, 2.6)
+box "email" invis wid 0.6 ht 0.2
+
+line right ad down ad*3 with .start at (4.31*boxwid, 2.5)
+box "telefax" invis same
+
+
+
+
+.PE

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/thesis/img/email-swot.pic	Sun Jan 04 10:05:56 2009 +0100
@@ -0,0 +1,36 @@
+.PS
+
+#scale = 1.3
+
+
+boxwid = 2
+boxht = 1
+colheaderh = 0.4
+rowheaderw = 1.3
+
+
+copy "marker.pic.inc"
+
+define row {
+	[
+		right
+		B1: box $1
+		B2: box $2
+	]
+}
+
+
+down
+row("standard" "modular" "extensible",  "")
+row("large data transfer" "too big for phone",  "spam")
+
+marker_bot(last [].B1, "" "opportunities" "of the market")
+marker_bot(last [].B2, "" "threats" "of the market")
+
+marker_left(1st [], "strengths" rjust "of email" rjust)
+marker_left(2nd [], "weaknesses" rjust "of email" rjust)
+
+
+
+#circle diam 0.1 at (0,0)
+.PE

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/thesis/img/marker.pic.inc	Sun Jan 04 10:05:56 2009 +0100
@@ -0,0 +1,22 @@
+markerlen = 0.2
+
+define marker_top {
+	line up markerlen from $1.nw
+	line up markerlen from $1.ne
+	"\fI" $2 "\fR" at 0.5<2nd last line.end, last line.end>
+}
+define marker_bot {
+	line $3 down markerlen from $1.sw
+	line $3 down markerlen from $1.se
+	"\fI" $2 "\fR" at 0.5<2nd last line.end, last line.end>
+}
+define marker_left {
+	line left markerlen from $1.nw
+	line left markerlen from $1.sw
+	"\fI" $2 "\fR" at 0.5<2nd last line.end, last line.end>
+}
+define marker_right {
+	line right markerlen from $1.nw
+	line right markerlen from $1.sw
+	"\fI" $2 "\fR" at 0.5<2nd last line.end, last line.end>
+}