Файл 13-1182049.mkp (КС 14479/157)

  0 1 2 3 4 5 6 7 8 9
00 ИП 8 7 0 - ИП 9 ИП 7 - + 1 0
10 ÷ П 4 3 - F x<0 24 5 0 B↑ 9
20 ÷ С/П БП 00 3 - F x<0 32 4 0
30 БП 18 2 - F x<0 40 3 0 БП 18
40 2 0 БП 18 0 0 0 0 0  

Исходный текст для кросс-компилятора

Файл 13-1182049.mkl

.CHARSET 1251
; Файл 13-1182049 
.ORG 0 

A0:	 ; с адреса 22 
	RM 8
	70
	-
	RM 9
	RM 7
	-
	+
	10
	/
	M 4
	3
	-
	F X<0 A24
	50

A18:	 ; с адреса 30 , 38 , 42 
	ENT
	9
	/
	R/S
	GOTO A0

A24:	 ; с адреса 14 
	3
	-
	F X<0 A32
	40
	GOTO A18

A32:	 ; с адреса 26 
	2
	-
	F X<0 A40
	30
	GOTO A18

A40:	 ; с адреса 34 
	20
	GOTO A18
	00000
.END