Файл 51-2334698.mkp (КС 6255/89)

  0 1 2 3 4 5 6 7 8 9
00 K |x| /-/ 1 5 0 /-/ K max /-/ П 8 2
10 П 2 ИП D F x≠0 72 ИП 8 ИП 6 × П 1 - F x≥0
20 76 П D ИП 9 ИП 6 × ИП A П 4 + ИП C ×
30 ИП 1 ИП 7 × - ИП C ИП 1 - П C ÷ П A
40 ИП 4 ИП 6 × ИП 4 ИП A - ÷ П 3 F x≥0 54
50 ИП 6 - F x≥0 84 ИП B ИП A ИП 4 + 2 ÷
60 ИП 6 × - F x≥0 93 П B С/П F L2 00 1
70 0 П 6 0 П 8 БП 14 ИП D ИП 8 ÷ П 6
80 1 П 2 БП 11 ИП B ИП 6 ИП 3 × 2 ×
90 - F x<0 54 9 ÷ П B 0 F 1/x    

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

Файл 51-2334698.mkl

.CHARSET 1251
; Файл 51-2334698 
.ORG 0 

A0:	 ; с адреса 67 
	K ABS
	+/-150+/-
	K MAX
	+/-
	M 8
	2
	M 2

A11:	 ; с адреса 82 
	RM D
	F X!=0 A72

A14:	 ; с адреса 74 
	RM 8
	RM 6
	*
	M 1
	-
	F X>=0 A76
	M D
	RM 9
	RM 6
	*
	RM A
	M 4
	+
	RM C
	*
	RM 1
	RM 7
	*
	-
	RM C
	RM 1
	-
	M C
	/
	M A
	RM 4
	RM 6
	*
	RM 4
	RM A
	-
	/
	M 3
	F X>=0 A54
	RM 6
	-
	F X>=0 A84

A54:	 ; с адреса 48 , 91 
	RM B
	RM A
	RM 4
	+
	2
	/
	RM 6
	*
	-
	F X>=0 A93
	M B
	R/S
	F L2 A0
	10
	M 6

A72:	 ; с адреса 12 
	0
	M 8
	GOTO A14

A76:	 ; с адреса 19 
	RM D
	RM 8
	/
	M 6
	1
	M 2
	GOTO A11

A84:	 ; с адреса 52 
	RM B
	RM 6
	RM 3
	*
	2
	*
	-
	F X<0 A54

A93:	 ; с адреса 63 
	9
	/
	M B
	0
	F 1/X

.END