TITLE	SEARCH
	ORG	200
SEARCH: L	0,TARGET	; 探すターゲットとする値をレジスタ0に読み込む
	LA	1,DATA		; レジスタ1にデータの先頭アドレスをセット
	LC	2,0		; レジスタ2に0をセット
S1:	CMP	2,16		; レジスタ2と16を比較
	BP	S3		; レジスタ2の値が16より大のときはループ終了
	LX	3,(1)		; レジスタ1が指すアドレスのデータをレジスタ3に読み込む
	CMP	0,(3)		; レジスタ0とレジスタ3の値を比較
	BZ	S2		; 値が一致したのでループ終了
	LEA	2,1(2)		; レジスタ2の値を1つ増やす
	LEA	1,1(1)		; レジスタ1の値を1つ増やす
	B	S1		; ラベル S1(ループの先頭)へ分岐
S3:	LC	2,0		; レジスタ2に0をセットしてから値を -1する
	LEA	2,-1(2)		; (つまり、見付からなかった印 FFFFをセット)
S2:	ST	2,RESULT	; レジスタ2の値を書き込む
	HLT
TARGET: DC	14		; 探すターゲットとする値
				; N個のデータ。ここにあるデータの中から探し出す
DATA:	DC	0
	DC	1
	DC	2
	DC	3
	DC	4
	DC	5
	DC	6
	DC	7
	DC	8
	DC	9
	DC	10
	DC	11
	DC	12
	DC	13
	DC	14
	DC	15
RESULT:	DS	1		; 実行結果(＝何番目で見付かったか)を記録
				; ※先頭を「0番目」としてカウント
				; 見付からなかったときは FFFF(== -1)を格納
	END