MSXのスクリーン1で表示される、迷路15*15をさまよえる迷路表示サンプル下アドレスで、MSXPenのページで公開してます。https://msxpen.com/codes/-NyRBHghbd2hddJusxNd
[MSXpen用]前回の続き。壁判定をマシン語化。キーボードの左右で方向転換。壁の表示はBASICのまま。[Basic]10 CLEAR999:DEFINTA-Z:DIM P$(34)20 SCREEN1:KEYOFF:WIDTH3230 GETTIME T$:MID$(T$,3,1)="1":MID$(t$,6,1)="1":R=rnd(-Val(t$))40 BLOAD"PROGRAM.BIN
[msxpen用]前とは別のBASICの迷路用3Dプログラムのサンプル。表示部分の一部のみで、1画面表示に6秒かかる。----90 CLEAR999:DEFINTA-Z:DIM P$(34)91 SCREEN1:KEYOFF:WIDTH3295 GETTIME T$:MID$(T$,3,1)="1":MID$(t$,6,1)="1":R=RND(-VAL(t$)):TIME=0100 FORJ
ここまでは、過去3ヶ月以内に投稿された日記です。
これより過去に投稿された日記を閲覧するには、画面左の「過去の日記」内にある年月をクリックすると該当月に投稿された日記を閲覧することができます。