ANSI&颜色使用研究
颜色使用研究&&
　　总所周知，ES2类的LPMUD是一个只有文字的世界，因为没有任何图像，所以正是因为有16种ANSI颜色，才&
我们这个世界变得丰富多彩，更有吸引力。出于一名巫师和一名网页制作者的考虑，目前的巫师在使用ANSI颜&
色时，常常&
不是惜墨如金一点都不用就是不分场合到处乱用，这样对于一个MUD的表现力而言都是不好的。所以我今天有空&
说说有关ANSI COLOR的一些使用方法，给大家参考。&
　　我们先从源头说起，之所以加了ANSI标示符的字符就可以显示不同的颜色，是因为通过客户端像zMUD这样&
的软件，能&
够从Winsock控件的DataArrival事件中传回的数据中识别出ANSI标示符，将其后面的字符转换成指定的颜色，&
Textbox中显示出来。这涉及一些简单的Windows网络编程，就不多谈了。至于tintin+这些，虽然在Linux下使&
和Windows不同，但原理还是一样的。&
　　一般来说，要在一个程序中使用ANSI颜色，人人都知道要在头上#include
，那么，这个“ansi.&
h”文件你打&
开看过了没有呢？在一些welcome文件中那些初学者看来非常深奥的什么[1;37m这样的字符你明白了它的意思没&
我们打开/include/ansi.h这个文件看一看吧：&
// File : /include/ansi.h&
// 这是MUDLIB的标准颜色设置，由Jjgod汉化&
#define ESC ""&
#define CSI ESC + "["&
#define BLK ESC+"[30m" &
#define RED ESC+"[31m" &
#define GRN ESC+"[32m" &
#define YEL ESC+"[33m" &
#define BLU ESC+"[34m" &
#define MAG ESC+"[35m" &
#define CYN ESC+"[36m" &
#define WHT ESC+"[37m" &
#define HIR ESC+"[1;31m" &
#define HIG ESC+"[1;32m" &
#define HIY ESC+"[1;33m" &
#define HIB ESC+"[1;34m" &
#define HIM ESC+"[1;35m" &
#define HIC ESC+"[1;36m" &
#define HIW ESC+"[1;37m" &
#define HBRED ESC+"[41;1m"
#define HBGRN ESC+"[42;1m" &
#define HBYEL ESC+"[43;1m" &
#define HBBLU ESC+"[44;1m" &
#define HBMAG ESC+"[45;1m" &
#define HBCYN ESC+"[46;1m" &
#define HBWHT ESC+"[47;1m" &
#define BBLK ESC+"[40m" &
#define BRED ESC+"[41m" &
#define BGRN ESC+"[42m" &
#define BYEL ESC+"[43m" &
#define BBLU ESC+"[44m" &
#define BMAG ESC+"[45m" &
#define BCYN ESC+"[46m" &
// #define BWHT ESC+"[47m" &
#define NOR ESC+"[2;37;0m"
#define BOLD ESC+"[1m" &
#define CLR ESC+"[2J" &
#define HOME ESC+"[H" &
#define REF CLR+HOME &
#define BIGTOP ESC+"#3" &
#define BIGBOT ESC+"#4" &
#define SAVEC ESC+"[s" &
#define REST ESC+"[u" &
//#define REVINDEX ESC+"M" &
#define SINGW ESC+"#5" &
#define DBL ESC+"#6" &
#define FRTOP ESC+"[2;25r" &
#define FRBOT ESC+"[1;24r" &
#define UNFR ESC+"[r" &
#define BLINK ESC+"[5m" &
#define U ESC+"[4m" &
#define REV ESC+"[7m" &
#define HIREV ESC+"[1,7m" &
　　　上面就是经过我汉化的的ansi.h文件了，其中有些实在太难译，所以我只好把原来的留了下来。认真看&
的这些，就应该基本明白常用的ANSI颜色怎么用了，所以说，如果不#include
，照样也可以用彩色，&
需要在用的前面加上[1;33m这样就行了，这些都很简单，我就不赘述了。这篇文章要谈的重点，其实是一个A&
COLOR于zMUD的协调问题。&
　　　基本上绝大多数的MUD玩家都是使用zMUD为客户端软件的，所以你的程序在zMUD中的显示效果就尤为重要&
问题其实是出现在了在ANSI颜色的使用上，zMUD和标准的ANSI定义出现了分歧，这种分歧是在zMUD
4.62汉化版&
后产生的，zMUD的4.62英文版都应该尚无此问题，但正是因为以前没有问题后来才出现了问题。你听到这里是&
越来越不明白？那好，我们还是从源头说起吧。下面的“原先”，就是指zMUD 4.62
英文版及以前的。&
　　看过上面的定义就应该清楚[1;xxm这样的定义，也就是HIX这样的定义中，那个"1;"或者"HI"什么的，是&
粗体的意思，原先的注释中说得清清楚楚的，而原先的YEL，也就是[33m，大概是这种亮度，而倘若变成了HI&
者说[1;33m的话，就应该是这样了，这才是标准的用法，而zMUD对中文字体的支持还是不大完善，一般来说就&
使用宋体，假如出现了粗体，也会在屏幕上划得斑驳陆离，本来是这一行的字，滑到了下面几行去，非常的有&
所以以zMUD4.62英文版为预览工具来写的程序一般是不用HIY而是就用YEL的，因为这样颜色也够亮，显示也没&
题，一切都很好。&
　　但到了4.62汉化版以后，就破坏了这个格局。在这个版本以后的所有zMUD，基本上都是将[1;也就是HI默&
为高亮，而原来的YEL什么的，就变得很是暗淡了，比如此版本以后的YEL，显示出来是这样，而HIY呢，就是这&
因为始终不出现粗体，所以自然也没有显示的问题。而在原来的那种环境下开发出来的程序可就惨了，像我的&
模拟华附，&
整个MUD的颜色都显得十分暗淡，自然很不具亲和力了。&
　　本身问题是很容易解决的，只要调整一下zMUD的设置就可以了，但问题在于有关颜色的zMUD设置由特别难&
（差不多每个版本我的试过），造成了本身正常的设置还要迁就不正常的设置了，绝大部分的玩家都不会去调&
的你的MUD如果要使用Ansi颜色就要考虑这个兼容性问题了。&
　　　所以呢，因为绝大部分的MUD玩家使用的都是zMUD
4.62中文版以上的，我建议还是统一使用“HIX”这种&
点，玩家看起来颜色比较鲜亮，同时也没有粗体显示不清的问题。低亮度的颜色就少用一些吧，当然，假如你&
使用了低亮度或者高亮度，想转换的话，也可以通过改ansi.h来实现，这比较简单，就不用我说了吧。&
　　　其实ansi.h还是有很多没有普遍使用的妙处的，这就有待各位自己去发现了。
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。ansirevdiner的中文是什么意思_百度知道
ansirevdiner的中文是什么意思Ansirevdiner的中文是什么意思_百度知道
Ansirevdiner的中文是什么意思
没Ansirevdiner字argon字意思氩气氩气种稀气体用作电弧焊接（切割）锈钢、镁、铝、其合金保护气体用于钢铁、铝、钛锆冶炼放电氩发紫色辉光用于照明技术填充光灯、光电管、照明管等酿酒程啤酒桶填充物氩气氧气置换避免啤酒桶原料氧化乙酸热处理工艺用于代替氮气氨气效更超氮气氨气锈钢热处理采用氩气保护折弯效更易断裂元音字母a加r英音读/ɑ:/音美音需加/r/音读/ɑr/：are （be词现复数）arm 手臂armchair 扶手椅card 卡片cart 二轮马车farm 农场park 公园garden 花园希望我能帮助解疑释惑
来自团队：
其他类似问题
为您推荐：
其他2条回答
没特别意思名字
你这个单词没有写错？
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁Hanoi塔问题 高精度 pascal_百度知道
Hanoi塔问题 高精度 pascal
: 输入整数n（n & 1000）
:输移所需要数
定要高精度
提问者采纳
var a:ni:function rev(var a:ansistring):var ijal: ch:beginal:=length(a);j:=for i:=1 to al div 2 do beginch:=a[i];a[i]:=a[al 1-i];a[al 1-i]:=rev:=a;function mul2dec(a:ansistring):var aldclica:c:beginca:=-1;al:=c:='';for i:=1 to al do begind:=(ord(a[i])-ord('0'))*2if d&=10 then begin c:=chr(d-10 ord('0'));ca:=1;end else begin c:=c chr(d ord('0');ca:=0;if ca=1 then c:=c '1';mul2dec:=c;begin readln(s);if s='0' then writeln('0') else wriieln(rev(mul2dec(rev(s))));end.
编译错误一大堆
把逗号之类的标点符号，修改成相应的英文符号，发不上去的加号添上不成问题吧!这点小小的修改没什么问题吧!只需要加倍和减一自已做也不难吧!
var a:n,i:function rev(var a:ansistring):var i,j,al: ch:beginal:=length(a);j:=for i:=1 to al div 2 do beginch:=a[i];a[i]:=a[al+1-i];a[al+1-i]:=rev:=a;function mul2(a:ansistring):var al,d,cl,i,ca:c,s:beginca:=0;al:=length(a);c:='';for i:=1 to al do begind:=(ord(a[i]) - ord('0'))*2 +ca:=d div 10;d:=d- ca*10;c:=c+chr(ord('0')+d);while ca& 0 dobeginc:=c+chr(ord('0')+ca mod 10);ca :=ca div 10;mul2:=c;procedure decs(var a:ansistring);var i,ca,al:beginca:=1;
al:=length(a);
for i:=1 to al do begin if ca=1 then begin if a[i] ='0' then begin a[i]:='9'; ca:=1; end else begin a[i]:=chr(ord(a[i])-1); ca:=0; if al&1
begin if a[al]='0' then setlength(a,al-1); var s,t:begin {i:=0;while i&10 do begin} readln(n);s:='1';
do begin s:=mul2(s);dec(n);decs(s);writeln (rev(s));{}end.
提问者评价
谢谢你帮我大忙了
其他类似问题
为您推荐：
您可能关注的推广回答者：
hanoi塔的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