黒い画面が、80文字×24行の、ディスプレイです。 その下に、CPUの動作速度を示しています。最速で、2 MHzで動作します。 PCではほとんどの場合2 MHzで動作しますが、モバイル環境では少し遅くなるかもしれません。 その下、「Set File」のボタンは、ディスクイメージファイル及び、CP/Mファイルをセットする場合に使用します（後ほど説明します）。 「Help」は、ヘルプファイルを表示させるときに使います。

ディスプレイに表示されているとおり、この状態ではまだCP/Mが使用できません。CP/Mの実行には、別途ディスクイメージファイルを準備する必要があります。表示の通り、 http://www.rad51.net/projects/cpm/ を開き、そのページで指定されている方法でディスクイメージファイルを取得します。

なお、ここで得られるディスクイメージファイルは、 CpmtoolsGUI というツールで編集することが出来ます。CpmtoolsGUIをダウンロードした時に添付されているdiskdefsファイルが、そのまま使えます。

ディスクイメージファイルが取得できれば、"Set File"を押します。ファイル選択ダイアログになるので、取得したディスクイメージファイルを選択します。このファイルは、上記サイトからダウンロードしたZIPアーカイブそのままでも、解凍した約8M bytesのファイルでも、どちらでも構いません。次のような画面になるはずです。

この状態で、CP/M ver 2.2が起動しています。A, B, C, Dの４つの仮想ディスクドライブがあり、容量はそれぞれ1952K bytesです。ただし、Aドライブのうち8192 bytesは、CPM.SYSの読み込み用に使用されています。

別途用意したファイルを仮想ディスクに取り込みたい場合、上述のCpmtoolsGUIを利用することが出来ますが、CP/KM上で行なうことも出来ます。CCP(シェル: Console Command Processor)が実行中であることを確認して、"Set File"ボタンを押して下さい。ファイル選択ダイアログになるので、任意のファイルを選択します。ただしファイル名は、8+3規則に合致しているものを用いて下さい。

CP/Mを使用した後、ディスクイメージファイルを保存することも出来ます。"Save Disks"ボタンを押すと、ZIPアーカイブダウンロードの状態になります。このZIPアーカイブは、起動時にディスクイメージとして、"Set File"して利用することが可能です。

ここで実行されているCP/Mは、ver 2.2で、62k systemと呼ばれているものです。以下に、メモリーマップを示します。

PCとしては、以下のような概念図で構成されるものを使用しています。CPUは、Z80です。DisplayとKeyboardについては8255(パラレルI/Oインターフェース)の機能は使用しておらず、Z80 CPUとHTML5との間で直接やりとりすることで行なっています。従って、8255のうちこのエミュレーターで使用している機能は、Port C2のみです。Port C2はプルアップされており、リセット時はアドレス0x0000-0x7FFFの領域にROMが選択されるようになっています。ROM中のコードではBIOSを0xF200からの領域に構築し制御をBIOSに移します。CP/Mの実行中は、Port C2に0を出力することにより、0x0000-0x7FFFの領域にRAMを使用するような仕組みです。

#define div32(x,y,z) ((((unsigned long long)x)*((unsigned long long)y))>>z)

int _tmain(int argc, _TCHAR* argv[])
{
	unsigned int i,j,num,div,rem,mul,shift,valid,mul2,shift2;
	unsigned int res1,res2;
	FILE* fh;
	// Open a file to store the result.
	fh=fopen("result.txt","w");
	fprintf(fh,"num,mul,shift,valid\n");
	// Test several numbers used for div.
	for(num=1;num<65536;num++){
		// Determine the parameters
		div=(unsigned long long)0x100000000/(unsigned long long)num;
		rem=(unsigned long long)0x100000000%(unsigned long long)num;
		if (rem==0) {
			// num==2^n
			// Just shifting is the equlvalent of div.
			div=num;
			for(shift=0;(div=div>>1);shift++);
			fprintf(fh,"%d,0x00000001,%d,32\n",num,shift);	
		} else {
			// Determine values to use.
			mul=div;
			shift=32;
			while(mul<0x80000000){
				shift++;
				mul=((unsigned long long)((unsigned long long)1<<shift))/(unsigned long long)num;
			}
			mul++;
			// Check validity
			for(valid=32;valid;valid--){
				j=0xFFFFFFFF>>(32-valid);
				for(i=0;i<num;i++){
					// Check values "num" times from the largest ones.
					if (div32(j,mul,shift)!=j/num) break;
					j--;
				}
				if (i==num) break;
			}
			if (valid!=32) {
				// Try the other ways
				mul2=div;
				shift2=31;
				while(mul2<0x80000000){
					shift2++;
					mul2=((unsigned long long)((unsigned long long)1<<shift2))/(unsigned long long)num;
					mul2++;
					// Check validity
					for(i=0;i<num;i++){
						// Check values "num" times from the largest ones.
						j=0xFFFFFFFF-i;
						if (div32(j,mul2,shift2)!=j/num) break;
					}
					if (i==num) {
						// Found an available combination
						mul=mul2;
						shift=shift2;
						valid=32;
					}
				}
			}
			fprintf(fh,"%d,0x%x,%d,%d\n",num,mul,shift,valid);	
		}
	}
	fclose(fh);
	return 0;
}

