🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.sources.d
Article #98

Re: Message separated Rogue-clone II (1/6)

#98
From: Ito Yasufumi
Date: Mon, 28 Sep 1992 16:17
223 lines
10548 bytes
  $@5~Bg%^%$%3%s%/%i%V$N0KF#$G$9!#(J

In article <11707@shpymt.comd.sharp.co.jp> inoue@comd.sharp.co.jp (Hiroshi Inoue) writes:

> $@!!0f>e!w#S#H#A#R#P$G(J$@$9!#(J
> fj$@=iEj9F$J$N$G!"IT<j:]$,$"$k$+$bCN$l$^$;$s$,!"$J$K$H$>8fMF<O$N$[$I$r!#(J

     $@;d$b(J fj.sources $@$K(J$@Ej9F$7$?$N$O=i$a$F$G$9!#%P%0$P$+$j$G(J
$@?=$7Lu$"$j$^$;$s!#(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

  $@$"$j$,$H$&$4$6$$$^$9!#(J

> $@#1!%(Jctrl-R $@$K$h$k2hLL$N:FIA2h$,(J$@!"%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(J$@!<>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(J$@$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(J$@$7$F%3%s%Q%$%k$7$?>l9g$KH/@8$9$k$N$G$O$J$$$+$H;W$o$l$^$9!#(J

  $@$&$C!"$"$^$j%F%9%H$G$-$J$+$C$?$N$G$9$,!"(J$@$I$s$J$H$3$m$K$G$F$7$^$&$H$O!#(J
$@$b$H$N%=!<%9$G$O!"(Jrogue.h $@$K(J

	typedef unsigned char uchar;
	#define char uchar

$@$H$J$C$F$$$F!"(Jchar $@$,Id9f3HD%$5$l$k$N$rKI$$$G$$$?$N$G$9$,!"%3%s%Q(J
$@%$%i$K$h$C$F$O%(%i!<$r=P(J$@$9$b$N$,$"$j!"%-%c%9%H$9$k$3$H$K$h$j(J char
$@$N$^$^(J $@$,$s$P$C$F$$$k$N$G$9!#(J
  char $@7?$N$b$N$r(J unsigned char $@$K%-%c%9%H$9$k$Y$-$@$C$?$N$G$9$,!"(J
$@4V0c$C$F(J short $@$N$b$N$^$G%-%c%9%H$7$F$7$^$$$^$7$?!#$9$Y$F$NB0@-(J$@$,(J
$@Mn$A$F$7$^$&$N$G!"(JUNIX $@$G$bH?E>$,>C$($F$7$^$$$^$9!#(J

  $@$*$C$7$c$kDL$j$3$3$G$O%-%c%9%H$9$kI,MW$,$J$$(J($@$7$F$O$$$1$J$$(J)
$@$H$3$m$G$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(J$@$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(J$@%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(J$@$(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$@!!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%^(J$@%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

  $@ImB0$N(J curses $@$O!"(J2$@%P%$%HJ8;z$r(J($@$"$^$j(J?)$@9M$($F$$$^$;$s!#(J
  $@$[$H$s$I$N%a%C%;!<%8$O0lEY>C$5$l$F$+$i=q$-(J$@D>$5$l$k!"$"$k$$$OH>3QJ8;z(J
$@$H$NCV$-49$($,$J$5$l$k$N$GLdBj$K$J$i$J$$$N$G$9$,!"!H6uJ"!I!"!H522n!I$J(J
$@$I$N(J$@I=<($O>e=q$-$5$l$k$?$aLdBj$K$J$j$^$9!#$=$N$?$a!"$=$3$KI=<($5$l$k%a(J
$@%C%;!<%8$K$h$C$F$O;D$C$F$7$^$&$N$G(J$@$9!#(J
  $@$3$l$O(J curses $@$r2~NI$9$k$h$j$O!"$3$3$@$1Nc30=hM}$9$kJ}$,3Z$G$9(J:-)$@!#(J
terminal $@$NFbMF$rNc$($P(J '\0' $@$J$I$GKd$a$F$7$^$($P$$$$$N$G$9!#(J


> $@#3!%@hF|%]%9%H$5$l$?%5%s%W%k%a%C%;!<%8%G!<%?$G%W%l%$$7$?>l9g!"(J$@%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(J$@%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$@!#(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$@$&$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(J$@$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

  $@$=$&$G$9!#$H(J$@$$$&$+!"%a%C%;!<%8%U%!%$%k$rFI$_9~$`;~E@$G!"(J79$@%P%$%H$G@Z(J
$@$C$F$7$^$&$N$G$9(J(main.c : read_mesg() ($@$3$l$O(J$@;d$,IU$12C$($?$b$N$G$9(J))$@!#(J

  curses $@$O!"4A;z%3!<%I$NA0H>$K8+$($k%3!<%I$r<u$1$H$k$H!"<!$N(J
$@#1%P%$%H$O4A(J$@;z$N8eH>$K0c$$$J$$$H;W$C$F=hM}$7$F$$$^$9$+$i(J(curses.c :
pus_st_char() )$@!"$=$N4V$K%+!<%=%k$,F0$$$?$j$9(J$@$k$H!"I=<($,(J
$@Bg$-$/Mp$l$k$+$b$7$l$^$;$s!#(J

  $@$3$&$$$&=hM}$O(J DOS $@%^%7%s$G$O<+F0E*$K9T$J$C$F$/$l$k$N$G$9(J$@$,!"(JUNIX $@$G(J
$@$O$=$&$O$$$+$J$$$N$G$9!#4A;z$r(J putchar() $@$J$I$G(J 2$@2s$KJ,$1$FI=<($9$k$H(J
$@4A;z$G$J$/$J$C$F$7$^(J$@$&$N$G!"#2%P%$%HJ,$=$m$&$^$G%P%C%U%!%j%s%0$7!"(J'\0'
$@$b4^$a$F#3%P%$%H$NJ8;zNs$H$7$F07$C$F$$$k$N$G4JC1$N(J$@$?$a$K$3$&$J$C$F$$$^$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$@!"(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(J$@$($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!<(J$@$7$J$$$h$&!"5$$r$D$1$kI,MW$,$"$k$G$7$g$&!#(J

  $@%a%C%;!<%8%U%!%$%k(J (mesg, mesg_E) $@$NF,$K$b=q$$$F$"$k$N$G(J$@$9$,!"(J
$@#7#97e$r1[$($J$$$h$&$K$7$F$/$@$5$$!#$3$l$OC1$KG[Ns$NBg$-$5$K(J
$@$h$k$b$N$G$9$,!"$=$b$=$b$3$l0J>e$G(J$@$O$^$H$b$KI=<($G$-$J$$$+$i$G$b(J
$@$"$j$^$9!#(J

  $@$^$?!"$b$7%a%C%;!<%8%U%!%$%k$rEj9F$5$l$k$H$-$K$O!"4A;z%3(J$@!<%I$,(J
JIS $@$KJQ49$5$l$J$$$h$&$K!"(Jcompress + uuencode $@$J$I$N=hM}$r9T$C$?(J
$@J}$,$$$$$G$7$g$&!#(J

# $@C/$@!"(J79 $@%P%$%H$r1[$($?%a%C%;!<%8$rEj9F$7$?$N$O(J!
# ($@1&$NJ}$K$$$k$h$&$J5$$,$9$k(J :-)$@!#(J


> $@$=$l$+$i!"#1!$#2$N8=(J$@>]$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(J$@<($7$^$9!#(J


  $@#1$K$D$$$F$O!"$*$C$7$c$kDL$j$G$9!"0f>e$5$s$N%Q%C%A$rEv$F$F2<$5$$!#(J
  $@$D$$$G$K!"H?E>(J(stand)$@$,85$KLa$i$J$1$l$P$J$i$J$$$H$3$m$G!"85$K(J
$@La$i$J$$$H$$$&%P%0$,$"$j$^$7$?$N$G!"$=$N%Q%C%A$b4^$s$G$$(J$@$^$9!#(J
$@6uGr$r(J redraw $@$7$J$$$?$a$G$9!#40A4$J:FIA2h$r$9$k$?$a$K6uGr$r(J
$@%9%-%C%W$7$J$$$h$&$K$7$^$7$?!#(J

-------- $@$3$3$+$i(J -------- $@$3$3$+$i(J -------- $@$3$3$+$i(J --------
*** curses.c.orig	Sat Sep 19 22:13:04 1992
--- curses.c	Tue Sep 29 00:43:49 1992
***************
*** 319,333 ****
  		p = buffer[i];
  		col = 0;
  		while (col < DCOLS) {
! 			while ((col < DCOLS) && (p[col] == ' ')) {
  				col++;
! 			}
  			if (col < DCOLS) {
  				put_cursor(i, col);
  			}
  			while ((col < DCOLS) && (p[col] != ' ')) {
! /*				put_st_char((int) p[col++]);*/
! 				put_st_char((unsigned char) p[col++]);
  				cur_col++;
  			}
  		}
--- 319,332 ----
  		p = buffer[i];
  		col = 0;
  		while (col < DCOLS) {
! /*			while ((col < DCOLS) && (p[col] == ' ')) {
  				col++;
! 			}	*/
  			if (col < DCOLS) {
  				put_cursor(i, col);
  			}
  			while ((col < DCOLS) && (p[col] != ' ')) {
! 				put_st_char((int) p[col++]);
  				cur_col++;
  			}
  		}
-------- $@$3$3$^$G(J -------- $@$3$3$^$G(J -------- $@$3$3$^$G(J --------
 p[] $@$,(J char $@$K$J$k$3$H$,$"$j$^$9$,!"$=$N$H$-$K$OId9f3HD%$5$l$F$b(J
$@LdBj$K$J$i$J$$(J $@1Q8l%b%N%/%m%b!<%I(J $@$N$H$-$J(J$@$N$G!"%-%c%9%H$O30$7$F(J
$@$7$^$C$F$bLdBj$O$"$j$^$;$s!#(J

  ($@1Q8l%b%N%/%m%b!<%I$G$O#1%P%$%H$N:G>e0L%S%C%H$r(J$@H?E>$NB0@-$r(J
$@I=$9$N$K;H$C$F$$$^$9!#$=$l0J30$O#1%-%c%i%/%?$r#2%P%$%H$GI=$7$^(J
$@$9!#F|K\8l%b%N%/%m%b!<%I$G(J$@$O>e0L%P%$%H$N(Jbit 0 $@$rH?E>$K;H$C$F$$(J
$@$^$9!#%+%i!<%b!<%I$G$O!"3F<oB0@-$r>e0L%P%$%H$GI=$7$F$$$^$9!#(J)


  $@#2(J $@$O!"0f>e$5$s$,$5$l$?$h$&$K(J curses $@$r2~NI$9$k$N$,(J
$@$$$$$N$G$7$g$&$1$I!";d$J$i$3$&$7$^$9(J:-)$@!#;W$$$C(J$@$-$j<jH4$-$G$9!#(J
-------- $@$3$3$+$i(J -------- $@$3$3$+$i(J -------- $@$3$3$+$i(J --------
*** message.c.bak	Sat Sep 19 22:13:05 1992
--- message.c	Mon Sep 28 22:13:15 1992
***************
*** 434,440 ****
  #else
  		extern char terminal[DROWS][DCOLS];
  #endif
! 		terminal[row][75] = '\0';	/* magic cookie (by Yasha) */
  /*		terminal[row][75] = ' ';*/	/* magic cookie */
  #endif
  		mvaddstr(row, 75, hunger_str);
--- 434,441 ----
  #else
  		extern char terminal[DROWS][DCOLS];
  #endif
! 		terminal[row][75] = terminal[row][76] =      /* magic cookie */
! 		 terminal[row][77] = terminal[row][78] = '\0'; /* by Yasha */
  /*		terminal[row][75] = ' ';*/	/* magic cookie */
  #endif
  		mvaddstr(row, 75, hunger_str);
-------- $@$3$3$^$G(J -------- $@$3$3$^$G(J -------- $@$3$3$^$G(J --------
$@MW$OFbMF$,0c$($P=q$$$F$/$l$k$N$G$9(J$@!#(J

  $@%*%j%8%J%k$G$O!"$O$8$a$N#1%P%$%H$@$1$,LdBj$K$J$k$N$G!"$=$3$K(J
$@6uGr$r=q$$$F$$$^$9!#%-%c%i%/%?%3%s(J$@%=!<%k$N(J DOS $@%^%7%s$G$O!"(J
$@4A;z$N#2%P%$%HL\$K6uGr$r=q$/$H#1%P%$%HL\$b>C$($k$N$G$3$&$J$C$F(J
$@$$$^$9!#(JX68000 $@$O%S%C%H%^%C%W$G$9$N$G!"$A$c$s$H#1%P%$%HL\$b(J
$@6uGr$r=q$$$F$d$kI,MW$,$"$j$^$9!#6uGr$G$b4A;z$G$b@dBP$K(J$@Ey$7$/(J
$@$J$i$J$$J8;z$H$7$F!"$3$3$G$O(J '\0' $@$r;H$C$F$$$^$9!#(J

  $@$^$H$b$KD>$=$&$H$9$k$H!"(Jaddstr() $@$J$I$G(J buffer[][]$@$K=q$-9~$`(J
$@$H$-$K4A;z$r6hJL$7$J$1$l$P$J$i$J$$$N$G$+$J$jLLE]$@$H;W$$$^$9!#(J

> $@$3$N$h$&$J$o$1(J$@$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(J$@$C$F2<$5$k$3$H$r4|BT$7$^$9!#(J

  $@$4$a$s$J$5$$!#:#$O$A$g$C$HK;$72a$.$F$d$C$F$$$i$l$J$$$N$G$9!#(J
$@$b$&$A$g(J$@$C$H$7$?$i$^$H$b$K<jD>$7$7$?$$$H;W$C$F$$$?$N$G$9$,!#(J

$@!t$3$3$K$"$2$?%Q%C%A$O!"(J fj.sources $@$K$^$H$a$FEj(J$@9F$7$^$9!#<B:]$K(J
$@!t%Q%C%A$rEv$F$k$H$-$K$O$=$A$i$r$*;H$$2<$5$$!#(J
--
				$@0KF#9/;K!w5~Bg%^%$%3%s%/%i%V(J, $@5~Bg>pJs(J
				    brx@box2.kmc.kyoto-u.ac.jp
				    0itohy@isle.kuis.kyoto-u.ac.jp
Technical Details
Message-ID: <BRX.92Sep29011743@chobi.kmc.kyoto-u.ac.jp>
Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!sh.wide!wnoc-kyo!kuis!kmc-box2!nntp!brx
References: <BRX.92Sep14180202@chobi.kmc.kyoto-u.ac.jp> <11707@shpymt.comd.sharp.co.jp>

Show Full Headers
Complete Article Headers
Newsgroups: fj.sources.d
Path: arc1-ca.pugleaf.net!sparky!uunet!ccut!sh.wide!wnoc-kyo!kuis!kmc-box2!nntp!brx
From: brx@kmc.kyoto-u.ac.jp (Ito Yasufumi)
Subject: Re: Message separated Rogue-clone II (1/6)
In-Reply-To: inoue@comd.sharp.co.jp's message of 28 Sep 92 03:23:46 GMT
Message-ID: <BRX.92Sep29011743@chobi.kmc.kyoto-u.ac.jp>
Sender: news@box2.kmc.kyoto-u.ac.jp (News system Manager #2)
Nntp-Posting-Host: chobi
Organization: Kyoto University Microcomputer Club, Kyoto, Japan
References: <BRX.92Sep14180202@chobi.kmc.kyoto-u.ac.jp>
 <11707@shpymt.comd.sharp.co.jp>
Distribution: fj
Date: Mon, 28 Sep 1992 16:17:43 GMT
Lines: 223