konnoさんが答えてくれるから、慌てることもないのですが。

月　マイコン
刊　　　　　　　　別冊
月刊　ラジオの製作

　と書かれていますね。確かにこれはarchive.orgにありました。
＞サンクス、konnoさん。

　『大全集』の該当ページを読んだら、だいたい分かっちゃいました。
　これなら、そのうち、僕にも移植できる！

　ただジョイススィックは？　あれ割り込み処理じゃないのかな？
　何か方法はあるだろう？？？

別冊もの２つ！　ゲット！

konnoさん
　ありがとう！！！

https://archive.org/search?query=%E3%83%9E%E3%82%A4%E3%82%B3%E3%83%B3BASIC%E3%83%9E%E3%82%AC%E3%82%B8%E3%83%B3+1982
　これで、最後の２つゲット。

　むふふふ。ブチ切れた文太です。

　まだ動かせませんが。
　３時間かかりました。途中で１５分寝落ちしましたが。
　けっこう楽しかった。分かっていく喜び。
　まだ、「1」「l」「I」とか残ってると思います。
　いくつか、こんなの知らない、というのがあります。


'  === Computer Othello ===
' by Masao Kimura 1982 03 Game Collection
'  (Basic Magazine Special) pp.39-42
' for PC-6001
' vars' list: CO, YO = Comp/Player points;  HC, HY = best score
'  KK = 0:pass (cannot put); 1:put successfully
'  PB,P = Comp/Player remaining pass(es);  X,Y = matrix (yoko,tate)
'  A(I,J) = 0:none, 1:comp's tile exists, -1: player's exists
'  C,D = comp's next spot/matrix, yoko,tate (DATA READ)
'  SYM; Player O, Comp X
'  KEYS; F01(next try), F02(pass), STOP>F03>F04 to finish
'  Space = play again

   3 REM --- Init ---
   4 HC=0 : HY=0 : GOTO 1500		'TITLE
   5 KK=8 : P=5 : PB=S
   6 FOR I=0 TO 7 : FOR J=0 TO 7 : A(I,J)=0 : NEXT J, I
  10 SCREEN 1,1,1,1 : LOCATE 0, 15 : CLS : CONSOLE 0, 15, 0 : CLS
'
  11 REM --- Window Setting ---
  12 LOCATE 10, 1 : PRINT "Computer Othello"
  13 PRINT "If there is no place to put your tile in"
  14 LOCATE 1, 7  : PRINT "Hit [F02]"
  15 LOCATE 1, 9  : PRINT "But 5 times only."
  16 LOCATE 1, 10 : PRINT "With 6 times, you lose."
  17 KEY 1, "pn"+CHR$(13) : KEY 2, "py"+CHR$(13)
  18 LOCATE 21, 3 : PRINT "[F01] = Not PASS"
  19 LOCATE 21, 4 : PRINT "[F02] = PASS"
  20 LOCATE 12, 4 : PRINT "01234567"
  30 FOR I=0 TO 7
  31 	LOCATE 10, 5+I : PRINT I; "++++++++" : NEXT
  32 LOCATE 15, 8 : PRINT "OX" : A(3,3)=-1 : A(4,3)= 1
  34 LOCATE 15, 9 : PRINT "XO" : A(3,4)= 1 : A(4,4)=-1
  35 LOCATE 20, 6 : PRINT "Your PASS"
  36 LOCATE 21, 7 : PRINT "You = ";P
  37 LOCATE 21, 8 : PRINT "Computer = ";PB
  38 LOCATE 20, 10: PRINT "When you want to finish the game, Hit [STOP]"
  39 LOCATE 22, 11: PRINT "and [F03], [F04]"
'
  40 KEY 3, "cls"+CHR$(13)+"go" : KEY 4, "to 1100"+CHR$(13)
'
  44 REM --- Player Input ---
  45 CONSOLE 13, 4 : CLS
  50 INPUT "         yoko where?         ";X
  51 IF X<0 OR X>7  THEN 56
  52 INPUT "         tate where?         ";Y
  53 IF Y<0 OR Y>7  THEN 56
  54 IF A(X,Y) <> 0 THEN 56
  55 GOTO 100
'
  56 CONSOLE 13, 4 : CLS : PLAY "o4l16CDCD"
  57 INPUT "Cannot go!  Think again = [F01]  or  PASS = [F02]";PP$
  58 IF PP$ <> "py" AND PP$ <> "pn" THEN 57
  59 IF PP$ =  "py" THEN GOSUB 900 : GOTO 115	'P pass, C input
  60 IF PP$ =  "pn" THEN 40
'
 100 KX=X : KY=Y : KK=0 : C$="O" : K=-1 : GOSUB 300
 110 IF KK=0 THEN 56
'
 114 REM --- Computer Input ---
 115 CONSOLE 13, 4 : CLS : PRINT
 116 PRINT " Now Computer is thinking .... "
'
 118 RESTORE 800
 120 READ C, D : IF C=9 AND D=9 THEN GOSUB 850 : GOTO 40
 122 IF A(C,D) <> 0 THEN 120
 123 KX=C : KY=D
 125 KK=0 : K=1 : C$="X" : GOSUB 300		'moving forward
 130 IF KK=0 THEN GOTO 120			'READ
'
 140 CONSOLE 13, 4 : CLS : PLAY "o4l4c" : PRINT
 141 PRINT "Now, finished thinking!"
 152 FOR I=0 TO 300 : NEXT : GOTO 40
'
' --- SUBROUTINES ---
'
 290 REM --- Moving Forward ? ---
 300 FOR AX=-1 TO 1 : FOR AY=-1 TO 1
 302 	IF AX=0 AND AY=13 THEN 390			'out/again
 304 	N=2
 305 	A=KX+AX*N : B=KY+AY*N
 306 	IF A<0 OR A>7 THEN 390				'ditto
 307 	IF B<0 OR B>7 THEN 390				'ditto
 308 	IF KX+AX < 0 OR KX+AX > 7 THEN 390		'ditto
 309 	IF KY+AY < 0 OR KY+AY > 7 THEN 390		'ditto
 310 	IF A(KX+AX*(N-1), KY+AY*(N-1)) <> -K THEN 390	'ditto
 330 	IF A(A,B)=K THEN 390				'ditto
 335 	N=N+1 : GOTO 305			''
 336 	LOCATE 0, 8 : PRINT N; A; B
 350 	LOCATE KX+12, KY+5 : COLOR 3 : PRINT " "
 351 	FOR I=0 TO 200 : NEXT I
 352 	COLOR 1 : KK=1
 380 	FOR I=0 TO N
 381 		LOCATE KX+AX+I+12, KY+AY*I+5
 385 		PRINT C$ : A(KX+AX*I,KY+AY*I)=K
 386 	NEXT
 387 	LOCATE X+12, KY+5 : PRINT C$
 390 NEXT AY, AX
 391 RETURN
