blob: dc1414ced8eb0965f1bdb79f4d1a01241214c886 (
plain)
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
|
input slideshow;
pair points[];
nextfig;
points0 = (.5lawidth, .9laheight);
ypart points1 = ypart points2 = .1laheight;
xpart points1 = lawidth - xpart points2 = .3lawidth;
pickup thin nib;
draw points1..points0 withcolor textcolour;
hyperdest("start");
endfig;
% build on previous slide for next few
continue;
nextfig;
pickup thin nib;
draw points0..points2 withcolor textcolour;
endfig;
nextfig;
pickup thin nib;
draw points2..points1 withcolor textcolour;
endfig;
nextfig;
blabel.top("A", points0);
endfig;
nextfig;
blabel.lft("B", points1);
endfig;
nextfig;
blabel.rt("C", points2);
endfig;
% new sequence of slides ...
discontinue;
nextfig;
hyperlabel("The End" infont defaultfont scaled magstep 2, (.5lawidth, .5laheight), "start");
endfig;
end
|
