🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.sources.d
Article #173

kanji phone(patch for kana phone 1.01)

#173
From: Murayama Fumitaka
Date: Tue, 05 Jan 1993 05:56
104 lines
3114 bytes
    $@B<;3!wCfItBg3X$G$9!#(J

    $@$b$&4{$KB8:_$7$F$$$k$+$b$7$l$^$;$s$,!"(JReadme.kana $@$rFI$s$G$$$F(J

 > $@4A;z$NF~NO$K$D$$$F$O!":#$N=j!"(Jcode $@$N@_Dj$K4X$o$i$:(J JIS $@$G$J$$$H(J
 > $@$&$^$/$$$-$^$;$s!#(J

  $@$H$$$&(J$@5-=R$,$"$C$?$N$G!"$=$l$J$i$H(J EUC $@$r(J JIS $@$KJQ49$9$k$h$&$K$9(J
  $@$k%Q%C%A$r:n$C$F$_$^$7$?!#$3$l$G(J EUC $@4A;z(J$@$bAw?.$G$-$^$9!#(J

    $@$3$N$h$&$J%Q%C%A$K$7$?$N$G!"4{B8$N$b$N$KBP$7$F$bI=<($G$-$^$9!#(J

    $@$G$O!#(J

-----EUC-KANJI.patch
*** client/kb.c.org	Wed Sep 19 17:54:32 1990
--- client/kb.c	Mon Jan  4 13:45:43 1993
***************
*** 33,40 ****
--- 33,79 ----
  	extern   int	childpid, tochild;
  	extern Win      *outwin ;
  
+ 	/*
+ 	 * Patch for EUC KANJI by F.Murayama
+ 	 *              d90148@chubu.ac.jp
+ 	 *                     (1992.12.29)
+ 	 */
+ 
+ 	static int kanji_flag = 0, kanji_count = 0;
+ 	static char *kanji_buf = "";
+ 
  	if (read (0, &c, 1) != 1)
  		return;
+ 
+ 	if (c == (char) 0x8e)	/* Patch by F.Murayama(1993.01.04) */
+ 	{	while (read (0, &c, 1) != 1)
+ 			; /* nothing */
+ 		c = '?';
+ 	}
+ 
+ 	if (kanji_flag)
+ 	{	if (c & 0x80)
+ 			c &= 0x7f;
+ 		else
+ 		{	kanji_buf = "(J ";
+ 			kanji_buf[2] = c;
+ 			c = ESC;
+ 			kanji_flag = 0;
+ 			kanji_count = 0;
+ 		}
+ 	}
+ 	else
+ 	{	if (c & 0x80)
+ 		{	kanji_buf = "$B ";
+ 			kanji_buf[2] = c & 0x7f;
+ 			c = ESC;
+ 			kanji_flag = 1;
+ 			kanji_count = 0;
+ 		}
+ 	}
+ 
+ while (1)
+    {
  	
  	/*
  	 *  We remap the basic editing characters here to make life easier later.
***************
*** 54,60 ****
  
         c2 = 0 ;
  
! 	if (c == ESC) {				/* toggle command mode */
                int     mask ;
  	      struct timeval  timeout ;
  	      mask = (1 << 0) ;
--- 93,100 ----
  
         c2 = 0 ;
  
! 	if (c == ESC && kanji_buf[kanji_count] == '\0') {
! 	  /* Patch by F.Murayama(1992.12.29) */  /* toggle command mode */
                int     mask ;
  	      struct timeval  timeout ;
  	      mask = (1 << 0) ;
***************
*** 193,198 ****
--- 233,244 ----
  	       c2 = 0 ;
  	       goto  redo ;
  	}
+ 
+ 	if (kanji_buf[kanji_count])	/* Patch by F.Murayama(1992.12.29) */
+ 		c = kanji_buf[kanji_count++];
+ 	else
+ 		break;
+    }
  }
--
     -=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-
       $@CfItBg3X(J $@9)3XIt(J $@EE;R9)3X2J(J $@#3G/(J  $@B<;3(J $@J89'(J (Murayama Fumitaka)
                                          E-Mail: d90148@chubu.ac.jp
     -=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-=+=-
Technical Details
Message-ID: <D90148.93Jan5145643@elec.chubu.ac.jp>
Path: arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-tyo-news!dclsic!hamamatsu-pc.ac.jp!tutgw!elec!d90148

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-tyo-news!dclsic!hamamatsu-pc.ac.jp!tutgw!elec!d90148
From: d90148@chubu.ac.jp (Murayama Fumitaka)
Newsgroups: fj.sources.d
Subject: kanji phone(patch for kana phone 1.01)
Message-ID: <D90148.93Jan5145643@elec.chubu.ac.jp>
Date: 5 Jan 93 05:56:43 GMT
Sender: news@elec.chubu.ac.jp
Reply-To: d90148@chubu.ac.jp
Distribution: fj
Organization: Chubu University, Kasugai, Aichi, Japan.
Lines: 104