;C prototype: void CopyScreenBufferToScreen3 (void *src, void *dest1, void *dest2);
;
;void CopyScreenBufferToScreen3 (register void *src asm("%a0"),
;		      register void *dest1 asm("%a1"),
;		      register void *dest2 asm("%a2"));

	xdef CopyScreenBufferToScreen3

CopyScreenBufferToScreen3:	
	move.l	d3,-(a7)
	move.l	d4,-(a7)
	move.l	d5,-(a7)
	move.l	a3,-(a7)
	
	moveq.l	#99,d4
	moveq.l	#0,d0
	moveq.l	#0,d2
bcl_allline:
	moveq.l	#9,d5
bcl_line:
;lightplane	
	;Octet 1
	move.w	#0,d0
	move.b	(a0),d0
	lea.l	_data_table0(PC),a3
	adda.l	d0,a3
	move.b	(a3),d1
	
	;Octet 2
	move.w	#0,d2
	move.b	1(a0),d0
	lea.l	_data_table0(PC),a3
	adda.l	d0,a3
	move.b	(a3),d2
	
	;Octet 3
	move.b	2(a0),d0
	lea.l	_data_table1(PC),a3
	adda.l	d0,a3
	move.b	(a3),d3
	
	;fusion
	move.w	#0,d0
	move.w	d1,d0
	ror.w	#5,d0
	move.b	d3,d0
	ror.w	#8,d2
	lsr.w	#2,d2
	or.w	d2,d0
	
	move.w	d0,(a1)+

;darkplane	
	;Octet 1
	move.w	#0,d0
	move.b	6000(a0),d0
	lea.l	_data_table0(PC),a3
	adda.l	d0,a3
	move.b	(a3),d1
	
	;Octet 2
	move.w	#0,d2
	move.b	6000+1(a0),d0
	lea.l	_data_table0(PC),a3
	adda.l	d0,a3
	move.b	(a3),d2
	
	;Octet 3
	move.b	6000+2(a0),d0
	lea.l	_data_table1(PC),a3
	adda.l	d0,a3
	move.b	(a3),d3
	
	;fusion
	move.w	#0,d0
	move.w	d1,d0
	ror.w	#5,d0
	move.b	d3,d0
	ror.w	#8,d2
	lsr.w	#2,d2
	or.w	d2,d0
	
	move.w	d0,(a2)+
	
	addq.l	#3,a0
	
	dbf	d5,bcl_line
	
	lea.l	30(a0),a0
	lea.l	10(a1),a1
	lea.l	10(a2),a2
	dbf	d4,bcl_allline

	move.l	(a7)+,a3
	move.l	(a7)+,d5
	move.l	(a7)+,d4
	move.l	(a7)+,d3
	rts
	
_data_table0:
	dc.b	%00000000
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000001
	dc.b	%00000000
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000011
	dc.b	%00000010
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000011
	dc.b	%00000100
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000101
	dc.b	%00000100
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000111
	dc.b	%00000110
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000111
	dc.b	%00001000
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001001
	dc.b	%00001000
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001011
	dc.b	%00001010
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001011
	dc.b	%00001100
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001101
	dc.b	%00001100
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001111
	dc.b	%00001110
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001111
	dc.b	%00000000
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000001
	dc.b	%00000000
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000011
	dc.b	%00000010
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000011
	dc.b	%00000100
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000101
	dc.b	%00000100
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000111
	dc.b	%00000110
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000111
	dc.b	%00001000
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001001
	dc.b	%00001000
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001011
	dc.b	%00001010
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001011
	dc.b	%00001100
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001101
	dc.b	%00001100
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001111
	dc.b	%00001110
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001111
	dc.b	%00010000
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010001
	dc.b	%00010000
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010011
	dc.b	%00010010
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010011
	dc.b	%00010100
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010101
	dc.b	%00010100
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010111
	dc.b	%00010110
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010111
	dc.b	%00011000
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011001
	dc.b	%00011000
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011011
	dc.b	%00011010
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011011
	dc.b	%00011100
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011101
	dc.b	%00011100
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011111
	dc.b	%00011110
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011111
	dc.b	%00010000
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010001
	dc.b	%00010000
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010011
	dc.b	%00010010
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010011
	dc.b	%00010100
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010101
	dc.b	%00010100
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010111
	dc.b	%00010110
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010111
	dc.b	%00011000
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011001
	dc.b	%00011000
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011011
	dc.b	%00011010
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011011
	dc.b	%00011100
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011101
	dc.b	%00011100
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011111
	dc.b	%00011110
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011111
	
