The only way this works is that if you also address ALL 3 Data lines BEFORE you initiate a CLK and LATCH. The software driver for this also needs to complement that type of configuration. This method is a way to send parallel serial data to separate '595 IC blocks' which seems counter intuitive and there might be a slight speed advantage, but not worth it in many cases.
{
*****************************************************************************
* Name : UNTITLED.BAS *
* Author : [select VIEW...EDITOR OPTIONS] *
* Notice : Copyright (c) 2025 [select VIEW...EDITOR OPTIONS] *
* : All Rights Reserved *
* Date : 5/15/2025 *
* Version : 1.0 *
* Notes : *
* : *
*****************************************************************************
}
Device = 18F43K22
Clock = 8
// int osc and IO pin libraries
Include "intosc.bas"
#option DIGITALIO_INIT = true // automatically call setalldigital
Include "setdigitalio.bas"
Include "SHIFT.BAS"
Dim LATCH As PORTB.4 // hc595 pin 12 LCHCLK
Dim DATA As PORTA.1 // hc595 pin 14 SDI
Dim CLK As PORTB.3 // hc595 pin 11 SFTCLK
Dim RST As PORTB.1 // hc595 pin 10 RSTn (no connection to pcb)
Dim SDO As PORTA.4 // hc595 pin 9 SDO QH' shift out
Dim Leds As Byte
// set pin modes
Shift.SetClock(CLK)
Shift.SetOutput(DATA)
Shift.SetInput(SDO)
High(RST)
Low(LATCH)
// if there was a connection...
//Low(RST)
//DelayUS(100)
//High(RST)
// cycle leds
Leds = 0
While (true)
If (Leds = 0) Then
Leds = 1
EndIf
Shift.Out(MSB_FIRST, Leds, 8)
LATCH = 1
LATCH = 0
DelayMS(250)
Leds = Leds << 1
End WhilePlease don't take MrDEB's posts and troubles as a negative reflection of the excellent Swordfish Basic Compiler. Highly recommended.
