碰到大难题了:如何计算一个汉字的笔划? (200分)

  • 主题发起人 主题发起人 harmer
  • 开始时间 开始时间
H

harmer

Unregistered / Unconfirmed
GUEST, unregistred user!
碰到大难题了
 
(不知道是否对你有用)转载:
-------------------------------------------
不好意思,忘回车了....
在信息处理中,常会遇到对中文信息按某种要求进行排序,例如对姓名按姓氏笔划排
序。而中文信息的排序较英文信息的排序要复杂许多,ASC II编码的有序性大大方便
英文信息排序的实现,那么要实现中文信息的按笔划排序,就得对中文信息进行重新
编码,这里的编码是指将汉字的内码信息转换为汉字按笔划排序的序号信息,新生成
的编码信息可按ASC II前后次序进行排序,从而实现汉字信息的姓氏笔划排序。
  为了实现汉字信息按姓氏笔划排序,首先需要创建一个全部汉字信息按姓氏笔划
排序的文本文件,然后根据该文本文件的汉字笔划排序的序号信息建立汉字--笔划编
码数据库文件,那么对指定的汉字信息字符串按汉字--笔划编码表转换成为按笔划排
序汉字的编码字符串,只需对编码字符串进行排序,就可实现汉字信息按笔划排序的
目的。
  以Dephi 与SQL Server为例介绍实现上述方法的过程:
  第一步、要创建一个全部汉字信息按姓氏笔划排序的文本文件,可以利用
Microsoft Word 6.0提供的按笔划排序的功能。先用任何一种熟悉的高级编程语言编
写一段能生成全部汉字内码的小程序(别忘了一个汉字一行),用来生成一个按姓氏笔
划排序的文本文件。然后在Word中打开该文件,并选择"表格/排序文字[T]..."这一
菜单项,将弹出一个对话框,这时只需将排序依据的类型设为"笔划"后按"确定"按
钮,那么就可以得到一份按姓氏笔划排序的全部汉字的文本文件。
  第二步:建立汉字--笔划编码数据库文件
  最简单的实现方法是用数据库直接记录汉字信息及其它的序号,从而形成编码表
文件。中文系统中编码汉字的总数大约7000个左右,那么就意味着序号需以长度为4
字节的字符串形式存放,才能保证汉字排序的统一性、可靠性。对于一个5个汉字的字
串而言,就得附加20字节的编码信息用于笔划排序。为了节约存贮空间,可采用百进
制编码方式表示汉字的序号。因为两位百进制数可以表示十进制数的范围是0~9999,
那么只需用两个字符用来分别存放百进制数的第一位和第二位,就可以表示任何一个
汉字的序号,而且这种编码显示是有序的(因为ASCII码是有序的)。同样的一个5个
汉字的字串现在只需附加一个10字节的编码信息用于笔划排序,比起上一种方法,采
用百进制编码方式可节约一半的存贮空间,尤其当数据库需排序的中文信息量较大,
做这样的节约是非常值得的。
  汉字--笔划编码数据库文件:Hzcodedb
  其结构为:
  HZ CHAR 2
  HZCODE CHAR 2
  {建立汉字--笔划编码表}
  hzsrc:Ttable;{按姓氏笔划排序的全部汉字信息文本文件,在Delphi 中可将文
本文件按Table处理}
  hzcodedb:Ttable;
// 需生成的汉字--笔划编码数据库
  var
  tmp1,tmp2:string;
  i,k,j:integer;
  begin

  hzsrc.open;
  hzcoded8b.open;
  i:=0;
  tmp:='';tmp1:='';
  Hzsrc.first;
  while not HzSrc.eofdo

  begin

  i:=i+1;
  k:=(i div 100);
  tmp1:=char(k+23);
//first char
  j:=i-k*100;
  tmp2:=char(j+23);
//second char
  tmp:=tmp1+tmp2;
  hzcodedb.append;

  hzcodedb.edit;
  hzcodedb['hz']:=hzsrc['field1'];
  hzcodedb.fieldbyname('hzcode').asstring:=tmp;
  hzcodedb.post;
  hzsrc.next;
  end;

  hzcodedb.close
  hzsrc.close;
  end;

  第三步:建立函数HZconvert( hzstring ),将指定的汉字信息字符串hzstring
转换成为按笔划排序汉字的编码字符串。
  Fuction HZconvert( hzstring: string ) : string ;

  var
  hzorder:string;
  tmp:string;
  i,startindex:integer;
  begin

  i:=length(hzstring);
  startindex:=1;
  hzorder:='';
  while (startindex<=i)do

  begin

  tmp:=copy(hzstring,startindex,2);
  startindex:=startindex+2;
  if hzcodedb.findKey([tmp]) then

  hzorder:=hzOrder+hzcodedb['hzorder']
  else

  hzorder:=hzOrder+'zz';
  end;
// end of while
  HZconvert:=hzorder;

  end;
// end of function
  在开发应用程序的过程中,以姓名的姓氏笔划排序为例,介绍HZconvert函数使
用。
  在数据库结构中,应包括以下的两项:
  姓名(NAME) VARCHAR 30
  姓名编码(NAMEORDER) VARCHAR 30
  VARCHAR是可变长字符串类型,定义姓名为VARCHAR类型是考虑到姓名的长短不
一,为了能既节约空间,又可以输入较长的姓名,而定义姓名为VARCHAR类型。
  Delphi中只需在TTABLE元件的BeforePost 事件中加入以下的代码就可生成姓名
的笔划编码:
  table1['nameorder']:=HZconvert(table1['name']);
  数据库内容建立完毕后,设置NameOrder为Index,就实现了姓名的按姓氏笔划排
序。
 
很简单,建一张汉字-笔划数对照表就可以了。
 
zhihuali的回答太详尽了,可惜人家好象是问的计算汉字笔划数,排序的时候按笔划的多少
排序,笔划数相同的才按“横、竖、撇、捺、折”排序。建一张汉字-笔划数的对照表看来是
必然的了,但如何建呢?
可不可以却找一找什么笔画输入法的编码文件(比如五笔画),将其编码长度转换成笔划数,
可是我还没有看到什么笔画输入法是一笔一划的输入的,最多只输入七、八笔吧,也即其对于
笔划数太多的编码长度也没笔划数多。我手机(Motorola)上的笔画输入法好像真是一笔一划的
输入的,可是有谁能找到它的编码文件?
 
将中文3000多常用字写入一个笔划表啊.
 
我K,要是一个字一个字的数笔划数,谁不会啊!可谁愿意这样做呢?
 
