Furey: Delete link-to-particular-source instructions. Source code covers that now. "the latest release" -> "newer releases".

2024-07-01T07:04:45Z

Delete link-to-particular-source instructions. Source code covers that now. "the latest release" -> "newer releases".

Kernigh bot: NetHack 1.3d/termcap.c moved to Source:NetHack 1.3d/termcap.c: Robot: moved page

2008-03-04T00:30:47Z

NetHack 1.3d/termcap.c moved to Source:NetHack 1.3d/termcap.c: Robot: moved page

Jaytbot: Automated source code upload

2006-08-31T14:12:59Z

Automated source code upload

New page

Below is the full text to '''termcap.c''' from the [[NetHack 1.3d source code|source code]] of [[NetHack 1.3d]]. To link to a particular line, write [[NetHack 1.3d/termcap.c#line123|<nowiki>[[NetHack 1.3d/termcap.c#line123]]</nowiki>]], for example.

'''Warning!''' This is the source code from an old release. For the latest release, see [[Source code]]

{{CWI}}
1. /* SCCS Id: @(#)termcap.c 1.3 87/07/14
2. /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
3. /* termcap.c - version 1.0.3 */
4. 
5. #include <stdio.h>
6. #include "config.h" /* for ROWNO and COLNO */
7. #include "hack.h" /* for *HI, *HE */
8. extern char *tgetstr(), *tgoto(), *getenv();
9. extern long *alloc();
10. 
11. #ifndef lint
12. extern /* it is defined in libtermlib (libtermcap) */
13. #endif
14. short ospeed; /* terminal baudrate; used by tputs */
15. static char tbuf[512];
16. static char *HO, *CL, *CE, *UP, *CM, *ND, *XD, *BC, *SO, *SE, *TI, *TE;
17. static char *VS, *VE;
18. static int SG;
19. static char PC = '\0';
20. char *CD; /* tested in pri.c: docorner() */
21. int CO, LI; /* used in pri.c and whatis.c */
22. 
23. #ifdef MSDOS
24. static char tgotobuf[20];
25. #define tgoto(fmt, x, y) (sprintf(tgotobuf, fmt, y+1, x+1), tgotobuf)
26. #endif /* MSDOS /**/
27. 
28. startup()
29. {
30. #ifdef MSDOS
31. HO = "\033[H";
32. CL = "\033[2J";
33. CE = "\033[K";
34. UP = "\033[1A";
35. CM = "\033[%d;%dH"; /* used with function tgoto() */
36. ND = "\033[1C";
37. XD = "\033[1B";
38. BC = "\033[1D";
39. SO = "\033[7m";
40. SE = "\033[0m";
41. TI = TE = VS = VE = "";
42. CD = "\033";
43. CO = COLNO;
44. LI = ROWNO;
45. #if defined(DGK) || defined(SORTING)
46. /* Both HI and HE have 4 characters. The function let_to_name()
47. * in msdos.c uses this length when creating a buffer. If you
48. * make HI and HE longer, you must also change the length of buf[]
49. * in let_to_name()
50. */
51. HI = "\033[4m";
52. HE = "\033[0m";
53. #endif
54. #else
55. register char *term;
56. register char *tptr;
57. char *tbufptr, *pc;
58. 
59. tptr = (char *) alloc(1024);
60. 
61. tbufptr = tbuf;
62. if(!(term = getenv("TERM")))
63. error("Can't get TERM.");
64. if(!strncmp(term, "5620", 4))
65. flags.nonull = 1; /* this should be a termcap flag */
66. if(tgetent(tptr, term) < 1)
67. error("Unknown terminal type: %s.", term);
68. if(pc = tgetstr("pc", &tbufptr))
69. PC = *pc;
70. if(!(BC = tgetstr("bc", &tbufptr))) { 
71. if(!tgetflag("bs"))
72. error("Terminal must backspace.");
73. BC = tbufptr;
74. tbufptr += 2;
75. *BC = '\b';
76. }
77. HO = tgetstr("ho", &tbufptr);
78. CO = tgetnum("co");
79. LI = tgetnum("li");
80. if(CO < COLNO || LI < ROWNO+2)
81. setclipped();
82. if(!(CL = tgetstr("cl", &tbufptr)))
83. error("Hack needs CL.");
84. ND = tgetstr("nd", &tbufptr);
85. if(tgetflag("os"))
86. error("Hack can't have OS.");
87. CE = tgetstr("ce", &tbufptr);
88. UP = tgetstr("up", &tbufptr);
89. /* It seems that xd is no longer supported, and we should use
90. a linefeed instead; unfortunately this requires resetting
91. CRMOD, and many output routines will have to be modified
92. slightly. Let's leave that till the next release. */
93. XD = tgetstr("xd", &tbufptr);
94. /* not: XD = tgetstr("do", &tbufptr); */
95. if(!(CM = tgetstr("cm", &tbufptr))) {
96. if(!UP && !HO)
97. error("Hack needs CM or UP or HO.");
98. printf("Playing hack on terminals without cm is suspect...\n");
99. getret();
100. }
101. SO = tgetstr("so", &tbufptr);
102. SE = tgetstr("se", &tbufptr);
103. SG = tgetnum("sg"); /* -1: not fnd; else # of spaces left by so */
104. if(!SO || !SE || (SG > 0)) SO = SE = 0;
105. #ifdef SORTING
106. HI = SO; /* I know... Its a kluge. (MRS) */
107. HE = SE;
108. #endif
109. CD = tgetstr("cd", &tbufptr);
110. set_whole_screen(); /* uses LI and CD */
111. if(tbufptr-tbuf > sizeof(tbuf)) error("TERMCAP entry too big...\n");
112. free(tptr);
113. #endif /* MSDOS /**/
114. }
115. 
116. start_screen()
117. {
118. xputs(TI);
119. xputs(VS);
120. #ifdef DGK
121. /* Select normal ASCII and line drawing character sets.
122. */
123. if (flags.DECRainbow)
124. xputs("\033(B\033)0");
125. #endif
126. }
127. 
128. end_screen()
129. {
130. clear_screen();
131. xputs(VE);
132. xputs(TE);
133. }
134. 
135. /* Cursor movements */
136. extern xchar curx, cury;
137. 
138. curs(x, y)
139. register int x, y; /* not xchar: perhaps xchar is unsigned and
140. curx-x would be unsigned as well */
141. {
142. 
143. if (y == cury && x == curx)
144. return;
145. if(!ND && (curx != x || x <= 3)) { /* Extremely primitive */
146. cmov(x, y); /* bunker!wtm */
147. return;
148. }
149. if(abs(cury-y) <= 3 && abs(curx-x) <= 3)
150. nocmov(x, y);
151. else if((x <= 3 && abs(cury-y)<= 3) || (!CM && x<abs(curx-x))) {
152. (void) putchar('\r');
153. curx = 1;
154. nocmov(x, y);
155. } else if(!CM) {
156. nocmov(x, y);
157. } else
158. cmov(x, y);
159. }
160. 
161. nocmov(x, y)
162. {
163. if (cury > y) {
164. if(UP) {
165. while (cury > y) { /* Go up. */
166. xputs(UP);
167. cury--;
168. }
169. } else if(CM) {
170. cmov(x, y);
171. } else if(HO) {
172. home();
173. curs(x, y);
174. } /* else impossible("..."); */
175. } else if (cury < y) {
176. if(XD) {
177. while(cury < y) {
178. xputs(XD);
179. cury++;
180. }
181. } else if(CM) {
182. cmov(x, y);
183. } else {
184. while(cury < y) {
185. xputc('\n');
186. curx = 1;
187. cury++;
188. }
189. }
190. }
191. if (curx < x) { /* Go to the right. */
192. if(!ND) cmov(x, y); else /* bah */
193. /* should instead print what is there already */
194. while (curx < x) {
195. xputs(ND);
196. curx++;
197. }
198. } else if (curx > x) {
199. while (curx > x) { /* Go to the left. */
200. xputs(BC);
201. curx--;
202. }
203. }
204. }
205. 
206. cmov(x, y)
207. register x, y;
208. {
209. xputs(tgoto(CM, x-1, y-1));
210. cury = y;
211. curx = x;
212. }
213. 
214. xputc(c) char c; {
215. (void) fputc(c, stdout);
216. }
217. 
218. xputs(s) char *s; {
219. #ifdef MSDOS
220. fputs(s, stdout);
221. #else
222. tputs(s, 1, xputc);
223. #endif
224. }
225. 
226. cl_end() {
227. if(CE)
228. xputs(CE);
229. else { /* no-CE fix - free after Harold Rynes */
230. /* this looks terrible, especially on a slow terminal
231. but is better than nothing */
232. register cx = curx, cy = cury;
233. 
234. while(curx < COLNO) {
235. xputc(' ');
236. curx++;
237. }
238. curs(cx, cy);
239. }
240. }
241. 
242. clear_screen() {
243. xputs(CL);
244. xputs(HO);
245. curx = cury = 1;
246. }
247. 
248. home()
249. {
250. if(HO)
251. xputs(HO);
252. else if(CM)
253. xputs(tgoto(CM, 0, 0));
254. else
255. curs(1, 1); /* using UP ... */
256. curx = cury = 1;
257. }
258. 
259. standoutbeg()
260. {
261. if(SO) xputs(SO);
262. }
263. 
264. standoutend()
265. {
266. if(SE) xputs(SE);
267. }
268. 
269. backsp()
270. {
271. xputs(BC);
272. curx--;
273. }
274. 
275. bell()
276. {
277. #ifdef DGKMOD
278. if (flags.silent) return;
279. #endif /* DGKMOD /**/
280. (void) putchar('\007'); /* curx does not change */
281. (void) fflush(stdout);
282. }
283. 
284. static short tmspc10[] = { /* from termcap */
285. 0, 2000, 1333, 909, 743, 666, 500, 333, 166, 83, 55, 41, 20, 10, 5
286. };
287. 
288. delay_output() {
289. /* delay 50 ms - could also use a 'nap'-system call */
290. /* BUG: if the padding character is visible, as it is on the 5620
291. then this looks terrible. */
292. #ifdef MSDOS
293. /* simulate the delay with "cursor here" */
294. register i;
295. for (i = 0; i < 3; i++) {
296. cmov(curx, cury);
297. (void) fflush(stdout);
298. }
299. #else
300. if(!flags.nonull)
301. tputs("50", 1, xputc);
302. 
303. /* cbosgd!cbcephus!pds for SYS V R2 */
304. /* is this terminfo, or what? */
305. /* tputs("$<50>", 1, xputc); */
306. 
307. else if(ospeed > 0 || ospeed < SIZE(tmspc10)) if(CM) {
308. /* delay by sending cm(here) an appropriate number of times */
309. register int cmlen = strlen(tgoto(CM, curx-1, cury-1));
310. register int i = 500 + tmspc10[ospeed]/2;
311. 
312. while(i > 0) {
313. cmov(curx, cury);
314. i -= cmlen*tmspc10[ospeed];
315. }
316. }
317. #endif /* MSDOS /**/
318. }
319. 
320. cl_eos() /* free after Robert Viduya */
321. { /* must only be called with curx = 1 */
322. 
323. if(CD)
324. xputs(CD);
325. else {
326. register int cx = curx, cy = cury;
327. while(cury <= LI-2) {
328. cl_end();
329. xputc('\n');
330. curx = 1;
331. cury++;
332. }
333. cl_end();
334. curs(cx, cy);
335. }
336. }
[[Category:NetHack 1.3d source code|termcap.c]]

@@ Line 1: / Line 1: @@
-Below is the full text to '''termcap.c''' from the [[NetHack 1.3d source code|source code]] of [[NetHack 1.3d]]. To link to a particular line, write [[NetHack 1.3d/termcap.c#line123|<nowiki>[[NetHack 1.3d/termcap.c#line123]]</nowiki>]], for example.
+Below is the full text to '''termcap.c''' from the [[NetHack 1.3d source code|source code]] of [[NetHack 1.3d]].
-'''Warning!''' This is the source code from an old release. For the latest release, see [[Source code]]
+'''Warning!''' This is the source code from an old release. For new releases, see [[Source code]]
 {{CWI}}

← Older revision	Revision as of 00:30, 4 March 2008
(No difference)

Source:NetHack 1.3d/termcap.c - Revision history

Furey: Delete link-to-particular-source instructions. Source code covers that now. "the latest release" -> "newer releases".

Kernigh bot: NetHack 1.3d/termcap.c moved to Source:NetHack 1.3d/termcap.c: Robot: moved page

Jaytbot: Automated source code upload