'
 790 REM --- Data for Computer's decision ---
 800 DATA 0, 7, 7, 0, 0, 0, 7, 7, 2, 2, 5, 2
 802 DATA 2, 5, 5, 5, 3, 2, 4, 5, 5, 4, 2, 3
 804 DATA 5, 3, 4, 2, 2, 4, 3, 5, 2, 0, 3, 0
 806 DATA 4, 0, 5, 0, 0, 2, 0, 3, 0, 4, 0, 5
 808 DATA 7, 2, 7, 3, 7, 4, 2, 7, 3, 7, 5, 7
 810 DATA 2, 1, 3, 1, 4, 1, 5, 1, 2, 6, 3, 6
 812 DATA 4, 6, 5, 6, 1, 2, 1, 3, 1, 4, 6, 2
 814 DATA 6, 3, 6, 4, 6, 5, 1, 1, 6, 6, 6, 1
 816 DATA 1, 6, 0, 1, 1, 0, 6, 0, 7, 1, 0, 6
 818 DATA 1, 7, 6, 7, 7, 6, 9, 9
'
 845 REM --- Computer PASS ---
 850 PB=PB-1
 851 CONSOLE 13, 4 : PRINT " Computer will PASS "
 852 FOR I=0 TO 500 : NEXT
 852 LOCATE 21, 8 : PRINT "Computer = "; PB
 854 IF PB<O THEN N$="You" : GOTO 1000		'GameOver
 855 RETURN
'
 895 REM --- Player PASS ---
 900 P=P-1
 902 LOCATE 21, 7 : PRINT "You = ";P
 930 IF P<O THEN N$="Computer" : GOTO 1000	'GameOver
 940 RETURN

990 REM --- Game Over ---
1000 SCREEN 3,2,2 : COLOR 4,2,1 : CONSOLE 0,15,0 : CLS : CONSOLE 15,1
1001 LOCATE 2, 1 : PRINT "Game Over"
1010 LOCATE 1, 3 : PRINT N$;"is the winner!"
1020 LOCATE 2, 4 : PRINT "POINTS"
1030 LOCATE 3, 5 : PRINT "You =  ";YO
1040 LOCATE 3, 6 : PRINT "Computer =  ";CO
1042 LOCATE 2, 8 : PRINT "The best scores are"
1043 LOCATE 3, 9 : PRINT "You      =";HY
1044 LOCATE 3, 18: PRINT "Computer =";HC
1045 LOCATE 1, 12: PRINT "Play again?  Then, Hit SPACE KEY."
1046 GOTO 1641					'MUSIC

1090 REM --- Calc of points ---
1100 CO=0 : YO=0
1101 FOR I=0 TO 7 : FOR J=0 TO 7
1110 	IF A(I,J)= 1 THEN CO=CO+1 : GOTO 1120	'out/again
1115 	IF A(I,J)=-1 THEN YO=YO+1
1120 NEXT J, I
1121 IF CO>HC  THEN HC=CO
1122 IF YO>HY  THEN HY=YO
1130 IF CO<=YO THEN N$="You"      : GOTO 1000	'GameOver
1140 		    N$="Computer" : GOTO 1000	'ditto
'
1499 REM --- TITLE ---
1500 SCREEN 3, 2, 2 : CONSOLE 0, 15 : COLOR 1, 2, 2 : CLS
1510 LOCATE 2, 2 : PRINT "COMPUTER OTHELLO"
1520 LOCATE 1, 5 : PRINT "Hey! You! .."
1530 LOCATE 2, 7 : PRINT "Can you beat Computer?"
1540 COLOR 4
1541 LOCATE 1, 1 : PRINT "To start, Hit the Space KEY"
1600  IF STRIG(0)=0 THEN 1600
1610 GOTO 5
'
1630 REM --- MUSIC ---		'line nums changed from the original
1641 PLAY "s13o5l2cd-l4c. l2o4b-r8l8b-b-b-l4b-o5l8oo4l2a-"	'
1642 GOSUB 1700
1643 PLAY "o4l2a-b-l4a-. l2gr818gggl4gl8a-l2fr2"
1644 GOSUB 1700
1645 PLAY "o418ca-gl2a-r4l8a-gfgfel4dl8a-l2a-"		'1643(org)
1646 GOSUB 1700
1647 PLAY "r418ga-gfeo3bo4l4cl8e14c.l8co3l4bo4l8dl2c"	'1644(org)
1648 GOSUB 1700
1649 PLAY "o418oa-gl2a-r418fga-gfel4d.l2a-r4"		'1645(org)
1650 GOSUB 1700					'1646 below(org)
1651 PLAY "l8o4ga-gfeo3b-o4ccecl4c. l8co3l4b-o4l8dl4cgl2fr2r2"
1652 GOTO 1641						'MUSIC r.
1700  IF STRIG(0)=0 THEN RETURN
1710 GOTO 5