咱是要笔划数,字库能否直接读取输入法的?
别说自己创建字库的再来查询。
 
此问题既有解也无解,正解是自己一个个的做,所以说也是无解
http://www.delphibbs.com/delphibbs/dispq.asp?lid=495960
 
抄新華字典的索引目錄就行了.
不過,嘿嘿,抄啊........
 
建立一个表(name,num),把所有汉字录入(name),
并保存笔划(num,哈哈,自己数了录入...),再通过汉字检索出来...
有点笨,不过是可行的,最好找本新华字典参考
 
其实建一个 汉字 与 笔划 对照表 是最简单的
和可行的方法。
以前也用过什么取得汉拼代码的函数,
但都不怎么好用,后来还是建立了一个
汉字与拼音对照码表
 
建表吧,同志,别想偷懒了
 
建好后拿出来共享啊
 
这种对应表肯定早已有了,
我以前看到一个根据名字算命的软件 , 它就能把你输入的名字计算出笔划数来
你把那种软件拿来分析一下吧 , 可能能找到对应表的.
 
unit Global;
interface
uses
SysUtils, Controls, Forms, Windows,Stdctrls;
var
diction0:array[1..81] of string;{the dictionary}
diction1:array[1..12] of array[1..12] of string;{the dictionary}
procedure Bage;
procedure Xingzuo;
function GetBiHua(chnstr:string):integer;
implementation
uses Bage,Xingzuo;
procedure Bage;
begin
diction0[1]:=s0;
diction0[2]:=s1;
diction0[3]:=s2;
diction0[4]:=s3;
diction0[5]:=s4;
diction0[6]:=s5;
diction0[7]:=s6;
diction0[8]:=s7;
diction0[9]:=s8;
diction0[10]:=s9;
diction0[11]:=s10;
diction0[12]:=s11;
diction0[13]:=s12;
diction0[14]:=s13;
diction0[15]:=s14;
diction0[16]:=s15;
diction0[17]:=s16;
diction0[18]:=s17;
diction0[19]:=s18;
diction0[20]:=s19;
diction0[21]:=s20;
diction0[22]:=s21;
diction0[23]:=s22;
diction0[24]:=s23;
diction0[25]:=s24;
diction0[26]:=s25;
diction0[27]:=s26;
diction0[28]:=s27;
diction0[29]:=s28;
diction0[30]:=s29;
diction0[31]:=s30;
diction0[32]:=s31;
diction0[33]:=s32;
diction0[34]:=s33;
diction0[35]:=s34;
diction0[36]:=s35;
diction0[37]:=s36;
diction0[38]:=s37;
diction0[39]:=s38;
diction0[40]:=s39;
diction0[41]:=s40;
diction0[42]:=s41;
diction0[43]:=s42;
diction0[44]:=s43;
diction0[45]:=s44;
diction0[46]:=s45;
diction0[47]:=s46;
diction0[48]:=s47;
diction0[49]:=s48;
diction0[50]:=s49;
diction0[51]:=s50;
diction0[52]:=s51;
diction0[53]:=s52;
diction0[54]:=s53;
diction0[55]:=s54;
diction0[56]:=s55;
diction0[57]:=s56;
diction0[58]:=s57;
diction0[59]:=s58;
diction0[60]:=s59;
diction0[61]:=s60;
diction0[62]:=s61;
diction0[63]:=s62;
diction0[64]:=s63;
diction0[65]:=s64;
diction0[66]:=s65;
diction0[67]:=s65;
diction0[68]:=s67;
diction0[69]:=s68;
diction0[70]:=s69;
diction0[71]:=s70;
diction0[72]:=s71;
diction0[73]:=s72;
diction0[74]:=s73;
diction0[75]:=s74;
diction0[76]:=s75;
diction0[77]:=s76;
diction0[78]:=s77;
diction0[79]:=s78;
diction0[80]:=s79;
diction0[81]:=s80;
end;

