Файл 07-1072898.mkp (КС 7361/91)

  0 1 2 3 4 5 6 7 8 9
00 ПП 21 ПП 46 ИП 7 П A ИП 6 П 9 ИП 5 ПП
10 45 ИП A П B ИП 9 П A ИП 7 П 9 ИП 6 ПП 45
20 С/П K ИП 0 ÷ K П 1 F Bx F L2 21 В/О F O
30 B↑ K ИП 1 × K ИП 0 - /-/ ИП 0 1 + П 0
40 F O K П 0 F L2 29 В/О П 8 1 4 П 1 С/П
50 8 П 0 ПП 29 8 ИП 0 - П 2 2 ИП 0
60 + ИП 3 - П 0 K ИП 0 F L3 50 K ИП 2 F O 8
70 П 0 П 1 F O ПП 21 1 4 П 0 ИП 1 4
80 - П 3 ИП 0 8 ИП 1 - П 2 - П 1 K ИП 1
90 8 П 1 ПП 29 K ИП 0 F L3 82 В/О    

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

Файл 07-1072898.mkl

.CHARSET 1251
; Файл 07-1072898 
.ORG 0 
	GSB A21
	GSB A46
	RM 7
	M A
	RM 6
	M 9
	RM 5
	GSB A45
	RM A
	M B
	RM 9
	M A
	RM 7
	M 9
	RM 6
	GSB A45
	R/S

A21:	 ; с адреса 0 , 26 , 73 
	K RM 0
	<->
	/
	K M 1
	F ANS
	F L2 A21
	RTN

A29:	 ; с адреса 42 , 52 , 92 
	F R
	ENT
	K RM 1
	*
	K RM 0
	-
	+/-
	RM 0
	1
	+
	M 0
	F R
	K M 0
	F L2 A29
	RTN

A45:	 ; с адреса 9 , 18 
	M 8

A46:	 ; с адреса 2 
	14
	M 1
	R/S

A50:	 ; с адреса 65 
	8
	M 0
	GSB A29
	8
	RM 0
	-
	M 2
	2
	RM 0
	+
	RM 3
	-
	M 0
	K RM 0
	F L3 A50
	K RM 2
	F R
	8
	M 0
	M 1
	F R
	GSB A21
	14
	M 0
	RM 1
	4
	-
	M 3

A82:	 ; с адреса 95 
	RM 0
	8
	RM 1
	-
	M 2
	-
	M 1
	K RM 1
	8
	M 1
	GSB A29
	K RM 0
	F L3 A82
	RTN

.END