Hi Rob,

Yes it does, I had to change the code a little, please see below:

Include "MODEDEFS.BAS" ' Include Shiftin/out modes

define OSC 32
Define LOADER_USED 1
Define LCD_DREG PORTB ' Define LCD connections
Define LCD_DBIT 0
Define LCD_RSREG PORTB
Define LCD_RSBIT 4
Define LCD_EREG PORTB
Define LCD_EBIT 5
DEFINE LCD_BITS 4 'LCD bus size 4 or 8
DEFINE LCD_LINES 2 'Number lines on LCD
DEFINE LCD_COMMANDUS 2000 'Command delay time in us
DEFINE LCD_DATAUS 50 'Data delay time in us



led1 var porte.0
led2 var porte.1

B0 VAR BYTE
B1 VAR BYTE
B2 VAR byte
B3 VAR byte
B4 VAR byte
B5 VAR byte
B6 VAR byte
B7 VAR BYTE
B8 VAR BYTE
B9 VAR BYTE
B10 VAR byte
B11 VAR BYTE
B12 VAR byte
B13 VAR byte
B14 VAR byte
B15 VAR byte
B16 VAR byte
B17 VAR BYTE
B18 VAR BYTE
B19 VAR BYTE
B20 VAR byte

ADCON1 = 15 ' PORTA and E digital

pause 100
Lcdout $fe, 1,"DMX "
Lcdout $fe,$C0,"CONTROLLER "
pause 2500
goto startup

STARTUP:

Lcdout $fe, 1,"SHIFTOUT "
Lcdout $fe,$C0,"ROUTINE "

for b0 = 1 to 64
shiftout led1, led2, 0, [%00000000]
pause 500

;shiftout led1, led2, 0, [%11111111]
;pause 500

Next B0

goto startup


END