_data_table1:
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000000
	dc.b	%00000001
	dc.b	%00000010
	dc.b	%00000011
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00000100
	dc.b	%00000101
	dc.b	%00000110
	dc.b	%00000111
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001000
	dc.b	%00001001
	dc.b	%00001010
	dc.b	%00001011
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00001100
	dc.b	%00001101
	dc.b	%00001110
	dc.b	%00001111
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010000
	dc.b	%00010001
	dc.b	%00010010
	dc.b	%00010011
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00010100
	dc.b	%00010101
	dc.b	%00010110
	dc.b	%00010111
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011000
	dc.b	%00011001
	dc.b	%00011010
	dc.b	%00011011
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00011100
	dc.b	%00011101
	dc.b	%00011110
	dc.b	%00011111
	dc.b	%00100000
	dc.b	%00100001
	dc.b	%00100010
	dc.b	%00100011
	dc.b	%00100000
	dc.b	%00100001
	dc.b	%00100010
	dc.b	%00100011
	dc.b	%00100100
	dc.b	%00100101
	dc.b	%00100110
	dc.b	%00100111
	dc.b	%00100100
	dc.b	%00100101
	dc.b	%00100110
	dc.b	%00100111
	dc.b	%00101000
	dc.b	%00101001
	dc.b	%00101010
	dc.b	%00101011
	dc.b	%00101000
	dc.b	%00101001
	dc.b	%00101010
	dc.b	%00101011
	dc.b	%00101100
	dc.b	%00101101
	dc.b	%00101110
	dc.b	%00101111
	dc.b	%00101100
	dc.b	%00101101
	dc.b	%00101110
	dc.b	%00101111
	dc.b	%00110000
	dc.b	%00110001
	dc.b	%00110010
	dc.b	%00110011
	dc.b	%00110000
	dc.b	%00110001
	dc.b	%00110010
	dc.b	%00110011
	dc.b	%00110100
	dc.b	%00110101
	dc.b	%00110110
	dc.b	%00110111
	dc.b	%00110100
	dc.b	%00110101
	dc.b	%00110110
	dc.b	%00110111
	dc.b	%00111000
	dc.b	%00111001
	dc.b	%00111010
	dc.b	%00111011
	dc.b	%00111000
	dc.b	%00111001
	dc.b	%00111010
	dc.b	%00111011
	dc.b	%00111100
	dc.b	%00111101
	dc.b	%00111110
	dc.b	%00111111
	dc.b	%00111100
	dc.b	%00111101
	dc.b	%00111110
	dc.b	%00111111
	dc.b	%00100000
	dc.b	%00100001
	dc.b	%00100010
	dc.b	%00100011
	dc.b	%00100000
	dc.b	%00100001
	dc.b	%00100010
	dc.b	%00100011
	dc.b	%00100100
	dc.b	%00100101
	dc.b	%00100110
	dc.b	%00100111
	dc.b	%00100100
	dc.b	%00100101
	dc.b	%00100110
	dc.b	%00100111
	dc.b	%00101000
	dc.b	%00101001
	dc.b	%00101010
	dc.b	%00101011
	dc.b	%00101000
	dc.b	%00101001
	dc.b	%00101010
	dc.b	%00101011
	dc.b	%00101100
	dc.b	%00101101
	dc.b	%00101110
	dc.b	%00101111
	dc.b	%00101100
	dc.b	%00101101
	dc.b	%00101110
	dc.b	%00101111
	dc.b	%00110000
	dc.b	%00110001
	dc.b	%00110010
	dc.b	%00110011
	dc.b	%00110000
	dc.b	%00110001
	dc.b	%00110010
	dc.b	%00110011
	dc.b	%00110100
	dc.b	%00110101
	dc.b	%00110110
	dc.b	%00110111
	dc.b	%00110100
	dc.b	%00110101
	dc.b	%00110110
	dc.b	%00110111
	dc.b	%00111000
	dc.b	%00111001
	dc.b	%00111010
	dc.b	%00111011
	dc.b	%00111000
	dc.b	%00111001
	dc.b	%00111010
	dc.b	%00111011
	dc.b	%00111100
	dc.b	%00111101
	dc.b	%00111110
	dc.b	%00111111
	dc.b	%00111100
	dc.b	%00111101
	dc.b	%00111110
	dc.b	%00111111