WebSVN – NedoOS – Blame – /src/games/br/wlib2x3.asm

Rev	Author	Line No.	Line
228	demige	1	;�� ࠩ⮢ 3�2 � ��ઠ�� ⮡ࠦ��
		2	A2_HER DEFW #E000,#F4B0,#FA50 ;�� 3�2
		3	A2_WAR DEFW #E3C0,#F870,#FE10
		4	H3x2 EX AF,AF
		5	LD A,D
		6	CP 5
		7	JR C,iH320
		8	LD A,8
		9	SUB D
		10	LD D,A
		11	iH320 EX AF,AF ;C/NC - �� /��
		12	CP #80
		13	JR C,H321
		14	CP #A0
		15	LD A,0
		16	JR C,H321
		17	LD A,D
		18	LD BC,A2_WAR-30
		19	JR H322
		20	H321 LD BC,A2_HER-30
		21	AND 1
		22	ADD A,D
		23	ADD A,D
		24	LD D,A
		25	H322 ADD A,A
		26	ADD A,D
		27	ADD A,A
		28	ADD A,A
		29	LD L,A
		30	LD H,0
		31	ADD HL,HL
		32	ADD HL,HL
		33	ADD HL,HL
		34	LD A,E
		35	EX DE,HL
		36	LD L,C
		37	LD H,B
		38	LD BC,#1802
		39	CALL WT
		40	ADD HL,DE
		41	EX DE,HL
		42	EX AF,AF
		43	JR C,H320r
		44	INV3x2 EX DE,HL ;��஢��
		45	PUSH BC
		46	LD DE,48+invBUF
		47	LD BC,48
		48	PUSH BC
		49	LDIR
		50	POP BC
		51	LD DE,invBUF
		52	PUSH DE
		53	LDIR
		54	CALL MEM6 ;�� ⠡�. ��஢��
		55	POP HL
		56	PUSH HL
		57	LD B,16
		58	LD D,#C3 ;�� ⠡ ��/0
		59	inVLOO ;横� ��஢��
		60	LD E,(HL)
		61	LD A,(DE)
		62	LD (HL),A
		63	INC HL ;1
		64	LD E,(HL)
		65	LD A,(DE)
		66	LD (HL),A
		67	INC HL ;2
		68	LD E,(HL)
		69	LD A,(DE)
		70	LD (HL),A
		71	INC HL ;3
		72	LD E,(HL)
		73	LD A,(DE)
		74	LD (HL),A
		75	INC HL ;4
		76	LD E,(HL)
		77	LD A,(DE)
		78	LD (HL),A
		79	INC HL ;5
		80	LD E,(HL)
		81	LD A,(DE)
		82	LD (HL),A
		83	INC HL ;6
		84	DJNZ inVLOO
		85	POP DE
		86	POP BC
		87	H320r JP HeF1

Subversion Repositories NedoOS