1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
.PS 5
space=0.7
down
define item {
[ right
box ht 0.25 wid 0 $1 ljust invis
box ht 0.25 wid 3 "" invis ]
[ right
box ht 0.25 wid 0 $3 ljust invis
box ht 0.25 wid 3 $2 ljust invis ]
box ht 0.5 wid 3 at last [].n
}
define link {
line -> from $1.e + (0.1,0) to $2.w - (0.1,0)
}
define title {
box ht 0.5 wid 3 $1 invis
}
A: [
title("Core Menu")
Copy: item("Copy", "many", "00.copy")
Paste: item("Paste", "", "01.paste")
Bar1: item("-----", "one", "20.")
Open: item("Open", "one", "21.open")
Save: item("Save...", "one", "22.save")
Bar2: item("-----", "", "40.")
Read: item("Mark as Read", "mark_read", "41.markread")
Unread: item("Mark as Unread", "mark_unread", "42.markunread")
]
move
B: [
title("Additional Items")
ReplyList: item("Reply To List", "one", "02.replylist")
Forward: item("Forward", "any", "03.forward")
]
C: [
title("Merged Menu")
Paste: item("Paste", "", "01.paste")
ReplyList: item("Reply To List", "", "02.replylist")
Forward: item("Forward", "", "03.forward")
Bar1: item("-----", "", "20.")
Open: item("Open", "", "21.open");
Save: item("Save...", "", "22.save")
Bar2: item("-----", "", "40.")
Read: item("Mark as Read", "", "41.markread")
] with .nw at A.ne + ( 2,-1)
link(A.Paste, C.Paste)
link(B.ReplyList, C.ReplyList)
link(B.Forward, C.Forward)
link(A.Bar1, C.Bar1)
link(A.Open, C.Open)
link(A.Save, C.Save)
link(A.Bar2, C.Bar2)
link(A.Read, C.Read)
.PE
|