num,mul,shift,valid
1,0x00000001,0,32
2,0x00000001,1,32
3,0xaaaaaaab,33,32
4,0x00000001,2,32
5,0xcccccccd,34,32
6,0xaaaaaaab,34,32
7,0x92492493,34,31
8,0x00000001,3,32
9,0xe38e38e4,35,32
10,0xcccccccd,35,32
11,0xba2e8ba3,35,32
12,0xaaaaaaab,35,32
13,0x9d89d89e,35,32
14,0x92492493,35,31
15,0x88888889,35,32
16,0x00000001,4,32
17,0xf0f0f0f1,36,32
18,0xe38e38e4,36,32
19,0xd79435e6,36,31
20,0xcccccccd,36,32

• Canvas
• FileReader
• Web Audio API もしくは Audio Data API

display.init=function(){
	// Set the contexts.
	this.context=document.getElementById("display").getContext("2d");
	this.ledContext=document.getElementById("led").getContext("2d");
	// Load the font data. See also fonts.onload event.
	this.fonts.src="./fonts.png?"+ new Date().getTime();
};
display.fonts.onload=function(){
	display.onload();
}
// display.onload will be called after sucessfull loading of font PNG image.
display.onload=function(){
	// Show the PNG image
	this.context.drawImage(display.fonts,0,0);
	// Construction of images for font
	for (h8=0;h8<16;h8++) {
		for (l8=0;l8<16;l8++) {
			this.font[h8*16+l8]=this.context.getImageData(l8*8,h8*8,8,8);
		}
	}
	// Construction of images for LED
	this.ledImage[1]=display.context.getImageData(128,0,16,16);
	this.ledImage[0]=display.context.getImageData(128,16,16,16);
	// Clear display
	var i;
	for (i=0;i<1000;i++) {
		this.write(i,0);
	}
	// Construct blank canvas
	var blank=document.getElementById("blank");
	blank.getContext("2d").putImageData(this.context.getImageData(0,0,320,200),0,0);
	// Show LED (green)
	this.led(1);
	// All done let's start Z80
	start();
};
display.write=function(addr,data){
	var posy=0;
	var posx=addr & 0x3ff;
	if (1000<=posx) return;
	while(40<=posx) {
		posy++;
		posx-=40;
	}
	this.context.putImageData(this.font[data],posx*8,posy*8);
};
display.led=function(green){
	this.ledContext.putImageData(this.ledImage[green?1:0],0,0);
}

file.loaded=function(obj){
	// This will be called when a file is uploaded.
	// If FileReader API is not supported, following code will fail.
	var fr = new FileReader();
	fr.onload = function () {
		var data=new Uint8Array(fr.result);
		file.update(data);
	};
	fr.readAsArrayBuffer(obj.files[0]);
	obj.style.display='none';
};
file.update=function(data){
	// This will be called when a file is sucessfully loaded by FileReader API.
	var header=new Array();
	var body=new Array();
	var i;
	// First 128 bytes contain header info.
	for (i=0;i<128;i++) {
		header[i]=data[i];
	}

<a href="data:application/octet-stream,%00%01%02">download</a>

/*
	Public methods:
	z80.reset();
	z80.setSpeed(clk);
	z80.getMicroSec();
	z80.exec(msec);
	z80.interrupt();
	z80.nmr();
	
	Required outside methods:
	Methods written in z80functions.js.
	memory.read(addr);
	memory.write(addr,data);
	io.read(addrL,addrH);
	io.write(addrL,addrH,data);
	z80.events(); // optional
*/

<?php

for($i=0;$i<100000;$i++){
	$r1=rand(0,0x7fffffff)+rand(0,0x7fffffff)+rand(0,1);
	$r2=rand(0,0x7fffffff)+rand(0,0x7fffffff)+rand(0,1);
	test($r1,$r2);
}
function test($r1,$r2){
	echo "$r1 $r2\n";

	$a1=$r1 & $r2;
	if ($a1<0) $a1+=4294967296;
	$a1=(string)$a1;
	$a2=bcand($r1,$r2);
	if ($a1!=$a2) echo('error!');

	$a1=$r1 | $r2;
	if ($a1<0) $a1+=4294967296;
	$a1=(string)$a1;
	$a2=bcor($r1,$r2);
	if ($a1!=$a2) echo('error!');

	$a1=$r1 ^ $r2;
	if ($a1<0) $a1+=4294967296;
	$a1=(string)$a1;
	$a2=bcxor($r1,$r2);
	if ($a1!=$a2) echo('error!');
}

function bcand($a,$b){
	return _bc($a,$b,'&');
}
function bcor($a,$b){
	return _bc($a,$b,'|');
}
function bcxor($a,$b){
	return _bc($a,$b,'^');
}
function _bc($a,$b,$mode){
	$a=(string)$a;
	$b=(string)$b;
	$res='0';
	$op='1';
	while($a!='0' || $b!='0'){
		$aa=(int)bcmod($a,'65536');
		$a=bcsub($a,$aa);
		$a=bcdiv($a,'65536');
		$bb=(int)bcmod($b,'65536');
		$b=bcsub($b,$bb);
		$b=bcdiv($b,'65536');
		switch($mode){
			case '&':
				$temp=$aa & $bb;
				break;
			case '|':
				$temp=$aa | $bb;
				break;
			case '^':
				$temp=$aa ^ $bb;
				break;
			default:
				exit(__FILE__.__LINE__);
		}
		$temp=bcmul((string)$temp,$op);
		$res=bcadd($res,$temp);
		$op=bcmul($op,'65536');
	}
	return $res;
}