Assembly Knight Rider Program

The reason your "newest" code fails is the bank selection is wrong

BCF STATUS, RP1 and BCF STATUS, RP0 = bank 1
BCF STATUS, RP1 and BSF STATUS, RP0 = bank 2

Here is the exact code I used

Running... I have two LED's so I can see the carry working..

Thanks.

here is a knight rider program done in Swordfish. Pretty sure it will work??
I still am unpacking my electronic stuff and yet to locate my programmer. I did find a knight rider program done in Assembly here http://www.bradsprojects.com/category/tutorials/

Device = 18F1220

Clock = 20

Config MCLRE = Off



Include "InternalOscillator.bas"



// Connect each set of LEDs to PORTB (from RB0 to RB7)



Sub RightToLeft()

Dim i As Byte

For i = 0 To 7

PORTB.Bits(i) = 1

DelayMS(500)

PORTB.Bits(i) = 0

Next

End Sub



Sub LeftToRight()

Dim i As Byte

For i = 7 To 0 Step -1

PORTB.Bits(i) = 1

DelayMS(500)

PORTB.Bits(i) = 0

Next

End Sub



// program start...

TRISB = %00000000 And TRISB // make RB0-RB7 outputs

PORTB = %00000000 And PORTB // make all LED outputs low



While True

LeftToRight

RightToLeft