procedure Xingzuo;
begin
diction1[1,1]:=a1;
diction1[1,2]:=a2;
diction1[1,3]:=a3;
diction1[1,4]:=a4;
diction1[1,5]:=a5;
diction1[1,6]:=a6;
diction1[1,7]:=a7;
diction1[1,8]:=a8;
diction1[1,9]:=a9;
diction1[1,10]:=a10;
diction1[1,11]:=a11;
diction1[1,12]:=a12;
diction1[2,1]:=b1;
diction1[2,2]:=b2;
diction1[2,3]:=b3;
diction1[2,4]:=b4;
diction1[2,5]:=b5;
diction1[2,6]:=b6;
diction1[2,7]:=b7;
diction1[2,8]:=b8;
diction1[2,9]:=b9;
diction1[2,10]:=b10;
diction1[2,11]:=b11;
diction1[2,12]:=b12;
diction1[3,1]:=c1;
diction1[3,2]:=c2;
diction1[3,3]:=c3;
diction1[3,4]:=c4;
diction1[3,5]:=c5;
diction1[3,6]:=c6;
diction1[3,7]:=c7;
diction1[3,8]:=c8;
diction1[3,9]:=c9;
diction1[3,10]:=c10;
diction1[3,11]:=c11;
diction1[3,12]:=c12;
diction1[4,1]:=d1;
diction1[4,2]:=d2;
diction1[4,3]:=d3;
diction1[4,4]:=d4;
diction1[4,5]:=d5;
diction1[4,6]:=d6;
diction1[4,7]:=d7;
diction1[4,8]:=d8;
diction1[4,9]:=d9;
diction1[4,10]:=d10;
diction1[4,11]:=d11;
diction1[4,12]:=d12;
diction1[5,1]:=e1;
diction1[5,2]:=e2;
diction1[5,3]:=e3;
diction1[5,4]:=e4;
diction1[5,5]:=e5;
diction1[5,6]:=e6;
diction1[5,7]:=e7;
diction1[5,8]:=e8;
diction1[5,9]:=e9;
diction1[5,10]:=e10;
diction1[5,11]:=e11;
diction1[5,12]:=e12;
diction1[6,1]:=f1;
diction1[6,2]:=f2;
diction1[6,3]:=f3;
diction1[6,4]:=f4;
diction1[6,5]:=f5;
diction1[6,6]:=f6;
diction1[6,7]:=f7;
diction1[6,8]:=f8;
diction1[6,9]:=f9;
diction1[6,10]:=f10;
diction1[6,11]:=f11;
diction1[6,12]:=f12;
diction1[7,1]:=g1;
diction1[7,2]:=g2;
diction1[7,3]:=g3;
diction1[7,4]:=g4;
diction1[7,5]:=g5;
diction1[7,6]:=g6;
diction1[7,7]:=g7;
diction1[7,8]:=g8;
diction1[7,9]:=g9;
diction1[7,10]:=g10;
diction1[7,11]:=g11;
diction1[7,12]:=g12;
diction1[8,1]:=h1;
diction1[8,2]:=h2;
diction1[8,3]:=h3;
diction1[8,4]:=h4;
diction1[8,5]:=h5;
diction1[8,6]:=h6;
diction1[8,7]:=h7;
diction1[8,8]:=h8;
diction1[8,9]:=h9;
diction1[8,10]:=h10;
diction1[8,11]:=h11;
diction1[8,12]:=h12;
diction1[9,1]:=i1;
diction1[9,2]:=i2;
diction1[9,3]:=i3;
diction1[9,4]:=i4;
diction1[9,5]:=i5;
diction1[9,6]:=i6;
diction1[9,7]:=i7;
diction1[9,8]:=i8;
diction1[9,9]:=i9;
diction1[9,10]:=i10;
diction1[9,11]:=i11;
diction1[9,12]:=i12;
diction1[10,1]:=j1;
diction1[10,2]:=j2;
diction1[10,3]:=j3;
diction1[10,4]:=j4;
diction1[10,5]:=j5;
diction1[10,6]:=j6;
diction1[10,7]:=j7;
diction1[10,8]:=j8;
diction1[10,9]:=j9;
diction1[10,10]:=j10;
diction1[10,11]:=j11;
diction1[10,12]:=j12;
diction1[11,1]:=k1;
diction1[11,2]:=k2;
diction1[11,3]:=k3;
diction1[11,4]:=k4;
diction1[11,5]:=k5;
diction1[11,6]:=k6;
diction1[11,7]:=k7;
diction1[11,8]:=k8;
diction1[11,9]:=k9;
diction1[11,10]:=k10;
diction1[11,11]:=k11;
diction1[11,12]:=k12;
diction1[12,1]:=l1;
diction1[12,2]:=l2;
diction1[12,3]:=l3;
diction1[12,4]:=l4;
diction1[12,5]:=l5;
diction1[12,6]:=l6;
diction1[12,7]:=l7;
diction1[12,8]:=l8;
diction1[12,9]:=l9;
diction1[12,10]:=l10;
diction1[12,11]:=l11;
diction1[12,12]:=l12;
end;
//求输入汉字的笔画
function GetBiHua(chnstr:string):integer;
const
BiHuaTable=
#10#7#10#10#8#10#9#11#17#14#13#5#13#10#12#15+
#10#6#10#9#12#8#10#10#8#8#10#5#10#14#16#9+
#12#12#15#15#7#10#5#5#7#10#2#9#4#8#12#13+
#7#10#7#21#10#8#5#9#6#13#8#8#9#13#12#10+
#13#7#10#10#8#8#7#8#7#19#5#4#8#6#9#10+
#14#14#9#12#15#10#15#12#12#8#9#5#15#10#16#13+
#9#12#8#8#8#7#15#10#13#19#8#13#12#8#5#12+
#9#4#9#10#7#8#12#12#10#8#8#5#11#11#11#9+
#9#18#9#12#14#4#13#10#8#14#13#14#6#10#9#4+
#7#13#6#11#14#5#13#16#17#16#9#18#5#12#8#9+
#9#8#4#16#16#17#12#9#11#15#8#19#15#7#15#11+
#12#16#13#10#13#7#6#9#5#8#9#9#10#6#9#11+
#15#8#10#8#12#9#13#10#14#7#8#11#11#14#12#8+
#7#10#2#10#7#11#4#5#7#19#10#8#17#11#12#7+
#3#7#13#15#8#11#11#14#16#8#10#9#11#11#7#7+
#10#4#7#17#16#16#15#11#9#8#12#8#5#9#7#19+
#12#3#9#9#9#14#12#14#7#9#8#8#10#10#12#11+
#11#12#11#13#11#6#11#19#8#11#6#9#11#4#11#7+
#2#12#8#11#10#12#7#9#12#15#15#11#7#8#4#7+
#15#12#7#15#10#6#7#6#11#7#7#7#12#8#15#10+
#9#16#6#7#8#12#12#15#8#8#10#10#10#6#13#9+
#11#6#7#6#6#10#8#8#4#7#10#5#9#6#6#6+
#11#8#8#13#12#14#13#13#13#4#11#14#4#10#7#5+
#16#12#18#12#13#12#9#13#10#12#24#13#13#5#12#3+
#9#13#6#11#12#7#9#12#15#7#6#6#7#8#11#13+
#8#9#13#15#10#11#7#21#18#11#11#9#14#14#13#13+
#10#7#6#8#12#6#15#12#7#5#4#5#11#11#15#14+
#9#19#16#12#14#11#13#10#13#14#11#14#7#6#3#14+
#15#12#11#10#13#12#6#12#14#5#3#7#4#12#17#9+
#9#5#9#11#9#11#9#10#8#4#8#10#11#9#5#12+
#7#11#11#8#11#11#6#9#10#9#10#2#10#17#10#7+
#11#6#8#15#11#12#11#15#11#8#19#6#12#12#17#14+
#4#12#7#14#8#10#11#7#10#14#14#7#8#6#12#11+
#9#7#10#12#16#11#13#13#9#8#16#9#5#7#7#8+
#11#12#11#13#13#5#16#10#2#11#6#8#10#12#10#14+
#15#8#11#13#2#7#5#7#8#12#13#8#4#6#5#5+
#12#15#6#9#8#9#7#9#11#7#4#9#7#10#12#10+
#13#9#12#9#10#11#13#12#7#14#7#9#12#7#14#12+
#14#9#11#12#11#7#4#5#15#7#19#12#10#7#9#9+
#12#11#9#6#6#9#13#6#13#11#8#12#11#13#10#12+
#9#15#6#10#10#4#7#12#11#10#10#6#2#6#5#9+
#9#2#9#5#9#12#6#4#9#8#9#18#6#12#18#15+
#8#8#17#3#10#4#7#8#8#5#7#7#7#7#4#8+
#8#6#7#6#6#7#8#11#8#11#3#8#10#10#7#8+
#8#8#9#7#11#7#8#4#7#7#12#7#10#8#6#8+
#12#12#4#9#8#13#10#12#4#9#11#10#5#13#6#8+
#4#7#7#4#15#8#14#7#8#13#12#9#11#6#9#8+
#10#11#13#11#5#7#7#11#10#10#8#11#12#8#14#9+
#11#18#12#9#12#5#8#4#13#6#12#4#7#6#13#8+
#15#14#8#7#13#9#11#12#3#5#7#9#9#7#10#13+
#8#11#21#4#6#9#9#7#7#7#12#7#16#10#10#14+
#10#16#13#15#15#7#10#14#12#4#11#10#8#12#9#12+
#10#12#9#12#11#3#6#9#10#13#10#7#8#19#10#10+
#11#3#7#5#10#11#8#10#4#9#3#6#7#9#7#6+
#9#4#7#8#8#9#8#8#11#12#11#8#14#7#8#8+
#8#13#5#11#9#7#8#9#10#8#12#8#5#9#14#9+
#13#8#8#8#12#6#8#9#6#14#11#23#11#20#8#6+
#3#10#13#8#6#11#5#7#9#6#9#8#9#10#8#13+
#9#8#12#13#12#12#10#8#8#14#6#9#15#9#10#10+
#6#10#9#12#15#7#12#7#11#12#8#12#7#16#16#10+
#7#16#10#11#6#5#5#8#10#17#17#14#11#9#6#10+
#5#10#8#12#10#11#10#5#8#7#6#11#13#9#8#11+
#14#14#15#9#15#12#11#9#9#9#10#7#15#16#9#8+
#9#10#9#11#9#7#5#6#12#9#12#7#9#10#6#8+
#5#8#13#10#12#9#15#8#15#12#8#8#11#7#4#7+
#4#7#9#6#12#12#8#6#4#8#13#9#7#11#7#6+
#8#10#7#12#10#11#10#12#13#11#10#9#4#9#12#11+
#16#15#17#9#11#12#13#10#13#9#11#6#9#12#17#9+
#12#6#13#10#15#5#12#11#10#11#6#10#5#6#9#9+
#9#8#11#13#9#11#17#9#6#4#10#8#12#16#8#11+
#5#6#11#6#13#15#10#14#6#5#9#16#4#7#10#11+
#12#6#7#12#13#20#12#3#9#10#6#7#13#6#9#2+
#10#3#13#7#16#8#6#11#8#11#9#11#11#4#5#9+
#7#7#7#10#6#14#9#6#8#10#5#9#12#10#5#10+
#11#15#6#9#8#13#7#10#7#6#11#7#13#10#8#8+
#6#12#9#11#9#14#12#8#10#13#9#11#11#9#14#13+
#12#9#4#13#15#6#10#10#9#8#11#12#12#8#15#9+
#9#10#6#19#12#10#9#6#6#13#8#15#12#17#12#10+
#6#8#9#9#9#20#12#11#11#8#11#9#7#9#16#9+
#13#11#14#10#10#5#12#12#11#9#11#12#6#14#7#5+
#10#8#11#13#14#9#9#13#8#7#17#7#9#10#4#9+
#9#8#3#12#4#8#4#9#18#10#13#4#13#7#13#10+
#13#7#10#10#6#7#9#14#8#13#12#16#8#11#14#13+
#8#4#19#12#11#14#14#12#16#8#10#13#11#10#8#9+
#12#12#7#5#7#9#3#7#2#10#11#11#5#6#13#8+
#12#8#17#8#8#10#8#8#11#7#8#9#9#8#14#7+
#11#4#8#11#15#13#10#5#11#8#10#10#12#10#10#11+
#8#10#15#23#7#11#10#17#9#6#6#9#7#11#9#6+
#7#10#9#12#10#9#10#12#8#5#9#4#12#13#8#12+
#5#12#11#7#9#9#11#14#17#6#7#4#8#6#9#10+
#15#8#8#9#12#15#14#9#7#9#5#12#7#8#9#10+
#8#11#9#10#7#7#8#10#4#11#7#3#6#11#9#10+
#13#8#14#7#12#6#9#9#13#10#7#13#8#7#10#12+
#6#12#7#10#8#11#7#7#3#11#8#13#12#9#13#11+
#12#12#12#8#8#10#7#9#6#13#12#8#8#12#14#12+
#14#11#10#7#13#13#11#9#8#16#12#5#15#14#12#9+
#16#12#9#13#11#12#10#11#8#10#10#10#7#7#6#8+
#9#13#10#10#11#5#13#18#16#15#11#17#9#16#6#9+
#8#12#13#7#9#11#11#15#16#10#10#13#11#7#7#15+
#5#10#9#6#10#7#5#5#10#4#7#12#8#9#12#5+
#11#7#8#2#14#10#9#12#10#7#18#13#8#10#8#11+
#11#12#10#9#8#13#10#11#13#7#7#11#12#12#9#10+
#15#11#14#7#16#14#5#15#2#14#17#14#10#6#12#10+
#6#11#12#8#17#16#9#7#20#11#15#10#7#8#9#11+
#13#13#10#7#11#10#7#10#8#11#5#5#13#11#14#12+
#13#10#6#15#10#9#4#5#11#8#11#16#11#8#8#7+
#13#9#12#12#14#8#7#5#11#7#8#11#7#8#12#19+
#13#21#13#10#11#16#11#8#7#15#7#6#11#8#10#15+
#12#12#10#12#9#11#13#11#9#10#9#13#7#7#11#11+
#7#8#6#4#7#7#6#11#17#8#11#13#14#14#13#12+
#9#9#9#6#11#7#8#9#3#9#14#6#10#6#7#8+
#6#9#15#14#12#13#14#11#14#14#13#6#9#8#8#6+
#10#11#8#13#4#5#10#5#8#9#12#14#9#3#8#8+
#11#14#15#13#7#9#12#14#7#9#9#12#8#12#3#7+
#5#11#13#17#13#13#11#11#8#11#16#19#17#9#11#8+
#6#10#8#8#14#11#12#12#10#11#11#7#9#10#12#9+
#8#11#13#17#9#12#8#7#14#5#5#8#5#11#10#9+
#8#16#8#11#6#8#13#13#14#19#14#14#16#15#20#8+
#5#10#15#16#8#13#13#8#11#6#9#8#7#7#8#5+
#13#14#13#12#14#4#5#13#8#16#10#9#7#9#6#9+
#7#6#2#5#9#8#9#7#10#22#9#10#9#8#11#8+
#10#4#14#10#8#16#10#8#5#7#7#10#13#9#13#14+
#8#6#15#15#11#8#10#14#5#7#10#10#19#11#15#15+
#10#11#9#8#16#5#8#8#4#7#9#7#10#9#6#7+
#5#7#9#3#13#9#8#9#17#20#10#10#8#9#8#18+
#7#11#7#11#9#8#8#8#12#8#11#12#11#12#9#19+
#15#11#15#9#10#7#9#6#8#10#16#9#7#8#7#9+
#10#12#8#8#9#11#14#12#10#10#8#7#12#9#10#8+
#11#15#12#13#12#13#16#16#8#12#11#13#8#9#21#7+
#8#15#12#9#11#12#10#5#4#12#15#7#20#15#11#4+
#12#15#14#16#11#14#16#9#13#8#9#13#6#8#8#11+
#5#8#10#7#9#8#8#11#11#10#14#8#11#10#5#12+
#4#10#12#11#13#10#6#10#12#10#14#19#18#12#12#10+
#11#8#2#10#14#9#7#8#12#8#7#11#11#10#6#14+
#8#6#11#10#6#3#6#7#9#9#16#4#6#7#7#8+
#5#11#9#9#9#6#8#10#3#6#13#5#12#11#16#10+
#10#9#15#13#8#15#11#12#4#14#8#7#12#7#14#14+
#12#7#16#14#14#10#10#17#6#8#5#16#15#12#10#9+
#10#4#8#5#8#9#9#9#9#10#12#13#7#15#12#13+
#7#8#9#9#10#10#11#16#12#12#11#8#10#6#12#7+
#9#5#7#11#7#5#9#8#12#4#11#6#11#8#7#11+
#8#11#17#15#5#11#23#6#16#9#6#11#10#4#8#4+
#10#8#16#7#13#14#12#11#12#13#12#16#5#9#22#20+
#20#20#5#9#7#9#12#10#4#4#2#7#7#6#4#3+
#7#6#5#4#4#6#9#13#9#16#14#13#10#9#4#12+
#9#6#9#20#16#17#6#10#8#6#2#15#8#6#15#13+
#12#7#10#8#10#15#9#11#13#17#13#14#3#8#6#12+
#10#13#8#12#12#6#12#13#6#10#12#14#10#9#6#8+
#7#7#13#11#13#12#10#9#8#7#3#7#14#8#5#8+
#16#17#16#12#6#10#15#14#6#11#12#10#3#8#14#11+
#10#12#10#6#3#14#4#10#7#8#11#11#11#6#8#11+
#13#10#13#10#7#6#10#5#8#7#7#11#10#8#9#7+
#8#11#9#8#13#11#7#5#12#9#4#11#9#11#12#9+
#5#6#5#9#9#12#8#3#8#2#5#9#7#4#9#9+
#8#7#5#5#8#9#8#8#6#5#3#5#9#8#9#14+
#10#8#9#13#16#9#5#8#12#8#4#5#9#9#8#8+
#6#4#9#6#7#11#11#8#14#11#15#8#11#10#7#13+
#8#12#11#12#4#12#11#15#16#12#17#13#13#12#13#12+
#5#8#9#7#6#9#14#11#13#14#10#8#9#14#10#5+
#5#10#9#17#4#11#10#4#13#12#7#17#9#12#9#11+
#10#8#12#15#15#9#7#5#5#6#13#6#13#5#7#6+
#8#3#8#10#8#10#9#7#6#9#12#15#16#14#7#12+
#9#10#10#12#14#13#13#11#7#8#14#13#14#9#11#11+
#10#21#13#6#17#12#14#10#6#10#10#13#11#10#14#11+
#10#12#8#13#5#5#6#12#16#9#17#15#9#8#8#5+
#10#11#4#8#7#7#13#8#15#13#7#17#13#15#14#10+
#8#12#10#14#11#5#9#6#13#13#11#12#15#10#16#10+
#15#11#15#10#11#10#13#10#11#10#9#11#10#5#10#10+
#18#13#10#13#11#10#15#12#12#15#16#12#7#12#17#11+
#10#9#8#4#11#13#5#11#9#14#12#9#7#8#11#13+
#9#10#8#4#7#9#5#6#11#9#9#9#12#10#10#13+
#17#6#11#7#12#11#10#12#9#12#11#7#5#10#5#7+
#9#8#10#10#10#11#3#6#8#12#6#11#13#13#13#13+
#9#7#4#17#8#6#11#10#7#6#8#12#7#8#11#9+
#9#12#9#9#4#10#9#5#15#9#12#8#10#3#11#7+
#13#10#11#12#11#8#11#3#12#7#4#3#8#6#8#8+
#11#7#6#9#20#13#6#4#7#10#7#11#11#4#14#11+
#7#11#8#6#6#7#7#5#14#8#9#9#12#17#7#12+
#11#11#15#3#14#12#10#4#9#7#7#14#10#6#13#10+
#8#9#13#10#12#7#14#8#12#7#7#7#9#4#6#9+
#9#4#7#11#7#7#4#8#4#10#4#14#6#9#7#5+
#13#11#8#4#5#10#9#8#14#8#6#11#8#12#15#6+
#13#10#12#10#7#11#15#3#11#14#11#13#6#12#17#11+
#10#3#13#12#11#9#7#12#6#8#15#9#7#17#14#13+
#9#8#9#3#12#10#6#11#13#6#5#14#6#9#8#11+
#11#7#9#8#13#9#9#8#13#7#13#11#12#9#10#8+
#8#9#11#22#9#15#17#12#3#12#10#8#13#9#8#9+
#9#15#13#6#11#11#12#15#9#10#18#12#10#10#11#10+
#3#7#10#7#11#10#10#13#8#13#15#15#6#9#13#6+
#11#8#11#5#11#9#19#16#8#8#12#10#16#7#12#8+
#7#13#7#4#9#11#9#13#12#12#6#6#9#7#6#6+
#16#8#7#8#8#5#4#10#6#7#12#14#6#9#10#6+
#13#12#7#10#10#14#6#14#11#14#9#10#6#13#11#9+
#6#7#10#9#12#12#11#11#7#12#9#11#11#5#9#19+
#10#9#13#16#8#5#11#6#9#14#12#6#8#6#6#6+
#10#6#5#5#9#6#6#8#9#10#7#3#7#4#10#11+
#13#11#12#9#6#6#11#9#11#10#11#10#7#9#12#8+
#6#7#15#11#8#8#8#11#11#9#14#10#12#16#6#9+
#12#10#9#12#10#11#10#9#5#10#10#7#6#8#8#6+
#9#6#10#6#11#9#10#14#16#13#7#14#13#6#13#11+
#12#9#9#10#9#9#20#12#15#8#6#11#7#3#6#11+
#5#5#6#12#8#11#1#12#7#12#11#8#6#6#13#6+
#12#11#5#10#14#7#8#9#18#12#9#10#3#1#7#4+
#4#7#8#7#6#3#7#17#11#13#9#6#13#13#15#4+
#3#10#13#8#5#10#7#6#17#11#8#9#9#6#10#9+
#6#9#7#11#11#11#7#4#4#11#5#8#15#11#18#7+
#14#10#11#11#9#14#7#17#9#15#13#10#9#9#8#7+
#17#10#11#13#14#13#8#8#10#5#11#9#5#9#6#11+
#7#4#5#7#10#7#8#12#7#6#4#5#7#12#9#2+
#5#6#11#3#8#13#13#13#14#7#9#12#8#12#12#11+
#11#4#10#8#3#6#9#6#9#6#5#11#6#8#6#12+
#12#10#12#13#11#9#8#13#10#12#12#10#15#5#10#11+
#10#4#9#10#10#12#14#7#7#10#13#13#12#7#8#14+
#9#9#4#6#12#11#9#8#12#4#10#10#10#4#9#4+
#9#4#7#15#11#10#13#5#5#10#6#10#9#7#10#10+
#6#6#9#19#12#16#10#10#12#14#17#12#19#8#6#16+
#9#20#16#10#7#7#17#8#8#6#8#10#9#15#15#12+
#16#4#12#12#5#5#11#8#9#9#14#8#5#9#7#14+
#10#6#10#10#14#18#9#13#11#8#10#8#14#11#10#22+
#9#5#9#10#12#11#15#11#14#14#7#12#10#7#3#7+
#8#5#8#16#13#8#9#7#8#9#13#13#6#14#5#14+
#7#10#12#16#8#13#14#7#10#9#13#10#13#10#16#6+
#7#8#8#10#7#15#10#15#6#13#9#11#8#9#6#8+
#16#9#5#9#9#10#8#7#6#8#4#7#14#8#8#10+
#5#3#8#11#8#12#12#6#10#8#7#9#4#11#5#6+
#7#7#10#11#6#10#13#8#9#8#12#10#13#8#8#11+
#12#8#11#4#9#8#9#10#8#9#8#9#6#6#6#8+
#6#9#7#12#9#7#8#8#10#8#9#17#10#10#12#6+
#11#10#8#10#6#10#12#8#17#15#5#11#9#7#11#8+
#12#12#7#8#9#8#7#4#9#4#9#8#15#14#15#10+
#6#12#6#15#6#7#12#13#9#14#7#11#10#10#10#8+
#8#10#12#8#10#11#11#7#9#9#9#10#9#12#11#7+
#12#5#9#13#3#6#11#6#18#12#15#8#11#9#7#7+
#7#9#12#10#7#8#11#9#7#7#8#10#20#16#15#12+
#13#12#15#9#5#7#9#11#7#7#10#0#0#0#0#0+
#3#3#3#4#4#4#5#6#6#10#10#16#0#9#0#2+
#3#4#4#5#5#6#9#11#14#14#19#0#8#14#2#6+
#4#7#7#11#14#4#6#10#11#12#14#15#16#0#5#8+
#11#11#15#8#7#0#4#6#7#8#8#8#9#10#10#10+
#13#13#14#14#15#16#0#8#0#4#4#4#5#5#5#5+
#6#6#6#6#6#6#6#6#6#7#7#7#7#7#7#7+
#7#7#8#8#8#8#8#8#8#8#8#8#8#8#9#9+
#9#9#9#9#9#9#9#10#10#10#10#10#10#10#10#10+
#10#10#10#10#11#11#11#11#11#11#11#12#12#12#13#14+
#14#14#14#14#14#15#15#5#6#7#7#8#17#6#8#4+
#12#16#17#18#21#0#9#9#11#6#6#7#0#8#10#10+
#11#12#12#12#13#16#19#19#0#6#8#8#10#0#10#10+
#0#5#5#5#6#6#6#7#7#7#7#7#7#8#8#8+
#8#8#8#8#8#8#8#8#9#9#9#9#10#10#10#10+
#10#10#10#11#11#11#11#11#11#11#11#11#11#11#12#12+
#12#12#12#13#13#14#14#14#15#15#19#0#8#0#5#5+
#6#6#7#7#7#7#8#9#9#10#10#10#11#11#11#16+
#5#5#5#5#6#6#7#7#7#7#7#7#8#8#8#8+
#8#8#8#9#9#9#9#9#10#10#11#11#13#13#13#14+
#14#16#19#20#5#7#5#7#7#8#10#10#11#15#9#17+
#20#0#0#6#10#2#5#10#12#7#9#9#14#16#16#17+
#6#6#6#6#6#6#6#7#7#7#8#8#8#8#8#8+
#8#8#8#8#9#9#9#9#9#9#9#9#9#10#10#10+
#10#10#10#11#11#11#11#11#11#11#11#11#11#12#12#12+
#12#13#13#14#14#14#15#20#21#22#0#5#5#6#6#6+
#6#6#6#6#7#7#7#7#7#7#7#7#7#7#7#7+
#7#7#7#7#7#7#7#7#7#7#7#8#8#8#8#8+
#8#8#8#8#8#8#8#8#8#8#8#8#8#8#9#9+
#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9+
#9#9#9#9#9#9#9#9#9#9#9#9#9#10#10#10+
#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10+
#10#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11+
#11#11#11#11#11#11#11#11#11#11#11#12#12#12#12#12+
#12#12#12#12#12#12#12#12#12#12#12#12#12#13#13#13+
#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14+
#14#14#14#14#14#14#14#14#15#15#15#15#15#15#15#15+
#15#16#16#16#16#16#16#16#16#16#17#17#17#17#17#18+
#19#19#19#20#20#22#0#9#6#7#9#9#10#10#11#0+
#6#7#13#0#6#7#8#8#8#8#9#9#9#10#10#10+
#11#11#11#11#11#11#11#11#11#11#11#11#12#12#12#12+
#12#12#12#12#12#12#13#13#13#13#13#13#13#13#14#14+
#14#14#14#15#15#15#15#16#16#16#17#17#19#23#25#3+
#7#8#12#5#5#5#5#5#5#6#6#6#7#7#7#7+
#7#7#7#7#7#7#7#8#8#8#8#8#8#8#8#8+
#8#8#9#9#9#9#9#9#9#9#9#9#9#9#9#9+
#9#9#9#9#9#9#9#9#9#9#10#10#10#10#10#10+
#10#10#10#10#10#11#11#11#11#11#11#11#11#11#11#11+
#11#11#11#11#11#11#11#11#12#12#12#12#12#12#12#12+
#12#12#12#12#12#12#12#12#12#13#13#13#13#13#13#13+
#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14+
#14#14#14#14#14#14#14#15#15#15#15#15#15#15#15#15+
#15#15#16#16#16#16#16#16#17#17#19#25#0#6#6#7+
#7#8#9#10#11#11#16#7#8#8#8#10#11#11#11#12+
#14#14#15#15#6#6#7#7#7#7#7#7#7#7#7#8+
#8#8#8#8#8#8#8#8#8#9#9#9#9#10#10#11+
#11#11#11#11#11#11#12#12#12#12#12#12#12#12#12#12+
#13#13#13#14#15#15#17#17#19#3#7#8#9#9#9#10+
#11#11#12#13#15#16#24#0#0#5#6#6#6#7#7#8+
#8#8#9#9#9#9#10#10#10#10#10#10#10#11#11#11+
#11#11#11#11#12#12#12#12#12#12#14#14#15#15#16#17+
#20#6#14#12#14#0#0#6#7#7#7#7#7#8#9#10+
#10#11#12#12#13#13#14#15#15#25#5#7#7#8#9#9+
#11#11#11#11#12#13#14#15#16#16#17#0#5#6#6#7+
#7#7#7#7#7#7#7#7#7#7#8#8#8#8#8#8+
#8#8#8#8#8#9#9#9#9#9#9#9#10#10#10#10+
#10#10#10#10#11#11#11#11#11#11#11#11#12#12#12#12+
#12#12#12#13#13#14#15#15#15#16#16#18#8#17#4#6+
#7#7#7#7#9#9#10#10#10#11#11#11#11#11#11#12+
#12#13#13#13#14#0#4#8#0#6#6#6#7#7#7#7+
#7#7#7#7#7#7#7#7#8#8#8#8#8#8#8#8+
#8#8#8#8#8#8#8#8#9#9#9#9#9#9#9#9+
#9#9#9#9#9#9#9#9#9#9#10#10#10#10#10#10+
#10#10#10#10#10#11#11#11#11#11#11#11#11#11#11#11+
#11#11#11#11#12#12#12#12#12#12#12#12#12#12#12#12+
#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13+
#13#14#14#14#14#14#14#14#14#14#14#14#14#14#14#15+
#15#15#15#15#15#16#16#16#16#16#16#17#17#17#17#17+
#19#19#19#20#20#21#24#0#5#8#8#9#10#12#13#14+
#14#15#16#16#17#17#0#7#7#8#8#8#8#8#8#8+
#9#9#10#10#10#10#10#10#11#11#11#11#12#12#12#12+
#13#13#13#13#15#15#16#16#17#17#18#0#11#9#12#5+
#9#10#10#12#14#15#21#8#8#9#11#12#22#0#6#6+
#7#7#7#7#7#7#7#7#7#7#8#8#8#8#9#9+
#9#9#9#9#9#10#10#10#10#10#10#10#10#11#11#11+
#11#11#11#11#12#12#12#12#13#13#13#13#13#13#14#14+
#14#14#14#14#14#15#16#16#17#17#20#5#9#7#8#12+
#3#3#8#8#8#8#8#8#8#8#9#9#9#10#11#11+
#11#11#12#12#13#13#13#14#14#15#19#20#0#6#6#6+
#6#6#7#7#7#8#8#8#8#8#8#8#9#9#9#10+
#10#10#11#11#11#11#11#11#11#11#11#11#11#12#12#12+
#12#12#12#12#12#12#12#13#13#13#13#13#13#13#13#14+
#14#14#14#14#15#15#15#16#16#16#16#19#3#15#3#8+
#10#6#6#8#8#8#9#9#9#9#9#9#9#9#10#10+
#10#10#10#10#10#10#10#11#12#12#12#12#12#12#12#12+
#12#12#13#13#13#13#13#14#14#15#15#15#15#15#15#15+
#16#17#17#17#18#20#19#13#13#14#7#7#7#7#7#8+
#8#8#8#8#8#8#8#8#8#8#8#8#9#9#9#9+
#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#10+
#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10+
#10#10#11#11#11#11#11#11#11#12#12#12#12#12#12#12+
#12#12#12#12#12#13#13#13#13#13#13#13#13#13#13#13+
#13#13#13#13#13#13#13#13#14#14#14#14#14#14#14#14+
#14#14#14#14#14#15#15#15#15#15#15#15#14#16#16#16+
#16#16#16#16#16#16#16#16#17#17#17#17#18#13#14#8+
#9#9#9#11#11#11#12#12#14#16#7#8#9#9#9#9+
#9#9#9#9#9#10#10#10#10#11#12#12#12#12#13#15+
#16#10#5#8#11#12#12#13#13#13#14#14#8#9#12#16+
#16#17#4#6#6#7#8#8#8#8#8#8#8#9#9#9+
#9#9#9#10#10#10#10#10#10#11#11#12#13#13#14#14+
#16#18#18#20#21#9#9#9#9#10#10#10#10#11#11#11+
#12#12#14#9#10#11#12#13#14#15#15#9#16#6#8#9+
#11#11#12#12#12#13#14#10#11#12#14#17#10#10#12#12+
#12#13#16#16#16#22#5#6#7#7#9#10#10#11#13#0+
#11#13#12#13#15#9#15#6#7#7#7#8#8#8#8#8+
#8#8#8#9#9#9#9#9#9#9#9#9#9#9#9#9+
#10#10#10#10#10#10#10#10#10#11#11#11#11#11#11#12+
#12#12#12#12#12#12#13#13#13#13#13#13#13#13#14#14+
#14#15#15#16#17#17#17#17#17#16#7#11#12#13#13#16+
#9#9#12#13#16#16#4#13#13#17#12#15#16#8#10#10+
#10#11#11#13#14#7#8#8#8#9#9#9#9#9#10#10+
#11#11#11#12#12#13#13#13#13#13#13#13#13#14#15#15+
#15#15#16#16#16#18#21#30#0#11#13#16#8#8#9#11+
#12#0#7#8#8#9#9#9#9#9#9#9#10#10#12#12+
#13#14#16#21#7#7#9#10#10#10#10#10#10#11#13#13+
#14#16#16#17#17#25#0#6#8#9#12#7#8#8#9#9+
#9#9#9#9#9#10#10#10#10#10#10#10#10#10#10#11+
#11#11#11#11#11#11#11#12#13#13#13#13#13#14#14#14+
#14#14#15#15#15#16#16#17#17#18#19#18#21#11#12#17+
#19#8#9#9#9#9#9#10#10#10#11#11#11#11#12#12+
#12#12#13#13#13#13#14#14#14#14#15#15#16#16#16#17+
#18#7#8#9#9#9#10#12#13#17#9#10#10#12#13#14+
#14#16#17#17#10#16#23#0#6#6#7#7#7#8#8#8+
#8#8#8#9#9#9#9#9#9#9#9#9#9#10#10#10+
#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10+
#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11+
#11#11#11#11#11#11#11#11#11#11#12#12#12#12#12#12+
#12#12#12#12#12#12#12#12#12#12#12#13#13#13#13#13+
#13#13#13#13#13#13#13#14#14#14#14#14#14#14#14#14+
#14#14#14#15#15#15#15#15#15#15#15#16#16#16#16#16+
#16#16#16#17#17#17#17#17#17#17#17#17#17#18#18#18+
#19#20#14#9#12#13#9#9#10#10#11#12#12#12#13#13+
#15#15#16#17#18#22#9#11#12#13#17#10#11#7#7#8+
#9#9#10#10#10#10#10#10#11#11#11#11#11#12#12#12+
#12#12#12#13#13#13#13#13#14#14#14#14#14#15#15#16+
#16#16#17#17#17#17#19#18#22#0#7#7#8#8#9#9+
#10#10#10#10#10#10#10#10#11#11#12#12#12#12#12#12+
#13#13#13#13#13#13#13#14#14#14#14#14#14#14#15#15+
#15#15#16#16#16#16#16#16#16#16#17#18#18#18#18#21+
#23#11#12#8#8#9#9#10#11#13#13#14#14#14#15#0+
#8#9#9#9#9#10#11#11#11#11#12#12#12#12#13#13+
#13#13#13#13#14#14#14#14#14#15#15#16#17#19#24#5+
#9#11#12#9#6#9#10#11#12#13#14#15#15#16#16#22+
#12#8#11#11#11#12#15#16#12#9#10#10#12#12#12#12+
#13#15#15#16#16#16#18#20#21#0#10#7#8#9#9#9+
#9#10#10#10#10#10#10#10#10#10#10#11#11#11#11#11+
#11#11#11#11#11#11#12#12#12#12#12#12#12#12#12#12+
#12#12#13#13#13#13#13#13#13#13#14#14#14#14#14#14+
#14#14#14#14#14#14#14#14#15#15#15#15#15#15#15#15+
#15#15#15#15#15#15#16#16#16#16#16#16#16#16#16#16+
#17#17#17#17#17#17#17#17#17#17#17#18#18#18#18#19+
#19#19#19#20#21#24#26#6#14#17#17#10#8#9#9#9+
#10#10#10#10#10#11#11#11#11#11#11#11#11#11#11#11+
#11#12#12#12#12#12#12#13#13#13#13#13#13#14#14#14+
#14#14#14#14#14#14#14#14#14#15#15#15#15#16#16#16+
#16#16#17#17#17#17#17#17#18#18#18#19#19#19#8#9+
#11#12#10#10#9#9#9#10#10#10#10#11#11#11#11#12+
#13#13#14#15#17#18#19#10#10#11#13#13#19#11#11#13+
#15#15#16#9#10#10#11#11#12#12#13#14#14#14#15#15+
#15#15#15#16#18#6#14#9#11#12#14#14#15#15#16#17+
#6#12#14#14#17#25#11#19#9#12#13#13#23#11#15#10+
#11#9#10#10#10#12#12#12#13#13#13#14#14#14#14#14+
#15#15#16#16#16#17#17#18#19#19#19#20#20#21#7#16+
#10#13#14#18#18#10#10#11#11#11#12#12#12#12#12#12+
#12#12#13#13#13#13#13#13#13#14#14#15#15#15#15#15+
#15#15#15#16#16#16#16#16#16#16#16#17#17#17#19#19+
#19#19#19#20#21#22#22#23#24#7#12#13#13#17#17#11+
#11#12#12#13#13#14#15#13#18#12#11#12#12#14#14#15+
#16#16#19#19#20#22#10#13#13#13#14#14#15#15#17#8+
#12#20#8#10#10#13#14#18#18#14#14#15#16#17#18#18+
#21#24#12#12#13#13#13#13#13#13#13#13#14#14#14#14+
#14#14#14#14#15#15#15#15#15#15#15#15#15#15#16#16+
#16#16#16#16#16#16#16#16#16#16#17#17#17#17#17#17+
#17#17#18#18#18#18#18#19#19#19#19#19#19#20#20#20+
#21#14#14#15#15#16#18#18#18#19#19#13#13#14#14#14+
#15#15#17#17#18#18#19#19#22#14#14#15#16#16#17#19+
#12#15#18#22#22#10#13#14#15#15#16#16#16#18#19#20+
#23#25#14#15#17#13#16#16#17#19#19#21#23#17#17#17+
#18#18#19#20#20#20#20#21#17#18#20#23#23#16#17#23;
var
no:integer;
BiHua:integer;
str:string;
// str[40]
BiHuaI:integer;
ch1:char;
ch2:char;
len:integer;
begin
str:=chnstr;
BiHuaI:=1;
BiHua:=0;
len:=length(str);
while BiHuaI<=lendo
begin
ch1:=str[BiHuaI];
BiHuaI:=BiHuaI+1;
if (ord(ch1)>=176) and (BiHuaI<=len) then
begin
ch2:=str[BiHuaI];
//BiHuaI:=BiHuaI+1;
----这一行在只查一个汉字的时候用不着 2002.10
no:=(ord(ch1)-176)*94+(ord(ch2)-160);
BiHua:=ord(BiHuaTable[no]);
end
else
begin
BiHua:=0;
end;
break;
// 只要查出第一个汉字即可
end;

result:=BiHua;
end;
end.


 
我kao,这么变态!
 
to : laoli
uses Bage,Xingzuo;
这两个单元呢??
另 s0 ~ s80 还有a1~a12等变量 未给出定义。

 
to laoli
给代码给一半,这不是这么人嘛!Bage,Xingzuo两个单元没给怎么用!
 

Similar threads

后退
顶部