Keypad Sorunu!!!

[tosunpasha97]

deney kartında B0~B7 portlarına bağlı bulunan 4x4'lük keypad'dan bir butona basıldığında o butonun binary karşılıgını D0~D7 portlarına baglı ledlerde görmek istedim ama olmadı.

Tus_tara:
PORTB=%00000001
IF PORTB.0 THEN TUS = %00000001 
IF PORTB.1 THEN TUS = %00000010
IF PORTB.2 THEN TUS = %00000011
IF PORTB.3 THEN TUS = %00001010

PORTB=%00000010
IF PORTB.0 THEN TUS = %00000100 
IF PORTB.1 THEN TUS = %00000101
IF PORTB.2 THEN TUS = %00000110
IF PORTB.3 THEN TUS = %00001011

PORTB=%00000100
IF PORTB.0 THEN TUS = %00000111 
IF PORTB.1 THEN TUS = %00001000
IF PORTB.2 THEN TUS = %00001001
IF PORTB.3 THEN TUS = %00001100

PORTB=%00001000
IF PORTB.0 THEN TUS = %00001110 
IF PORTB.1 THEN TUS = %00000000
IF PORTB.2 THEN TUS = %00001111
IF PORTB.3 THEN TUS = %00001101
RETURN

buda yazdığım programlama