In a previous thread (http://www.picbasic.co.uk/forum/showthread.php?t=18431) I've posted an example how to use those addressable RGB leds (WS2812B) aka NeoPixel. I've optimized the code and made a set of include files.

The NeoPixels can be used with almost any PIC running at 20MHz. The only limit is the available RAM: you need 3 arrays, one for each colour (RGB). The size of each array is the number of leds to control. With a large number of pixels I suggest using a PIC18F. See PicBASIC manual for more information on arrays limits.

A PIC running @20MHz is more than enough to make almost any animation. The values are pre-computed and then streamed in one shot. You have plenty of time to compute the next sequence unless you want to build a video screen!

Two gamma correction files are supplied for better fades in or out. One is for PIC18F and one for the others.
Ref.: https://learn.adafruit.com/led-trick.../the-quick-fix
See NeoPixelDump.pbp for instructions.

The demo code show you how to run them on PIC12F683. Now the only limit is your imagination! Be creative!



Demo code:
Code:
'****************************************************************
'*  Name    : NeoPixelDemo.pbp                                  *
'*  Author  : Michel Jasmin                                     *
'*  Notice  : NO Copyright (c) 2014 Michel Jasmin  ;)           *
'*          : No Rights Reserved                                *
'*  Date    : 2014-11-29                                        *
'*  Version : 1.0                                               *
'*  Notes   : Demo how to use WS2812B (neoPixels) on            *
'*          : a PIC12F683 @20MHz                                *
'****************************************************************

#IF __PROCESSOR__ = "12F683"
    #CONFIG
        __config _HS_OSC & _WDT_OFF & _MCLRE_ON & _CP_OFF
    #ENDCONFIG

#ELSE
    #MSG "Wrong Processor selected!"
#ENDIF

DEFINE OSC 20
DEFINE NO_CLRWDT 1  ' Don't waste cycles clearing WDT

'------------ Const -------------------------

NEO_NUM     CON 18  'Number of pixels

'------------ Variables -------------------------

NeoGreen    VAR BYTE[NEO_NUM]
NeoBlue     VAR BYTE[NEO_NUM]
NeoRed      VAR BYTE[NEO_NUM]
NeoPixel    VAR BYTE            'Looping variable
NeoPixValue VAR BYTE            'Value to be bit-banged

'------------ ALIAS -------------------------

NeoPin      VAR GPIO.2

'-----------  Initialization -------------------------------

Clear   ' Clear RAM before entry

ANSEL = 0
CMCON0 = 7  'Comparator disabled
CCP1CON = 0
WPU = 0
TRISIO.2 = 0 'NeoPin

NeoPin = 0

GOSUB NeoInit

'-----------  Main program -------------------------

Main:

    GOSUB NeoPixelDump
    GOSUB NeoPixelRotate

    PAUSE 50

    GOTO Main

END

NeoInit:
    'Init values for 18 leds string.
    FOR NeoPixel = 0 TO (NEO_NUM - 1)

        IF NeoPixel < 3 THEN
            NeoGreen[NeoPixel] = 0
            NeoBlue[NeoPixel] = 0
            NeoRed[NeoPixel] = 64

        ELSEIF NeoPixel < 6 THEN
            NeoGreen[NeoPixel] = 0
            NeoBlue[NeoPixel] = 64
            NeoRed[NeoPixel] = 0

        ELSEIF NeoPixel < 9 THEN
            NeoGreen[NeoPixel] = 0
            NeoBlue[NeoPixel] = 64
            NeoRed[NeoPixel] = 64

        ELSEIF NeoPixel < 12 THEN
            NeoGreen[NeoPixel] = 64
            NeoBlue[NeoPixel] = 0
            NeoRed[NeoPixel] = 0

        ELSEIF NeoPixel < 15 THEN
            NeoGreen[NeoPixel] = 64
            NeoBlue[NeoPixel] = 0
            NeoRed[NeoPixel] = 64
        ELSE
            NeoGreen[NeoPixel] = 64
            NeoBlue[NeoPixel] = 64
            NeoRed[NeoPixel] = 0
        ENDIF

    NEXT

    RETURN

NeoPixelRotate:
    FOR NeoPixel = 0 TO (NEO_NUM - 1)
        NeoGreen[NeoPixel] = NeoGreen[NeoPixel + 1]
        NeoBlue[NeoPixel] = NeoBlue[NeoPixel + 1]
        NeoRed[NeoPixel] = NeoRed[NeoPixel + 1]
    NEXT

    NeoGreen[NEO_NUM - 1] = NeoGreen[0]
    NeoBlue[NEO_NUM - 1] = NeoBlue[0]
    NeoRed[NEO_NUM - 1] = NeoRed[0]

    RETURN


INCLUDE "..\_Include\NeoPixelDump.pbp"

NeoPixelDemo.zipNeoPixelDemo.zip