//ＺＤ　サンプルマクロファイル

cpm {		//ＣＰ／Ｍプログラムのロードと実行をおこなうマクロ
    ifb(%1) {
    	printf("\nUsage : cpm <cpmfile> [,<argument>]");
    } else {
        fload %1;
        ifb (%2) { 
            ep1;
        } else {
            ep1,%2;
        }
        printf("\nRunning CP/M ...");
        gf;
    }
}

breakpoint {	//ブレークポインタ設定マクロ
    ifb (%1) {
        printf("\nUsage : breakpoint <adrs> [, <cmd>]");
    } else {
        ifb (%2) {
            bp %1;
        } else {
            bp %1,,,%2;
        }
    }
}

clear {		//メモリ、レジスタクリアマクロ
	printf("\nclear memory & register ...")
	f 0,ffff
	ms *-,0,ffff
	x af, 0; x bc, 0; x de, 0; x hl, 0; x ix,0; x iy,0
	x af',0; x bc',0; x de',0; x hl',0; x sp,0; x pc,0
	x di
	zc
}

rom {		//ＲＯＭ領域定義マクロ
	if (blank(%1) || blank(%2)) {
		printf("\nUsage : rom <start>, <end>");
	} else {
		pm r-w+e-,%1,%2
	}
}

ram {		//ＲＡＭ領域定義マクロ
	if (blank(%1) || blank(%2)) {
		printf("\nUsage : ram <start>, <end>");
	} else {
		pm r-w-e-,%1,%2
	}
}

nomem {		//メモリ未実装領域定義マクロ
	if (blank(%1) || blank(%2)) {
		printf("\nUsage : nomem <start>, <end>");
	} else {
		pm *,%1,%2
	}
}