ЭТЮДЫ

[Vladson]

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

Есть кстати ещё одна процедурка из журнала какого-то, но она не имеет 65535 она странная на фибоначчи похожая, толком её не понял даже

RND        LD      BC,#5A05
        LD      A,B
        LD      (RND+1),A
R2      LD      A,#25
        LD      (RND+2),A
        ADD     B
        ADD     C
        RLCA
        LD      (R2+1),A

(точнее я понял как работает, но не понял почему оно сносно работает...)


ЗЫ, - 8b это жесть... Додуматься же...

Мой минимум увы поменьше (но за то основная идея была задумана в 1989-м, правда тогда реализовывалась на бейсике)

	ORG	#8000
;	Если запускать с адреса кратного 256, то в С и так будет 0
;	XOR	A
;	LD	C,A


	LD	E,C
	LD	H,#18

START

	LD	D,#40
	LD	B,H
	LD	H,E
	LD	A,(HL)
	RLA
	LD	L,A
	LDIR

	JR	START