Файл 44-1382242.mkp (КС 16548/34)

  0 1 2 3 4 5 6 7 8 9
00 Cx 2 ИП 8 ÷ П 5 2 ИП 9 ÷ П 6 1
10 B↑ K СЧ F ln ИП 5 × F ex B↑ П 7 K СЧ F ln
20 ИП 6 × F ex + - F x≥0 09 ИП 9 ИП 7 F Bx
30 ÷ × 1 F Bx - ИП 8 × ÷ П 7 С/П
40 БП 09                

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

Файл 44-1382242.mkl

.CHARSET 1251
; Файл 44-1382242 
.ORG 0 
	CX
	2
	RM 8
	/
	M 5
	2
	RM 9
	/
	M 6

A9:	 ; с адреса 25 , 40 
	1
	ENT
	K RAN
	F LN
	RM 5
	*
	F EXP
	ENT
	M 7
	K RAN
	F LN
	RM 6
	*
	F EXP
	+
	-
	F X>=0 A9
	RM 9
	RM 7
	F ANS
	/
	*
	1
	F ANS
	-
	RM 8
	*
	/
	M 7
	R/S
	GOTO A9

.END