2015年6月16日火曜日

CP/M2.2とTINY BASIC

[C] CP/M80 シミュレーターで懐かしの BDS-C を動かしてみた

を参考に

C:\Altair 8800 simulator を作成
altaiz80.zip
bdsc.zip
を解凍します。
c:\Altair 8800 simulator>dir
・・・・
2013/02/10  17:37           623,104 altairz80.exe
2015/06/03  11:41           923,373 altairz80.zip
2012/08/24  19:37           555,471 altairz80_doc.pdf
2006/11/01  22:04               229 bdsC
2015/06/03  12:13         1,056,967 bdsc.zip
2015/06/12  16:35         1,113,536 bdsc160.dsk
2002/10/21  19:27         1,113,536 bdsc160source.dsk
2006/11/01  21:38         1,113,536 cpm2.dsk
2015/06/12  12:56                63 Hello.c
2015/06/12  14:48         8,388,608 i.dsk
2009/04/12  21:52           141,822 simh_doc.pdf
2009/04/12  21:52           100,894 simh_faq.pdf
・・・
c:\Altair 8800 simulator>altairz80 bdsC
で起動します。
Altair 8800 (Z80) simulator V3.9-0 build 1625 (scp created Feb 10 2013 at 09:37:45 with gcc 4.2.4)

64K CP/M Version 2.2 (SIMH ALTAIR 8800, BIOS V1.23, 2 HD, 08-Oct-06)
A>

たけおかさんが打ち込んだ 東大版 Palo Alto Tiny BASIC ソース,CP/M 2.2
 たけおか ぼちぼち日記
 8bit CPU BASIC 言語の処理系
 僕が打ち込んだ 東大版 Palo Alto Tiny BASIC ソース,CP/M 2.2

pbas.asmaltairz80.exeのあるディレクトリーに置いて、読み込んで、アセンブル、COM化します。
b:
B>R PBAS.ASM

READ V-2.14 (15-Aug-04)  SIMH Interface V004
13.875kB written.

B>ASM PBAS
CP/M ASSEMBLER - VER 2.0
0A00
009H USE FACTOR
END OF ASSEMBLY

B>LOAD PBAS

FIRST ADDRESS 0100
LAST  ADDRESS 08CD
BYTES READ    07CE
RECORDS WRITTEN 10


B>LS PBAS.*
Name    Ext Bytes   Name    Ext Bytes   Name    Ext Bytes   Name    Ext Bytes
PBAS    ASM   14K ! PBAS    COM    2K ! PBAS    HEX    6K ! PBAS    PRN   34K
4 File(s), occupying 56K of 984K total capacity
147 directory entries and 110K bytes remain on B:

アセンブルリストを印刷したいのでwindows側に渡します。
B>W PBAS.PRN

WRITE V-1.09 (30-Oct-06)  SIMH Interface V004
33.25kB written (Text).

B>

Palo Alto TINY BASIを起動します。
B>PBAS
Palo Alto TINY BASIC

OK
>10 FOR I=1 TO 5
>20 PRINT I,"HELLO WORLD !!"
>30 NEXT I
>LIST
  10 FOR I=1 TO 5
  20 PRINT I,"HELLO WORLD !!"
  30 NEXT I

OK
>RUN
     1HELLO WORLD !!
     2HELLO WORLD !!
     3HELLO WORLD !!
     4HELLO WORLD !!
     5HELLO WORLD !!

OK
>SYSTEM 
で終了します。


電子工作 『古典電脳物語』から
80系プログラムの開発
のタイニーBASIC TBCPM.ZIP
TBCPM.COM(CP/Mのもとで実行可能なプログラム)使ってみます。
B>R TBCPM.COM

READ V-2.14 (15-Aug-04)  SIMH Interface V004
2kB written.

B>TBCPM

PALO ALTO TINY BASIC
PORTABLE 8080 VERSION
CP/M EDITION

OK
>100 INPUT "HANKEI ",R
>110 IF R=0 STOP
>120 PRINT "MENSEKI",R*R*3
>130 GOTO 100
>RUN
HANKEI R:72
MENSEKI  15552
HANKEI R:0

OK
>



参考にしたところ:
Altair 8800 simulatorの使い方メモ

はじめにソフトウェアー基礎コースTiny BASIC

東京版 Tiny BASIC シミュレータ