Driving a 2x16 LCD with only One Pin and 74HC595

[struppi81]

Ok, with the variable name you are right!

About Point 2:

Could be this a better Solution:

'******************************Shift_74HC595***********************************
F = B
E = 7
Repeat
;D = B >> E
ASM
  rlf _F, F
  BTFSS STATUS, C  
  BCF _D                 
  BTFSC STATUS, C  
  BSF _D    
ENDASM
E = E - 1
SELECT CASE D
CASE 1 
 Serial_Pin = 0
 @  DelayUS 1         ' min 1 µs for 1
 Serial_Pin = 1
 @  DelayUS 15        ' min 15 µs 
Case 0
 Serial_Pin = 0
 @  DelayUS 15        ' min 15 µs for 0 
 Serial_Pin = 1
 @  DelayUS 30        ' min 30 µs 
END SELECT    
Until E = 0

'Latch
Serial_Pin = 0
 @  DelayUS 200        ' min 200 µs for Latch 
Serial_Pin = 1 
 @  DelayUS 300        ' min 300 µs 
Next
Return

Thanks in advance!