INIT_CARD:
	MOV	A,	#149
	Push	Acc	
        MOV	A,	#0
	Push	Acc
	Push	Acc
	Push	Acc
	MOV	A,	#64
	PUSH	ACC
	LCALL	CONTROLCARD
	RET

CONTROLCARD:
	SETB	Dout
	CLR	CS
	MOV	R2,	#6   ; 6 bytes to transfer to card
	LCALL	SENDSPI
	SETB	CS
	RET

SENDSPI:
	MOV	R3,	#8
	POP	ACC
	CLOCKBYTE:
	RLC	A
	MOV	DIN,	C
	SETB	SPICLK
	CLR	SPICLK
	DJNZ	R3,	CLOCKBYTE
	DJNZ	R2,	SENDSPI
	SETB	DIN