1 rizwank 1.1 
 2             state lang_overstrike
 3             {
 4               BEGIN {
 5                 sub map_color (r, g, b)
 6                   {
 7             	return "";
 8                   }
 9             
10                 LANGUAGE_SPECIALS = /./;
11             
12                 sub language_print (str)
13                   {
14             	if (italic_flag)
15             	  print (regsuball (str, /[A-Za-z0-9]/, "_\010$0"));
16             	else if (bold_flag)
17             	  print (regsuball (str, /[^\n]/, "$0\010$0"));
18             	else
19             	  print (str);
20                   }
21             
22 rizwank 1.1     sub language_symbol (symbol)
23                   {
24             	return false;
25                   }
26             
27                 sub header ()
28                   {
29             	bold_flag = 0;
30             	italic_flag = 0;
31                   }
32             
33                 sub trailer ()
34                   {
35                   }
36             
37                 sub face_on (face)
38                   {
39             	if (face[boldp])
40             	  bold_flag = 1;
41             	if (face[italicp])
42             	  italic_flag = 1;
43 rizwank 1.1       }
44             
45                 sub face_off (face)
46                   {
47             	if (face[boldp])
48             	  bold_flag = 0;
49             	if (face[italicp])
50             	  italic_flag = 0;
51                   }
52             
53                 return;
54               }
55             }
56             
57             
58             /*
59             Local variables:
60             mode: c
61             End:
62             */