@ Mel:
nice try ! ;-)
But, inside PBPPIC18.MAC:
SHIFTL?WCW macro Win, Cin, Wout
if (Cin == 1)
bcf STATUS, C
if (Wout == Win)
CHK?RP Wout
rlcf Wout, F
rlcf Wout + 1, F
else
CHK?RP Win
rlcf Win, W
MOVE?AB Wout
CHK?RP Wout <----- meeeeep
rlcf Win + 1, W
MOVE?AB Wout + 1
endif
else
MOVE?WW Win, R0
MOVE?CA Cin
L?CALL SHIFTL
MOVE?AWW R0, Wout
endif
endm
The marked part should be:
CHK?RP Win
Is this right ????
PBP 2.50C, MCS+ 3.0.0.5, MPLAB 8, MPASM 5.14, ASIX Presto, PoScope, mE mikroBasic V7.2, PICKIT2
Bookmarks