まとレスにします。(^^;

#12203 としきさん
> ところで、#12194に掲載されているベーマガの表紙の右上、オレンジの地の部分、
> 黒い文字ではなんと書かれていますか？

文太さんが答えてくれたのでコピペ！ (^^;

> 月　マイコン
> 刊　　　　　　　　別冊
> 月刊　ラジオの製作

なるほど！　ここを見ていればわかったのですね。
よくわかりました。私に名探偵の素質が無いことが。(;_;)

#12205 文太さん

> 　と書かれていますね。確かにこれはarchive.orgにありました。

謎は全部解けたようで。＞じっちゃんの何かけて？
コピペさせてもらいました。m(__)m

> 　ただジョイススィックは？　あれ割り込み処理じゃないのかな？
> 　何か方法はあるだろう？？？

このころはまだ使われてないのでは。(^^;
私もそのうち試してみたいです。

> 「ウィンドウサイズ」

え？！　そうゆう意味だったのですか？　知らなかった。
VTDOS掲示板を閲覧するのに推奨されるサイズかと思ってた(^_^;)

> 「表示時間」

え？！　そうゆう意味だったのですか？　知らなかった。
屋敷の掲示板を表示してから6時間40分経過しているのかと思った(^_^;)

> Another HTML-lint

konnoさんは気にしない，に一票。

> え？！　そうゆう意味だったのですか？　知らなかった。

あれだ、konnoさん、親切心は人一倍ありそうなんだけど、UIの構成といえばいいのか、
他の人から見える部分において、それは一般人からどう見えるか、という観点がいささか
欠けているような感じ。
なので

> konnoさんは気にしない，に一票。

私も一票入れたくなってしまうけど、世界平和のために、ぜひ気にしていただきたい。

としきさん

　どうやら問題ないようで。
　僕は、なんだろう、よくは分からないのですが、、、。

>なんか、環境依存があるのかな。
　タブ。そして、縦の線が揃わないと、まったく意味をなさない
データだから、、、。
　NEC PC-9801が、SHARPのカラムに入っていたら、訳が分からない。

　テキストファイルでさえ、４タブのつもりで書かれたものを８タブ
でみたら、ぐちゃっとなっちゃうことあるじゃない、、、。

konnoさん

（M. Kimura's Comp Othello について）

>>ただジョイススィックは？
>このころはまだ使われてないのでは。(^^;
　あ、そう？　では、？？？

>私もそのうち試してみたいです。
　まだ僕が入れたバグが残っていると思いますが、適当にＸＸ用に
移植でも何でもしてください。

konnoさん

　うん、さすが！　我々、ちゃんと進歩してますね。
　ゆで卵の皮をむきながら、「やっぱ string 命令だろう」とか「一体どんな
文脈？」と独り言をしていました。
　ふと、string vs strig というのを思い出したのです。

#12007
> 　STRIG って何？
> 引数
>0：キーボード（スペースキーに対応）

　７６年から８４年まで。
　８タブです。

		SHARP		NEC		Fujitsu		others
--------------------------------------------------------------------------------------
1976（昭和51） 	　 		(8)TK-80
--------------------------------------------------------------------------------------
1977（昭和52） 	　 		(11)TK-80BS 	(5)L-KIT 8
--------------------------------------------------------------------------------------
1978（昭和53） 	(12)MZ-80K 		　 	　 		BASICマスター（日立）
								PET2001（コモドール）
								M100 8K BASIC（SORD）
--------------------------------------------------------------------------------------
1979（昭和54） 			(4)COMPO-BS			6809展示（モトローラ）
				(5)PC-8001 			BASICマスターExtra（日立）
		(10)MZ-80C					M100ACE（SORD）
								CBMシリーズ（コモドール）
--------------------------------------------------------------------------------------
1980（昭和55） 	(3)PC-1210					BASICマスターL3（日立）
		(5)PC-3100	(5)TK-85			↑初の6809マシン
		(6)MZ-80K2					if-800（沖）
								FX-9000P（CASIO）
--------------------------------------------------------------------------------------
1981（昭和56） 	(4)MZ-80B					TRS-80カラー（タンディ）
		(11)MZ-80K2E 	(9)PC-6001			VIC-1000（コモドール）
				(9)PC-8801 	(5)FM-8		16ビット機
								（三菱、東芝、パナファコム）
								JR-100（松下）
--------------------------------------------------------------------------------------
1982（昭和57） 	(5)MZ-2000					JR-200（松下）
		(6)MZ-1200	(9)PC-2001			HC-20（信州精器<エプソン>）
		(10)MZ-700	(10)PC-9801 	(11)FM-7	MB-16001
		(10)X1 				(11)FM-11 	COMMODORE-64
								M5（SORD）
								FP-1000/1100（CASIO）
--------------------------------------------------------------------------------------
1983（昭和58） 	(5)MZ-2200	(1)PC-8201	(11)FM-X 	パソピア-7（東芝）
		(9)MZ-5500	(10)PC-100			マルチ-8（三菱）
		(9)X1C，D 	(11)PC-6601			BASICマスターL3mkV（日立）
--------------------------------------------------------------------------------------
				(58)mkIIシリーズ
				(58)98FEシリーズ
--------------------------------------------------------------------------------------
1984（昭和59） 	(5)MZ-1500					パソピア1600（東芝）
		(5)MZ-6500			(2)FM-11 AD，BS
		X1Cs，Ck 			(5)FM-NEW7	各社MSX（サンヨー、東芝
						(5)FM-77 	ソニー、三菱）
--------------------------------------------------------------------------------------

> ウィンドウサイズの表示なんですが、表示位置がなんだか不思議。
> VTDOSの掲示板のところに埋もれているような感じ。
> これ、一番最後に回していただきたい。

なるほど。言われればもっともなのでそうします。

> ということは、将来的にはkonnoさん、この
> 情報を用いて何かをしてくれるということですよね。期待大。今後定期的にとしき
> からの圧がかかると思ってください。

いや、この情報はスマホでの見え方を知るために入れたのでもう役目を終えた？
でもあれば（プログラムの参考とか）便利だろうということで残しています。

> そんなことはともかくとして、この項目名も、単に「ウィンドウサイズ」ではなく、
> たとえば「あなたのブラウザのウィンドウサイズ」とかにしてもらえると、気のせい
> 程度にはわかりやすくなるかと。

確かに。でも個人的にわかればいいということでこのままいこうかな。
そもそも元ネタがタイトルのままだし。(^^;

> 上部に表示されている「表示時間」。これも、板塀の並びというのはひどく違和感。
> 最上部のタイトルの並びとか、あるいはタイトルの１行下、板塀の１行上、みたいな
> ところに独立した行とするのもいいかも。

なるほど。行は増やしたくないので1行目に追加します。

> また、表示時間というのもちょっと変えて「yyyy/mm/dd hh:mm時点の最新情報」
> みたいな方が、個人的にはちょっとかっこいい気がする。

長くなりすぎるのと、日付追加はちょっとだけ面倒という理由をつけて却下です。
「表示時間」ならページ更新した時間とわかるし。

> ま、なんにせよ、もし変更をかますのなら、そのあと、めざらさんの紹介された
> Another HTML-lintにきちんとかけることは必須かと。

う、この変更だけなら点数は変わらないだろうからやらなくてもいいかな。(^^;
ということで変更してみました。m(__)m

> 別冊もの２つ！　ゲット！
> konnoさん
> 　ありがとう！！！

お役に立てたようでなによりです。

> https://archive.org/search?query=%E3%83%9E%E3%82%A4%E3%82%B3%E3%83%B3BASIC%E3%83%9E%E3%82%AC%E3%82%B8%E3%83%B3+1982
> 　これで、最後の２つゲット。

おお、こんなふうに検索すればよかったのか。今までほぼ丸ごとだったので
重うて重うて。(^^;

> 　むふふふ。ブチ切れた文太です。

むむむむ。ブチ切れた文太さんは怖い。(-_-;)

> 　まだ動かせませんが。
> 　３時間かかりました。途中で１５分寝落ちしましたが。
> 　けっこう楽しかった。分かっていく喜び。

1982年03月の PC-6001 Othello のソースリストですか。
お疲れ様です。m(__)m

> 　まだ、「1」「l」「I」とか残ってると思います。

ソースの冒頭だけでも
>    5 KK=8 : P=5 : PB=S
          ↓          ↓
     5 KK=0 : P=5 : PB=5
違うようです。変数の値があてにならないのが厄介なんですよね。(>_<)
私のも初期画面までは動いたんですが、コマが置けなくて挫折してます。(>_<)
どこかの変数の数値とかが違ってるんでしょうね。
Turbo BASICです。

文太さんのソースは CONSOLE文の行を REM にすれば Turbo BASICで
コンパイル通ります。でも動かない。(>_<)

> > 「ウィンドウサイズ」
> え？！　そうゆう意味だったのですか？　知らなかった。
> VTDOS掲示板を閲覧するのに推奨されるサイズかと思ってた(^_^;)

もちろん VTDOS掲示板を閲覧すると自動的にそのサイズになります！
その他に現在のサイズまでわかるというおまけ機能もあるのです。(^^;

> > 「表示時間」
> え？！　そうゆう意味だったのですか？　知らなかった。
> 屋敷の掲示板を表示してから6時間40分経過しているのかと思った(^_^;)

これはちょっと違います。屋敷の掲示板情報を閲覧した時の時間です。(^^;
って、めざらさんのいけず〜。(;_;)

> > Another HTML-lint
> konnoさんは気にしない，に一票。

清き1票ありがとうございます。m(__)m

> あれだ、konnoさん、親切心は人一倍ありそうなんだけど、UIの構成といえばいいのか、
> 他の人から見える部分において、それは一般人からどう見えるか、という観点がいささか
> 欠けているような感じ。

なんというか、一画面に一杯詰め込みたいんですよね。(^^;
時計とカレンダ―のアクセサリとか最たるものですね。
新着情報の場合はスマホ画面にも納めたいという動機からです。

> > konnoさんは気にしない，に一票。
> 私も一票入れたくなってしまうけど、世界平和のために、ぜひ気にしていただきたい。

うう、一応変更しましたが、本当は隙間に押し込みたいのです。（変態か）
世界平和と言えば、昔は町のあちこちにあったような。
＃　アナタハコメヲシンジマスカ

> >>ただジョイススィックは？
> >このころはまだ使われてないのでは。(^^;
> 　あ、そう？　では、？？？

ごめんなさい。ソースに2か所ありましたね。m(__)m
ということは、PC-6001 はジョイスティック対応だったのね。

> >私もそのうち試してみたいです。
> 　まだ僕が入れたバグが残っていると思いますが、適当にＸＸ用に
> 移植でも何でもしてください。

#12217 で書きましたがコマを置くところで挫折中です。(>_<)
文太さんのソースと比較してみるかな。
TurboBASICやQBASIC用はLOCATE文が逆で数字もズレるのがバグの元。
コマの位置がそれでズレてる可能性大。XとYが逆になってるかも。
他にもバグとわかる変な動作のソースもいくつか・・・

うーん、今は完動するソースもあるのでそっちに注力したいのだが・・・
PC-8001のソースを改造したTurboBASICとQBASIC共通ソースです。(^^;

それ，「時間」じゃなくて「時刻」ですが。

> 清き1票ありがとうございます。m(__)m

ブラックと言うか，かなりドス黒いです。清くなどございませんよ。

> > 　ただジョイススィックは？　あれ割り込み処理じゃないのかな？

> このころはまだ使われてないのでは。(^^;

私もパピコンは触ったことがある程度なので知らなかったのですが、スペックを確認
したところ、ジョイスティックポートが２つ搭載されていたとありました。
ということは、ハードウェア的にはオプションだったのか。
そして、これに対応するために、言語仕様的にはSTRIG関数が搭載されていたので
しょう。

> > 　STRIG って何？
> > 引数
> >0：キーボード（スペースキーに対応）

スペースキーに対応していうところから考えて、STRIGって、Stick Trigger ではなく
Shooting Trigger の略ではないかと思えてきた。
引数と返り値が明確なら何でもいいんですけどね。

うん、まぁ、少しはよくなった。

> > 情報を用いて何かをしてくれるということですよね。期待大。今後定期的にとしき
> > からの圧がかかると思ってください。

> でもあれば（プログラムの参考とか）便利だろうということで残しています。

すなわちkonnoさん、なにかをしてくれるわけですよね。
しかも、本来裏方で動くようなコードの結果をわざわざ表に出しているということは
暗黙の宣伝効果を狙っているとしか思えない。
ということで、これが表示されているうちは、かつて２ちゃんねるでよく見かけた
「まだぁ〜？」がしばしば発動されることでしょう。

> 確かに。でも個人的にわかればいいということでこのままいこうかな。

いや、だから、めざらさんをはじめ他の人にはわからないから改善してよ、という話。
最近も新しいお客様が来てくださったようですが、ここの潜在顧客の数はVzのソース
をダウンロードしてくれた人の数と同じだけいると推測できるのですから。

> 長くなりすぎるのと、日付追加はちょっとだけ面倒という理由をつけて却下です。

面倒はともかく、長くなるから却下、というのは理解できる。でも

> 「表示時間」ならページ更新した時間とわかるし。

わかりません。めざらさんもわからなかった、というのはギャグかもしれませんが、
正直これでは言葉が足らなさすぎて誤解を招く可能性大。

> > Another HTML-lintにきちんとかけることは必須かと。
> う、この変更だけなら点数は変わらないだろうからやらなくてもいいかな。(^^;

ならば、ということで、私がやってみました。
う〜ん、とりあえず、ぎりぎりプラスの点数でしたけど、わりとミスタイプっぽい
タグ指定で点数を落としている。論理構造なんぞではなく、その手のケアレスミス
を解消するだけで、おそらく５０点程度は取れそう。

> それ，「時間」じゃなくて「時刻」ですが。

そ、そうですね（汗）。時刻に直してみました。m(__)m

> > 清き1票ありがとうございます。m(__)m
> ブラックと言うか，かなりドス黒いです。清くなどございませんよ。

マ界に澄む者には田沼のように清く澄んで見えるのです。

＃　VZマ界のマ王に俺はなるぞ〜！！（今は目の上に・・・）

> 私もパピコンは触ったことがある程度なので知らなかったのですが、スペックを確認
> したところ、ジョイスティックポートが２つ搭載されていたとありました。

私はPC-6001が先に出たものと勘違いしていました。
どこかに年表みたいなのがあったような・・・それによると
1979（昭和54） (5)PC-8001
1981（昭和56） (9)PC-6001  (9)PC-8801
この後は16ビット機の時代になるので、PC-6001は8ビット機全盛のころなのですね。
それならジョイスティックポートがあって当たり前かな。

> ということは、ハードウェア的にはオプションだったのか。
> そして、これに対応するために、言語仕様的にはSTRIG関数が搭載されていたので
> しょう。

ここでBASIC互換表を見たら、PC8001など多くのPCはジョイスティック無しでした。
機能が有るのは PC6001,PC6601,X1Hu,X1TB,S1,PASOPIA7,SMC77(△),JX,MSX,MSX2
これが合っているかはわからないですが、大体ゲーミングマシンという位置づけか。
あくまで BASICの話ですが。

> 機能が有るのは PC6001,PC6601,X1Hu,X1TB,S1,PASOPIA7,SMC77(△),JX,MSX,MSX2

JXって知らない。
日立のS1と東芝のパソピア７は、ゲーミングマシンといわれればそうかも。
他は明らかにゲーミングマシンですね。

konnoさん

>ソースの冒頭だけでも
>          ↓          ↓
>     5 KK=0 : P=5 : PB=5

　文太、ぜんぜん甘々だな。

>文太さんのソースは CONSOLE文の行を REM にすれば Turbo BASICで
>コンパイル通ります。でも動かない。(>_<)

　文太、ぜんぜん怖くないな。

http://p6ers.net/hashi/furoku1.html

>N66-BASICとN60-BASICの違いはPC-6601とPC-6001のハードウェア上
>の違いと大いに関係があります。 

　Ｎ６６とＮ６０も違う、と。深いのぉ。

ジョイ・スティック
https://www.beep-shop.com/blog/5761/

　あるみたいですね。でも、スペースキーで代用できるのでしょう？
　動かないのかぁ。
　まだ 80x25 のＤＯＳ標準画面が「一般的」とはなっていない時代
みたいなので、表示（根本！）系は、けっこう注意が必要なんでしょうね。

COLOR，CONSOLE，LOCATE
POS，CSRLIN
　このあたりですね（もちろんググリました）

　それほど多種多様でもないのだろうから、乗り越えます！　その前に
Basicが走るマシンを作ります！　コンパイルもしたいです！

　古い「BASIC規格表」をみたら、CONSOLE - Multi の欄に、
KEY ON / KEY OFF というのがありましたが、ファンクションキーの
表示／非表示だそうで、ま、バシバシ削っていってしまうのでしょう、
まずは。

　ＭＳ系と非ＭＳ系。Ｘ，Ｙの逆転、ご指摘ありがとうございました。
　いちおう気をつけます。

> > 機能が有るのは PC6001,PC6601,X1Hu,X1TB,S1,PASOPIA7,SMC77(△),JX,MSX,MSX2
> JXって知らない。

IBM JX のようです。JX 基本BASIC
日本語化してるのに日本ではほとんど売れなかったようです。
CPUはパソピア16と同じ 8088 4.77Mhz なので、OSもほぼ同じなのでは？
英語ページにはジョイスティックx2 とありますね。

> http://p6ers.net/hashi/furoku1.html
> 　Ｎ６６とＮ６０も違う、と。深いのぉ。

ファンサイトですか。良いですね、PC-6シリーズ愛が感じられます。

> 				PC-6601		PC-6001
> 1 スクリーン構成　SCREEN1	40文字×20行	32文字×16行
> 2 グラフィックス機能┌2      	80×40ドット  	64×48ドット
> 		SCREEN┤3	160×200ドット	128×192ドット
> 		      └4	320×200ドット	256×192ドット
> (CIRCLE)(PUT[@]),(GET[@])

これを見て、画面がちっちぇ〜、、と思いましたが
PC-8001は テキスト80桁×25行、グラフィック160×100ドット8色
テキストはいいとして、グラフィックはもっとちっちぇ〜 ！！ 
まあ、マイコンキットの組み立て済みみたいなものだしなぁ・・・
(CIRCLE)などの機能も当初は削除されてたとか、ユーザーのことを考えてない。

さて、甘々で怖くない人むけに、PC-8001オセロのQB移植ソースでも出すかな。
としきさんのが完成形なので、デザインを参考にもうちょいお直しして。(^^;

> > おお、メイリオを等幅に出来るのですか。
> > PC2 ではメイリオが比較的見やすいので、試してみたいと思います。
> やってみました。出来ました。＼(^^)／ ﾔｯﾀ-

インストールした時は等幅になったと思ったのですが、今は等幅じゃない？
たぶんタブが等幅に対応してないのか、タブの表が崩れてしまいます。(;_;)
見やすいけどこれでは使えない。(;_;)

> PC1でも BIZ UDGothic とどっちか良いか比べてみます。

PC1はギザギザが無いので BIZ UDGothic が見やすいです。
PC2はシステムが旧型のせいか、ギザギザになるのでその前提で見直しました。
＃（システムが）腐ってやがる。古すぎたんだ・・・
ということで、PC2のギザギザハートの見やすさランキング　(^^;

1. HGGothicE		太字でぱっと見は見やすい。
2. BIZ UDGothic		太さのばらつきがあるのがいまいち
3. HGGothicM		太さのばらつきがあるのがいまいち
4. MS Gothic		線が細くて見えにくい

ということで、HGGothicE でいくことにしました。
難しい漢字は潰れてしまいますが、ここではあまり無いだろうし。(^^;
そもそも難しい漢字はだいたいの感じで読んでるし。(^^;

IBM Personal Computer
Hardware Reference Library
          BASIC
Second Edition (May 1982)

　というマニュアルがありまして、その割と冒頭に

The STRIG function for Advanced BASIC now
reads four joystick buttons. This is useful if you
happen to have four one-dimensional paddles.

　なんて記述がありました。1982年に４つのボタンの
ジョイスティックが存在していたことになりますね。
　81年がＩＢＭ・ＰＣ（16 bit, 8088, ＭＳ伝説の始まり）
の発売なので、１年後ぐらいには、４つボタン対応に。

　ま、１６ビットの前の８ビットマイコンの話を、我々は
このところしているわけですが。

追伸：Shooting Trigger でもいいんですけど、QuickBasic
by MS の最後ヴァージョンでは、Stick Trigger でしたけどね。
　まず、BASIC で、やがてＯＳで、世界制覇をしたのですよねぇ。
　いや、すぐ LINUX の時代？　うーん？？？

konnoさん

>これを見て、画面がちっちぇ〜、、と思いましたが
>テキストはいいとして、グラフィックはもっとちっちぇ〜 ！！ 
　こういうの頭でイメージして、移植・復刻させなくちゃなんですね。
　いやぁ、、、。

　英語の BASIC-Game 本をチラ見しました。
　_33 Adult Computer Games in Basic_ by D. W. Chance.
　対象が、IBM PC, Apple II/IIe, TRS-80。1983年出版。各機種間での
移植の方法が書かれているが、、、。これ、俺、やるの？　という感じに
なってきました。

> 　Ｎ６６とＮ６０も違う、と。深いのぉ。

当時をリアルタイムで経験していた私からすると、あれだけスペックが違うのに
言語仕様が同じだったりすると、それこそ利用者に対する裏切りですよ。
とはいえ、互換性を重視する立場もわからなくもない。
PC-88のシューティングゲームがPC-98だと速すぎるのは問題だ、とか、Vzエディタ
のマクロがWzエディタで動かないのはよろしくない、という主張と同程度の正当性
は認めてあげたいかな。

> (CIRCLE)などの機能も当初は削除されてたとか、ユーザーのことを考えてない。

うむ、konnoさん、なかなか飛ばすなぁ。
ユーザーのことを考えて提案された、掲示板の簡易な機能向上策を採用しないという
判断を下すだけの人だ、言葉の重みが違う。

マジレスすると、konnoさん、ローレゾの真の恐ろしさを理解していないと見た。
あの画面解像度で円を描くことの無意味さというか。
例えば、エミュレータのDOS窓で160桁×100行の窓を開いてVzを起動し、paint.def
を使ってみればだいたいの感覚がわかると思う。こんなぎざぎざな円を書く機能を
付与するくらいなら、思い切ってばっさりカットするのも見識かと。

とはいえ、実際のところは、ユーザーのことを考えたからこそ搭載しなかった、
という可能性が高いと思う。当時はROMの容量が小さかったから、搭載できる機能
にも制限が多かった。もちろん、CIRCLEを搭載して、変わりにINPUTやPRINTを削る、
という判断を下してもよかったのかもしれませんが、普通にユーザーのことを考え
たら、なかなかそういう決断を下すのは難しいでしょう。あるいは、ROMを増やして
その分は価格を上げる、という選択肢もあって、ブルジョアな人（konnoさん？）
なんかには望ましいあり方なのかもしれないけど、ここはプロダクトアウトよりも
マーケットインで価格が安いほうを選んだ、ということなのかもしれません。

とにかく、昔のメモリとの戦いは、おそらくkonnoさんなんかの想像を絶するもの
だと思う。私はそこまで限界を攻めた事はないけれど、昔話を聞くと、とてもマネ
できるものではないな、と思う。
例えば、PC-8001のROM容量は24KBだったそうで、そのうちのどのくらいがBASICの
インタプリタだったかは知りませんが、もっと昔にさかのぼると、4KBとか8KBのROM
に詰め込まれたBASICインタプリタがあったそうです。
あるいは、ファミコンの有名なゲームの「ドラゴンクエスト」。
初代のメモリ容量は64KB。そこに大冒険を詰め込むわけで、たいしたものです。
cf.
https://nlab.itmedia.co.jp/nl/articles/1801/07/news008.html

現在の、潤沢にメモリを使える世界に感謝しましょう。

　もう、Ｖｚったら、ＶＷＸったら。
　うれしいんだよね、いくつになっても。

　行番号の書式にもいろいろあるのかもしれませんが、今のところ
下の書式が気に入ってます。行番号化けがけっこう容易に見つかる、
というメリットもあるみたい。

　テキストボックスも「テキストなのよ」（wordingが違うだろうけど
(c) 高橋さま）というので、#F 窓で、lx を使ったのは、生まれて初めて
だと思う。


=== LN_adjst.def by B ===;
 LINE NUM adjust for BASIC source

1 IF M=0 THEN 240
10 IF M=0 THEN 240
100 IF M=0 THEN 240
1800 END
^ start here

-->

   1 IF M=0 THEN 240
  10 IF M=0 THEN 240
 100 IF M=0 THEN 240
1800 END

* M
50 ^^ "LN_adjst"

	?. (ne=='BA')?? .
	&s ps[=pa,

	#G #F #e a=lx, 		; get LEN of max string
	#[			; #[ == #03
	(a>4)? {
	  &m("You're kidding!  NO 10000 lines in Basic") >z
	  }

#56 "\x ^\([0-9]\) " #m 	   "   \1 " #m  "AY"	; for 1
#56 "\x ^\([0-9][0-9]\) " #m 	   "  \1 "  #m  "AY"	; for 11
#56 "\x ^\([0-9][0-9][0-9]\) " #m  " \1 "   #m  "AY"	; for 111

:z	ps], &d .
*

としきさん

　受けました！

>PC-88のシューティングゲームがPC-98だと速すぎるのは問題だ、とか、Vzエディタ
>のマクロがWzエディタで動かないのはよろしくない、という主張と同程度の正当性
>は認めてあげたいかな。

　３回笑ったから、そのままコピペ。
　あ、そろそろ、別の話題で、別のスレッドとか、いかがですか？
　僕の環境では、１画面を超えているのですが？

としきさん

　ときどき、言い方に毒あるよね？
　とにかく、

CIRCLE() について。

>とはいえ、実際のところは、ユーザーのことを考えたからこそ搭載しなかった、
>という可能性が高いと思う。

　ぼくは、もちろん、数字で語られた ROM 容量のこととか分かりませんが、
CIRCLE が、NEC PCで、しばらく見送られたというのは、けっこう有名な話
みたいで、いろんなことが絡んでいたみたいです。
　過去の継承にこだわったＮＥＣが、ＭＳの「構造化ＢＡＳＩＣ」と切れた
という時期もあったみたいですから。この話、有名？
　ＮＥＣ、強気、あるいは責任感ありありの時代。いつ？

一つだけ。

> 　ときどき、言い方に毒あるよね？

ときどき、ではなく、いつも、です。
ただし、本人はそれを意図してやっていない。
故意ではなく過失、というヤツ。
結果として、常時謝罪しまくり。

ごめんなさい。

としきさん

>故意ではなく過失、というヤツ。
　ウソだ。わざとだ。
　でも、毒を投げ合えるのは良き関係だとも思う。
　毒と受け止められるのが怖くて怖くて、というご時世になっている
ようで、なんだか窮屈なんだよなぁ、とここ１０年感じてきました。
　そして、今日がほぼ「ここ」での最終日。
　とりあえず、大きなところでは、その手のアカハラ、パワハラ危険地帯
からは脱出です！
　ほんとの最終日に、いちおうこの Win7 マシンもお持ち帰り、と
なります。

> > > Another HTML-lintにきちんとかけることは必須かと。
> > う、この変更だけなら点数は変わらないだろうからやらなくてもいいかな。(^^;
> ならば、ということで、私がやってみました。
> う〜ん、とりあえず、ぎりぎりプラスの点数でしたけど、わりとミスタイプっぽい
> タグ指定で点数を落としている。論理構造なんぞではなく、その手のケアレスミス
> を解消するだけで、おそらく５０点程度は取れそう。

チェックしてみました。
> 128個のエラーがありました。このHTMLは 2点です。
と出ました。9点のところをいくつか直してみた結果は
> 122個のエラーがありました。このHTMLは 30点です。
今はこのくらいで勘弁してくだせぇ。m(__)m~~~~~~~~~~＼(^_^ )ﾋﾟｼﾋﾟｼ

> これはちょっと違います。屋敷の掲示板情報を閲覧した時の時間です。(^^;
> って、めざらさんのいけず〜。(;_;)

いけずのめざらから確認させていただきますが，
（時間ではなく時刻だということは理解しました）
屋敷の閲覧を開始した時刻ではなく，新着情報を再表示した時刻ですね？

> その他に現在のサイズまでわかるというおまけ機能もあるのです。(^^;

閲覧者のブラウジング環境のウィンドウサイズだと理解しました。
ただ，この数値は正確ですか？
わたしの環境は解像度 FHD で，各ブラウザを【全画面】にしたときに，
解像度と表示されたウィンドウサイズの値が一致しないのですが……。
「ウィンドウサイズ：横幅 = 1536 / 高さ = 864」になります。
本来の 1920 x 1080 に近い値というわけでもないですよね。

それもあって混乱するわけですが……。

どちらかっていうと，●わたしの環境が変●なのかも。
cman.jp の javascript サンプルのページの値を見ても変だし……。
（https://web-designer.cman.jp/javascript_ref/window/size/）

ズームとか関係なさそうなんだけど，何が変なんだろう……(´・ω・｀)

> 一方で、行番号系でやりたいことも、あるにはある。
> なにかというと、BASICでいうところのRENUMコマンド相当の動作。
> つまり、行番号の付け替え。

ちょっとまじめに考えてみました。
すると、これ、思ったより大変かもしれないということに気づきました。
N88-BASICに限りませんが、ほとんどのBASICインタプリタはプログラムを内部表現
に変換して格納しているのですよ。例えば、GOTOは89H、GOSUBは8DH、みたいな感じ。
つまり

 GOTO  1280 -> 89 20 20 00 05
 GOSUB 80   -> 8D 20 50 00

といったように。
なので、インタプリタなら対応する内部コードのうしろを変換するだけで済むの
ですが、テキスト処理だとこれがなかなか難しい。
例えば、以下の例。

10 REM GOTO 100
20 'GOSUB 200
30 PRINT "GOTO 300"

当然、これらは変換してはいけないわけです。
こんなものは存在しない、という前提で作ればそれなりに簡単ですけれど、これらに
まじめに対応したマクロを作るのは、私のおつむではちょっと難しい。
頭の体操にはいいかもしれないけど。

> とはいえ、対応する必要があるのは GOTO GOSUB THEN ELSE ぐらいかなぁ。

RETURNも行番号をとるけれど、そんな汚いコード、書いた事はないはず。
ん、RESTOREなんてコマンドもある。これは対応が必要だ。
あと、RESUMEぐらいは対応してもいいかも。

これ以上何かをするのなら、めざらさんのところの掲示板かなぁ。

> 30 PRINT "GOTO 300"

これを変換してはまずかろうと思いますが……

> 10 REM GOTO 100
> 20 'GOSUB 200

これらは構わないと言うか，むしろ追随させた方がよさげな気持ち。


> これ以上何かをするのなら、めざらさんのところの掲示板かなぁ。

閑古鳥すらひっそりしておりますので，もちろん歓迎いたしますよ。
BASIC の知識は四十年前に失ってますから，いちいち説明が必要ですが。

> > これはちょっと違います。屋敷の掲示板情報を閲覧した時の時間です。(^^;
> > って、めざらさんのいけず〜。(;_;)
> いけずのめざらから確認させていただきますが，

目上の人に失礼な言い方してすみませんでした。m(__)m
まじめな質問だったのですね。重ねて失礼をお詫びします。m(__)m

> （時間ではなく時刻だということは理解しました）
> 屋敷の閲覧を開始した時刻ではなく，新着情報を再表示した時刻ですね？

そうです。なので「表示時刻」と変更しました。私的に必要な情報なのです。

> 閲覧者のブラウジング環境のウィンドウサイズだと理解しました。
> ただ，この数値は正確ですか？
> わたしの環境は解像度 FHD で，各ブラウザを【全画面】にしたときに，
> 解像度と表示されたウィンドウサイズの値が一致しないのですが……。

私はコピペしただけなので詳細はわかりません。
ブラウザの外枠ではなく記事を表示する内枠の数値だと思いました。

> 「ウィンドウサイズ：横幅 = 1536 / 高さ = 864」になります。
> 本来の 1920 x 1080 に近い値というわけでもないですよね。

ブラウザ窓の上下左右は情報表示の空間になっているのでその内側だと思います。

> どちらかっていうと，●わたしの環境が変●なのかも。
> cman.jp の javascript サンプルのページの値を見ても変だし……。
> （https://web-designer.cman.jp/javascript_ref/window/size/）

おお、こんなサイトがあるんですね。確かにサンプルの表示数値は違いますね。
うちの環境で全画面の数値は、ウィンドウサイズ：横幅 = 1366 / 高さ = 617  なので
c1　window.innerWidth  (*1)　　　　　　　　ブラウザ内の表示域(スクロールバーを含む)　1366
h2　document.documentElement.clientHeight　ブラウザ内の表示域(スクロールバーを除く)　617
これが当てはまると思います。

(*1)：IE8以下では取得できません。とあるので環境によっては正しく表示しないかも。
うちの環境では全画面で無い場合は数値が１違う時があるようです。御魚もとい誤差かな？ (^^;

> ズームとか関係なさそうなんだけど，何が変なんだろう……(´・ω・｀)

上記の項目の値と全然違うのですか？　ソースを見ても難しすぎてわかりませんが

<tr><td>c1</td><td>window.innerWidth &nbsp;(*1)</td><td>ブラウザ内の表示域(スクロールバーを含む)</td><td id="outInnerWidth" class="nowValue"></td></tr>
<tr class="rowColor"><td>h2</td><td>document.documentElement.clientHeight</td><td>ブラウザ内の表示域(スクロールバーを除く)</td><td id="outElementClientHeight" class="nowValue"></td></tr>

うちの簡易なスクリプトとは違うような気がします。値が違うのは関数が違う？

//読み込み時の表示
window_load();

//ウィンドウサイズ変更時に更新
window.onresize = window_load;

//サイズの表示
function window_load() {
	var sW,sH,s;
	sW = window.innerWidth;
	sH = window.innerHeight;
	s = "ウィンドウサイズ：横幅 = " + sW + " / 高さ = " + sH;
	document.getElementById("winsize2").innerHTML = s;
}

> > 10 REM GOTO 100
> > 20 'GOSUB 200
> これらは構わないと言うか，むしろ追随させた方がよさげな気持ち。

これは好みが別れそうですね。オプションで切り替えるとかどうでしょう。
私は作らないと思うのでどちらでも。(^^;☆＼(--#)ﾊﾞｷｯ

> > これ以上何かをするのなら、めざらさんのところの掲示板かなぁ。
> 閑古鳥すらひっそりしておりますので，もちろん歓迎いたしますよ。
> BASIC の知識は四十年前に失ってますから，いちいち説明が必要ですが。

これは私も一票！
新コンテンツが生まれそうな予感！ (^_^)

#12236のコメントと考えたのですが、備忘録としてここにメモっておきます。

1981年 パソピア(PA7010)
CPUにZ-80A・RAM64KB・BASIC-ROM32KB・VRAM16KBを搭載、
テキスト　80文字 x 25行 (8色)　グラフィックは160×100ドット・ドット毎に8色指定可能なノーマルグラフィックモード
640×200ドット・アトリビュートキャラクタによる8×8ドット単位で8色指定なファイングラフィックモードの2モード
搭載言語はMicrosoft BASIC（Ver5.0）ベースのT-BASIC

1979 PC-8001　テキスト80桁×25行　グラフィック160×100ドット8色
1981 PC-6001　テキスト32桁×16行　グラフィック256×192ドット

私は初代パソピアはほとんどさわって無いですが、PC-8001を意識したSPECですね。
私が最初に買ったのはパソピアminiです。

1982年 パソピアmini（IHC-8000）
ハンドヘルド機。表示は標準では本体上にある24桁×1行の液晶画面のみだが、
ミニプリンタの付いた拡張ユニットと合体させてTVインターフェースを接続することで外部モニタへの出力が可能になる。
この場合の表示能力は32桁×24行のキャラクタのみのモノクロ表示となる。グラフィック無し
パソピアとの互換性はないがRS-232Cで接続してパソピアを親機として使うことが出来る。
CPU Ｔ6808 CMOS 8ビット　本体ROM 20KB　本体RAM 4KB　最大RAM容量 16KB
LCD　24桁1行（5*7ドット）
CRT　32桁24行　グラフィック無し
サイズ W195*88*25　重量 360g 電池込み
BASICは THBASIC（Hはハンドヘルドの意味か？）

これでBASICを勉強し、仕事にも役立てました。2分法とか。
TVに繋いでコンピュータオセロも自作して遊んでました。RAMパック(12k)増設してね。(^^;
そんな時、例の新型機に出会ったのです。
そのマシンは TBASIC16で動いていました。
私はその新型機をより速く動かすために新たなPCを買うことにしました。

1983年 パソピア7（PA7007）
CPUはZ-80A(3.99MHz VRAMを48KBに増量し、同時発色数はハードウェアタイリングによる27色中8色。
ファイングラフィックモードでのドット単位での色指定も可能になった。
サウンド機能は新たにSN76489を2つ搭載し、6重和音を実現した。
初代パソピアとは一部互換性あり。カートリッジ式周辺機器も引き継いでいる。
搭載言語はBASIC系のT-BASIC7。カートリッジによる変更も可能。

これを使えばプログラムの開発速度も、あのマシンの速度も上げられる！
私は互換性など知らないまま購入しましたが、幸いBASICレベルではほぼ互換でした。
アスキーセーブならそのまま相互に読み込み出来たのです。
そのために外付け5インチFDやドットプリンタまで買ったのでした。(;_;)

> 目上の人に失礼な言い方してすみませんでした。m(__)m

目上なことはないですが……あ！これは「今は目の上に」につながるの？ (^^;
そうですか，それでは以降「たんこぶめざら」と自傷してみようかな。

> > 屋敷の閲覧を開始した時刻ではなく，新着情報を再表示した時刻ですね？
> 
> そうです。なので「表示時刻」と変更しました。私的に必要な情報なのです。

問答がすれ違ってますね。でも，わかったのでもういいです。


デスクトップ端末の方で全画面表示にしてみると FHD の値が示されたので，
どうやら自分のノート端末の設定が怪しいと気づきました。思い当たるのは……
ディスプレイ設定の「表示スケール」です。ここが 125% にしてありました。
なぜこの値かというと，150%(推奨) に違和感があって拡大率を縮小したからです。
これを推奨されていないらしい 100% にしたら正常な値が表示されたようです。

表示スケールって，ハードウェア情報に影響するのですね。ちょっとびっくり。
だいぶ表示が細かくなって少し目が疲れる気がするし，縦タスクバーが細くなって
縦4列で配置していた小アイコンが入りきらなくなってしまいましたが，しばらく
これで運用してみようと思います。

お騒がせいたしました。

> 目上なことはないですが……あ！これは「今は目の上に」につながるの？ (^^;
> そうですか，それでは以降「たんこぶめざら」と自傷してみようかな。

すみません。目上ではなく年上でしたね。m(__)m
なので目の上とは関係ありません。m(__)m
と言ってもいいわけにしかなりませんね。
お詫びに小話をひとつ


昔、本物の魔王がいた。
あるとき魔王がいなくなり、その地は滅んだ。
一部のつわもの達はその滅びの災厄を生き延び、別の地に移り住んだ。
その地ではいまだ新たな魔王が決まっていない。　　-- 異修羅の伝説より（嘘）--

VZ界にも昔高橋さんという魔王のような方がいたんですね。
私はその高みを目指していた時もあったとかなかったとか。
その山は高いだけでなく非常に険しい。愛がー北壁は超えられない壁だったか・・・
私はそのK2すら超えられていないと感じているのです。(;_;)
マクロの山でも先人たちの背中がいまだ見えないという現実に、つい愚痴を・・・
おそまつm(__)m


> ディスプレイ設定の「表示スケール」です。ここが 125% にしてありました。
> なぜこの値かというと，150%(推奨) に違和感があって拡大率を縮小したからです。
> これを推奨されていないらしい 100% にしたら正常な値が表示されたようです。

システムのズーム設定で数値がズレていたのですね。了解しました。

> 表示スケールって，ハードウェア情報に影響するのですね。ちょっとびっくり。
> だいぶ表示が細かくなって少し目が疲れる気がするし，縦タスクバーが細くなって
> 縦4列で配置していた小アイコンが入りきらなくなってしまいましたが，しばらく
> これで運用してみようと思います。

画面は見やすく、情報量は出来るだけ多くとは矛盾するので苦労しますよね。
うちのPCも縦ドット数が少なすぎるので次の機会があれば・・・

> 閑古鳥すらひっそりしておりますので，もちろん歓迎いたしますよ。

ありがとうございます。続きはあちらで。

> BASIC の知識は四十年前に失ってますから，いちいち説明が必要ですが。

全くBASICを知らない人はともかく、忘れきった人には記憶を新たにしていただける
程度には仕様というか説明を書き始めたら、コードもあるので横40桁で桁折させて
80行くらい。ちょっとこれは自分でも難儀だと思うので、もうちょっと推敲してから
書き込みます。

#12248を先に予備知識としてあげましたが

> ユーザーのことを考えて提案された、掲示板の簡易な機能向上策を採用しないという
> 判断を下すだけの人だ、言葉の重みが違う。

簡単に機能向上して便利になる話ならやりそうですが、そうしない理由があるのでは。

> マジレスすると、konnoさん、ローレゾの真の恐ろしさを理解していないと見た。
> あの画面解像度で円を描くことの無意味さというか。

これはマジでわかりません。後で機能追加したのはユーザーの要望かと思いましたが
増設で性能向上させた場合に機能が見劣りしたからかも？
どこかでNECの開発秘話を読んでその辺の話も見たような気がしますが覚えてません。
なのでこの話はこのくらいで。


> その分は価格を上げる、という選択肢もあって、ブルジョアな人（konnoさん？）
> なんかには望ましいあり方なのかもしれないけど、ここはプロダクトアウトよりも
> マーケットインで価格が安いほうを選んだ、ということなのかもしれません。

私はブルジョアではないですよ。（きっぱり）
昔はわかりませんが現代ではブルジョアは資産階級を指すと思われます。
私は賃金労働者なので、それを言うならプロレタリアではないですかね。
私はPCにかなりの金をつぎ込みましたが金があるからではなくて必要だったからです。
私など残業してやっと人並みだったわけで、PCへの投資はほぼ仕事の為だったです。

> とにかく、昔のメモリとの戦いは、おそらくkonnoさんなんかの想像を絶するもの
> だと思う。私はそこまで限界を攻めた事はないけれど、昔話を聞くと、とてもマネ
> できるものではないな、と思う。

そうですね。パソピアミニの増設RAMパック(12k) なんてかわいいものですね。
当時の定価はわからないけど１〜２万円だったのかなぁ。

> 例えば、PC-8001のROM容量は24KBだったそうで、そのうちのどのくらいがBASICの
> インタプリタだったかは知りませんが、もっと昔にさかのぼると、4KBとか8KBのROM
> に詰め込まれたBASICインタプリタがあったそうです。

PC-8001以前はマイコンの時代で、Tiny BASICが主とか、私の知らない超古代です。
> (整数演算のみ、変数は26個のみ、7つのステートメントINPUT, PRINT, LET, GO TO, IF, GOSUB, RETURN のみのような)最低限に機能・仕様を絞ったBASICを自作
これが最低限なので

> にも制限が多かった。もちろん、CIRCLEを搭載して、変わりにINPUTやPRINTを削る、
> という判断を下してもよかったのかもしれませんが、普通にユーザーのことを考え
> たら、なかなかそういう決断を下すのは難しいでしょう。

この発言は明らかに罠ですね。(^^;

> あるいは、ファミコンの有名なゲームの「ドラゴンクエスト」。
> 初代のメモリ容量は64KB。そこに大冒険を詰め込むわけで、たいしたものです。

これはどこかで読んだかもですが、凄まじい詰め込みですね。
64kのcomで30年以上動くどこぞのエデイタ以上？

> さて、甘々で怖くない人むけに、PC-8001オセロのQB移植ソースでも出すかな。
> としきさんのが完成形なので、デザインを参考にもうちょいお直しして。(^^;

こう書いていましたが、コンピュータがちょっと弱すぎるのでDATAを見てみたら
データの一部がわざと弱くなるように入れ替えているのではと疑いを持ちました。
なので、データを入れ替えた版を作ってみました。
入れ替え前は8〜9割の勝率だったのが6割くらいになり、少しだけレベルアップ？
2回連続で負けたのでその後は慎重に時間をかけてなんとか勝てました。
ということで、レベル２を選択できる版に作り変えました。＼(^^)／ 
参考までに変更前の画面比較を


としき移植版　PC98エミュ


私家移植版　DOSVエミュ

私家版移植オセロ v1.1 2025-03-17版をアップします。
限定公開ということで、ここの掲示板だけで公開します。

元のデータを改変して少しだけ強い？ レベル２選択を追加しました。




ソースファイル：#txt=OT80-1.BAS　　右クリックで保存
TurboBASIC1.1版 #txt=OT80-1T.zip
QBASIC4.5版　　 #txt=OT80-1Q.zip

DOSVAXJ3 VGAモードで動作します。
動作中はCPUのスレッドが100%の負荷になると思います。
TurboBASICなら対策は出来るので、次回があれば・・・