Гистограмма распределения СЧ


Главная / ЭКВМ / Программы для ЭКВМ / Служебные программы и утилиты

гистограмма распределения СЧ в ЭКВМ

Программа предназначена для проверки качества генератора случайных чисел (ГСЧ) ЭКВМ.

гистограмма распределения СЧ в ЭКВМ

После запуска программа генерирует 4096 случайных чисел и распределяет их по 128 интервалам в регистры 1000-1127.

гистограмма распределения СЧ в ЭКВМ

После генерации программа строит гистограмму распределения, высота столбика пропорциональна количеству чисел, попавших в данный интервал. Математическое ожидание количества чисел соответствует середине экрана - значению 32.

После построения гистограммы для выхода из программы нажмите любую клавишу.




Программа "Гистограмма распределения СЧ"

  0 1 2 3 4 5 6 7 8 9
00 Cx 1 0 0 0 П A 1 2 8 П B
10 П 0 ИП 0 ИП A + П C Cx K П C F L0 11 K П A
20 4 0 9 6 П 0 K СЧ ИП B × ИП A +
30 П C K ИП C 1 + K П C F L0 25 2 PP П 90
40 10 ИП B П 0 Cx П 4 6 3 B↑ ИП 4 PP П
50 90 00 ИП A ИП 4 + П C 6 3 K ИП C -
60 ИП 4 PP П 90 12 K ИП 4 F L0 45 K ГРФ PP ИП 90
70 29 K NOT F x≠0 68 С/П          

Контрольная сумма ADD 11863, контрольная сумма XOR 137, при условии, что остальные байты содержат 0FFh.




Текст программы для кросс-компилятора

.CHARSET 1251
; Файл gistsch - гистограмма распределения СЧ 
.ORG 0
	CX
	1000 MA
	128 MB
	; обнуление регистров 1000-1128
	M0
A0:	RM0 RMA + MC
	CX K MC
	FL0 A0
	K MA
	
	;накопление данных
	4096 M0
A1:	K RAN
	RMB * RMA + MC
	KRMC 1 + KMC
	FL0 A1

	;вывод
	2 PP M 9010
	RMB M0 CX M4
A2:	63
	ENT
	RM4
	PP M 9000	; координаты нижней точки
	RMA RM4 + MC
	63 KRMC	-
	RM4
	PP M 9012
	KRM4
	FL0 A2
	
	K GRPH
A3:	PP RM 9029
	K NOT
	F X!=0 A3
	R/S	
.END 

НПП "СЕМИКО" (383) 271-01-25 (многоканальный)