Article View: fj.sources.d
Article #97Re: Message separated Rogue-clone II (1/6)
From: Hiroshi Inoue
Date: Mon, 28 Sep 1992 03:23
Date: Mon, 28 Sep 1992 03:23
143 lines
5668 bytes
5668 bytes
$@!!0f>e!w#S#H#A#R#P$G$9!#(J
fj$@=iEj9F$J$N$G!"IT<j:]$,$"$k$+$bCN$l$^$;$s$,!"$J$K$H$>8fMF<O$N$[$I$r!#(J
$@!!$5$F!"@hF|%]%9%H$5$l$?(JMessage separated Rogue-clone II (1/6)$@!A(J(6/6)
$@$G$9$,!"#X#6#8#k$K$F%3%s%Q%$%k!"<B9T$7$F$_$?$H$3$m!"$$$/$D$+%P%0$H;W$o(J
$@$l$k2U=j$r8+$D$1$^$7$?$N$GJs9p$7$^$9!#(J
$@#1!%(Jctrl-R $@$K$h$k2hLL$N:FIA2h$,!"%b%N%/%m$G9T$J$o$l$F$7$^$&!#(J
$@!!!!D4$Y$F$_$?$H$3$m!"(Jcurses.c $@Fb$N(Jwrefresh()$@4X?t$N=hM}$K$*$$$F!"(J
put_st_char((unsigned char) p[col++]);
$@!!!!$N$h$&$K(J unsigned char$@$K%-%c%9%H$7$F$$$k$?$a!"%+%i!<>pJs$,%+%C%H$5(J
$@!!!!$l$F2hLL=PNO$5$l$F$7$^$&$3$H$,H=$j$^$7$?!#%-%c%9%H$r9T$J$o$J$$$h$&(J
$@!!!!$K$9$l$P$&$^$/$$$-$^$9!#(J
$@!!!!$3$N8=>]$O!"#X#6#8#k$K8B$i$:!"B>$N%^%7%s$G$b!"(J-DCOLOR,-DCURSES$@$r;X(J
$@!!!!Dj$7$F%3%s%Q%$%k$7$?>l9g$KH/@8$9$k$N$G$O$J$$$+$H;W$o$l$^$9!#(J
$@#2!%!H6uJ"!I!$!H522n!I$J$I$NI=<($,$*$+$7$/$J$k!#(J
$@!!!!$3$l$O!"(Jcurses.c $@$N(Jrefresh()$@4X?t$,!"#2%P%$%HJ8;z$K$D$$$F9MN8$;$:$K!"(J
$@!!!!C1=c$K(Jbuffer$@$H(Jterminal$@$NFbMF$rHf3S$7$F!"0lCW$7$J$$%G!<%?$N$_=PNO$7$F(J
$@!!!!$$$k$N$,860x$G$9!#$3$N$?$a$K!"(Jrefresh() $@4X?t$N=hM}$K$*$$$F!"#2%P%$%H(J
$@!!!!J8;z$NItJ,$G?'!9$HITET9g$,5/$-$^$9!#(J
$@!!!!!JNc$($P!"=q$-49$(A0$N#2%P%$%HJ8;z$H!"=q$-49$(8e$N#2%P%$%HJ8;z$,!"(J
$@!!!!!!#1%P%$%HL\$H#2%P%$%HL\$N$I$A$i$+JRJ}$N$_$,0lCW$9$k>l9g!"0lCW$7$?(J
$@!!!!!!J}$N%P%$%H$O=PNO$5$l$J$$$?$a$KI=<($,$*$+$7$/$J$j$^$9!#!K(J
$@!!!!$3$N8=>]$O!"#X#6#8#k$K8B$i$:!"B>$N%^%7%s$G$b!"(J-DJAPAN,-DCURSES$@$r;XDj(J
$@!!!!$7$F%3%s%Q%$%k$7$?>l9g$KH/@8$9$k$N$G$O$J$$$+$H;W$o$l$^$9!#(J
$@#3!%@hF|%]%9%H$5$l$?%5%s%W%k%a%C%;!<%8%G!<%?$G%W%l%$$7$?>l9g!"%X%k%W$NI=(J
$@!!!!<($,$*$+$7$/$J$k!#(J
$@!!!!@hF|%]%9%H$5$l$?%5%s%W%k%a%C%;!<%8%G!<%?$K$*$$$F$O!"%X%k%W%a%C%;!<%8(J
$@!!!!$NCf$K#8#07e$r%*!<%P!<$9$k$b$N$,#1$D$@$1M-$j!"$3$NItJ,$GI=<($,$*$+$7(J
$@!!!!$/$J$j$^$9!#(J
$@!!!!860x$ONI$/H=$i$J$$$N$G$9$,!"$*$=$i$/(J curses.c$@Fb$N=hM}$K$*$$$F!"#8#07e(J
$@!!!!$r%*!<%P!<$9$k$h$&$J>l9g$K!"$J$s$i$+$N0[>o$,H/@8$9$k0Y$H9M$($i$l$^$9!#(J
$@!!!!$3$N8=>]$O!"#X#6#8#k$K8B$i$:!"B>$N%^%7%s$G$b!"(J-DCURSES$@$r;XDj$7$F%3%s(J
$@!!!!%Q%$%k$7$?>l9g$KH/@8$9$k2DG=@-$,$"$k$H;W$o$l$^$9!#(J
$@$3$N$&$A!"#3$K$D$$$F$O!"%W%m%0%i%`$NJ}$GBP=h$5$;$h$&$+$H$b;W$C$?$N$G$9$,!"(J
$@#2%P%$%HJ8;z$,$+$i$`$HLLE]$J$N$G!"#8#07e$r%*!<%P!<$7$J$$$h$&$K%5%s%W%k%a%C(J
$@%;!<%8%G!<%?$r=q$-49$($F2sHr$7$^$7$?!#(J
$@%5%s%W%k%a%C%;!<%8%G!<%?$K8B$i$:!"%a%C%;!<%8$r=q$-49$($k:]$O!"#8#07e$r%*!<(J
$@%P!<$7$J$$$h$&!"5$$r$D$1$kI,MW$,$"$k$G$7$g$&!#(J
$@$=$l$+$i!"#1!$#2$N8=>]$K$D$$$F$O!";d$J$j$K(J curses.c $@$r=q$-49$($FBP=h$7$F(J
$@$_$^$7$?!#;29M$^$G$K!"0J2<$K$=$N%Q%C%A%j%9%H$r<($7$^$9!#(J
$@$J$*!"$3$N%Q%C%A$K$D$$$F$O!"<!$NE@$KCm0U$7$F2<$5$$!#(J
$@!!!&$3$N%Q%C%A$O!"%3%s%Q%$%k;~$K(J-DMSDOS,-DJAPAN$@$r6&$K;XDj$9$k>l9g$K$N$_(J
$@!!!!M-8z$G$9!#$=$l0J30$N>l9g$K$O0UL#$,$"$j$^$;$s!#(J
$@!!!&:#$N$H$3$m!"#X#6#8#k$G$OLdBj$J$/F0$$$F$$$^$9$,!"B>$N#M#S!]#D#O#S%^(J
$@!!!!%7%s$G$O$&$^$/$$$/$+$I$&$+$^$G$O3NG'$7$F$$$^$;$s!#(J
$@!!!&85$N%W%m%0%i%`$KBP$9$kJQ99$r$G$-$k$@$1>/$J$/$9$k$?$a!"$+$J$j6/0z$J(J
$@!!!!J}K!$r;H$C$F$$$^$9!#$^$?!"%A%'%C%/$,4E$$$N$G!"0[>o$JI=<(%G!<%?!JNc(J
$@!!!!$($P!"#2%P%$%HJ8;z$N#1%P%$%HL\$G#19T$,=*$o$k$h$&$J>l9g$J$I!K$KBP$7(J
$@!!!!$F$O8mF0:n$7$^$9!#(J
$@$3$N$h$&$J$o$1$G$9$N$G!"$3$N%Q%C%A$O$"$/$^$G;29MDxEY$K$H$I$a$F$*$$$F2<$5$$!#(J
$@$I$J$?$+!"$h$j$-$A$s$H$7$?=$@5$r9T$J$C$F2<$5$k$3$H$r4|BT$7$^$9!#(J
-------- $@$3$3$+$i(J -------- $@$3$3$+$i(J -------- $@$3$3$+$i(J --------
*** curses.c.orig Mon Sep 14 14:40:10 1992
--- curses.c Sun Sep 27 12:00:00 1992
***************
*** 277,282 ****
--- 277,310 ----
bp = buffer[i];
tp = terminal[i];
for (j = 0; j < DCOLS; j++) {
+ #ifdef JAPAN
+ #ifdef MSDOS
+ #define is_kanji(c) ( ((0x80<(c))&&((c)<=0x9f)) || ((0xe0<=(c))&&((c)<=0xfc)) )
+ if (is_kanji(*tp & 0xff)){
+ if ((*bp == *tp) && (bp[1] == tp[1])){
+ bp += 2;
+ tp += 2;
+ j++;
+ continue;
+ } else {
+ *tp = 0;
+ tp[1] = 0;
+ }
+ }
+ if (is_kanji(*bp & 0xff)){
+ if (is_kanji(*(tp+1) & 0xff))
+ tp[2] = 0;
+ if (j!=cur_col || i!=cur_row)
+ put_cursor(i, j);
+ put_st_char(*tp++ = *bp++);
+ cur_col++;
+ put_st_char(*tp++ = *bp++);
+ cur_col++;
+ j++;
+ continue;
+ }
+ #endif
+ #endif
if (*bp != *tp) {
if (j!=cur_col || i!=cur_row)
put_cursor(i, j);
***************
*** 327,333 ****
}
while ((col < DCOLS) && (p[col] != ' ')) {
/* put_st_char((int) p[col++]);*/
! put_st_char((unsigned char) p[col++]);
cur_col++;
}
}
--- 355,361 ----
}
while ((col < DCOLS) && (p[col] != ' ')) {
/* put_st_char((int) p[col++]);*/
! put_st_char(p[col++]);
cur_col++;
}
}
-------- $@$3$3$^$G(J -------- $@$3$3$^$G(J -------- $@$3$3$^$G(J --------
----
$@0f>eGn;L!w#S#H#A#R#P(J
inoue@shpymt.comd.sharp.co.jp
Technical Details
Message-ID:
<11707@shpymt.comd.sharp.co.jp>Path:
arc1-ca.pugleaf.net!sparky!uunet!ccut!sh.wide!wnoc-kyo!kuis!kudpc!nuis!tutgw!lab!nttlab!creamy!shpcsl!islix!shpymt!inoueReferences:
<BRX.92Sep14180202@chobi.kmc.kyoto-u.ac.jp>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!sh.wide!wnoc-kyo!kuis!kudpc!nuis!tutgw!lab!nttlab!creamy!shpcsl!islix!shpymt!inoue From: inoue@comd.sharp.co.jp (Hiroshi Inoue) Newsgroups: fj.sources.d Subject: Re: Message separated Rogue-clone II (1/6) Message-ID: <11707@shpymt.comd.sharp.co.jp> Date: 28 Sep 92 03:23:46 GMT References: <BRX.92Sep14180202@chobi.kmc.kyoto-u.ac.jp> Distribution: fj Organization: SHARP Corp. Computer Div., Yamato Kohriyama City, Nara, Japan Lines: 143