CP/M2.2とTINY BASIC

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

http://blog.shos.info/archives/2013/10/20131030bdschtml.html

を参考に

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用

　http://ameblo.jp/takeoka/entry-11003322407.html

　たけおか ぼちぼち日記

　8bit CPUの BASIC 言語の処理系

　僕が打ち込んだ 東大版 Palo Alto Tiny BASIC ソース,CP/M 2.2用

　ftp://www.takeoka.org/pub/micro/pbas.asm

pbas.asmをaltairz80.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 

で終了します。

電子工作　『古典電脳物語』から

http://www.amy.hi-ho.ne.jp/officetetsu/sbc/

80系プログラムの開発

http://www.amy.hi-ho.ne.jp/officetetsu/sbc/sbc/devel/devel.html

のタイニー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の使い方メモ

http://www.nextftp.com/abe/cpm/Altair/index.html

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

http://www.yamamo10.jp/yamamoto/comp/Tiny_BASIC/index.php

東京版 Tiny BASIC シミュレータ

http://metanest.jp/tkybasic/