Файл 55-2263277.mkp (КС 10561/255)

  0 1 2 3 4 5 6 7 8 9
00 0 П 5 1 П 4 П 3 П A ИП 9 2 ÷ П 1
10 F x2 /-/ П 2 ИП 8 F x≠0 23 П 0 ИП A ИП 0 ×
20 П A F L0 17 ИП A F 1/x П A ИП 3 ИП 2 × П 3
30 ИП 5 1 П 6 + П 5 ИП 4 × П 4 ИП 8 F x≠0
40 50 П 0 ИП 5 ИП 0 + ИП 6 × П 6 F L0 42
50 ИП 3 ИП 4 F x2 ИП 6 × ÷ П B ИП A + П A
60 ИП B F x2 F √ ИП 7 - F x<0 26 ИП 8 ИП 1 F xy
70 ИП A × П 6 С/П 0 0 0      

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

Файл 55-2263277.mkl

.CHARSET 1251
; Файл 55-2263277 
.ORG 0 
	0
	M 5
	1
	M 4
	M 3
	M A
	RM 9
	2
	/
	M 1
	F X^2
	+/-
	M 2
	RM 8
	F X!=0 A23
	M 0

A17:	 ; с адреса 21 
	RM A
	RM 0
	*
	M A
	F L0 A17

A23:	 ; с адреса 14 
	RM A
	F 1/X
	M A

A26:	 ; с адреса 65 
	RM 3
	RM 2
	*
	M 3
	RM 5
	1
	M 6
	+
	M 5
	RM 4
	*
	M 4
	RM 8
	F X!=0 A50
	M 0

A42:	 ; с адреса 48 
	RM 5
	RM 0
	+
	RM 6
	*
	M 6
	F L0 A42

A50:	 ; с адреса 39 
	RM 3
	RM 4
	F X^2
	RM 6
	*
	/
	M B
	RM A
	+
	M A
	RM B
	F X^2
	F SQRT
	RM 7
	-
	F X<0 A26
	RM 8
	RM 1
	F X^Y
	RM A
	*
	M 6
	R/S
	000
.END