hack.rip.c revision 1.2 1 1.1 cgd /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
2 1.1 cgd /* hack.rip.c - version 1.0.2 */
3 1.1 cgd
4 1.1 cgd #include <stdio.h>
5 1.1 cgd #include "hack.h"
6 1.1 cgd
7 1.1 cgd extern char plname[];
8 1.1 cgd
9 1.2 mycroft static char *riptop= "\
10 1.2 mycroft ----------\n\
11 1.2 mycroft / \\\n\
12 1.2 mycroft / REST \\\n\
13 1.2 mycroft / IN \\\n\
14 1.2 mycroft / PEACE \\\n\
15 1.2 mycroft / \\";
16 1.1 cgd
17 1.2 mycroft static char *ripmid = " | %*s%*s |\n";
18 1.2 mycroft
19 1.2 mycroft static char *ripbot = "\
20 1.2 mycroft *| * * * | *\n\
21 1.2 mycroft _________)/\\\\_//(\\/(/\\)/\\//\\/|_)_______";
22 1.2 mycroft
23 1.1 cgd outrip(){
24 1.1 cgd char buf[BUFSZ];
25 1.1 cgd
26 1.1 cgd cls();
27 1.2 mycroft curs(1, 8);
28 1.2 mycroft puts(riptop);
29 1.1 cgd (void) strcpy(buf, plname);
30 1.1 cgd buf[16] = 0;
31 1.1 cgd center(6, buf);
32 1.1 cgd (void) sprintf(buf, "%ld AU", u.ugold);
33 1.1 cgd center(7, buf);
34 1.1 cgd (void) sprintf(buf, "killed by%s",
35 1.1 cgd !strncmp(killer, "the ", 4) ? "" :
36 1.1 cgd !strcmp(killer, "starvation") ? "" :
37 1.1 cgd index(vowels, *killer) ? " an" : " a");
38 1.1 cgd center(8, buf);
39 1.1 cgd (void) strcpy(buf, killer);
40 1.2 mycroft {
41 1.2 mycroft register int i1;
42 1.2 mycroft if((i1 = strlen(buf)) > 16) {
43 1.2 mycroft register int i,i0;
44 1.2 mycroft i0 = i1 = 0;
45 1.2 mycroft for(i = 0; i <= 16; i++)
46 1.2 mycroft if(buf[i] == ' ') i0 = i, i1 = i+1;
47 1.2 mycroft if(!i0) i0 = i1 = 16;
48 1.2 mycroft buf[i1 + 16] = 0;
49 1.2 mycroft buf[i0] = 0;
50 1.2 mycroft }
51 1.2 mycroft center(9, buf);
52 1.1 cgd center(10, buf+i1);
53 1.1 cgd }
54 1.1 cgd (void) sprintf(buf, "%4d", getyear());
55 1.1 cgd center(11, buf);
56 1.2 mycroft puts(ripbot);
57 1.1 cgd getret();
58 1.1 cgd }
59 1.1 cgd
60 1.1 cgd center(line, text) int line; char *text; {
61 1.2 mycroft register int n = strlen(text)/2;
62 1.2 mycroft printf(ripmid, 8+n, text, 8-n, "");
63 1.1 cgd }
64 1.2 mycroft
65