Файл 77-2309442.mkp (КС 17881/237)

  0 1 2 3 4 5 6 7 8 9
00 ИП 7 П 2 1 П 4 ИП 9 - П 3 F xy /-/ П 6
10 1 + П 5 ИП 9 ИП 3 ÷ П 3 ИП 8 П 1 K ИП 1
20 ИП 1 ИП 4 - F x≥0 40 ИП 6 ИП 2 × ИП 4 ÷
30 ИП 3 × П 6 ИП 5 + П 5 K ИП 4 K ИП 2 БП 20
40 ИП 5 С/П                

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

Файл 77-2309442.mkl

.CHARSET 1251
; Файл 77-2309442 
.ORG 0 
	RM 7
	M 2
	1
	M 4
	RM 9
	-
	M 3
	F X^Y
	+/-
	M 6
	1
	+
	M 5
	RM 9
	RM 3
	/
	M 3
	RM 8
	M 1
	K RM 1

A20:	 ; с адреса 38 
	RM 1
	RM 4
	-
	F X>=0 A40
	RM 6
	RM 2
	*
	RM 4
	/
	RM 3
	*
	M 6
	RM 5
	+
	M 5
	K RM 4
	K RM 2
	GOTO A20

A40:	 ; с адреса 23 
	RM 5
	R/S

.END