Is this possible?

[ERMEGM]

Thanks Darrel.

[ERMEGM]

OK, having a little difficulty, and can't seem to sort it out. I'm getting a bad expression and an output parameter must be a variable Error on this line:

READ Idx, WORD Pattern ; get pattern from EEPROM

Can't figure it out. What am I doing wrong? This is going on a 16f687 chip.

[Darrel Taylor]

You have PBP 2.60? Right?
<br>

[ERMEGM]

Aha. 2.50b. Is 2.60 available online to download?

[Acetronics2]

Aha. 2.50b. Is 2.60 available online to download?

You are surprising me ...

PBP NEVER has been on-line downloadable ... honestly.

See CrownHill or Rentron sites for an official upgrade ...

Alain

[Darrel Taylor]

Aha. 2.50b. Is 2.60 available online to download?

I just assumed you had 2.60 because of the WORD modifier in your DATA statements.
You can still use VirtualPort with 2.50b, but getting data from EEPROM will be a little different.

Give this a try...

Pattern   VAR WORD
Idx       VAR BYTE

;---------------------------------------------------------------------------
ZigZag          DATA     %00,%00000001, 2
                DATA     %00,%00000010, 2
                DATA     %00,%00000100, 2
                DATA     %00,%00001000, 2
                DATA     %00,%00010000, 2
                DATA     %00,%00100000, 2
                DATA     %00,%01000000, 2
                DATA     %00,%10000000, 2
                DATA     %01,%00000000, 2
                DATA     %10,%00000000, 2
                DATA     %01,%00000000, 2
                DATA     %00,%10000000, 2
                DATA     %00,%01000000, 2
                DATA     %00,%00100000, 2
                DATA     %00,%00010000, 2
                DATA     %00,%00001000, 2
                DATA     %00,%00000100, 2
                DATA     %00,%00000010, 2
                DATA     %00,%00000001, 2
                DATA     %00,%00000000, 0
;---------------------------------------------------------------------------
INCLUDE "VirtualPort.bas"
ASM  
MyPortPins  macro               ; these define which bits go with which pins
    Vpin   0, PORTC,5
    Vpin   1, PORTC,0
    Vpin   2, PORTC,4
    Vpin   3, PORTC,1
    Vpin   4, PORTC,3
    Vpin   5, PORTC,2
    Vpin   6, PORTC,6
    Vpin   7, PORTB,4
    Vpin   8, PORTC,7
    Vpin   9, PORTB,6
  endm
ENDASM
;---------------------------------------------------------------------------
Init:
@   OutputPort  MyPortPins             ; Set Pins to Output
    
Main:
    FOR Idx = 0 to (19*3) STEP 3
        READ Idx,   Pattern.HighByte       ; get pattern from EEPROM
        READ Idx+1, Pattern.LowByte
@       WritePort  _Pattern, MyPortPins    ; write pattern to Virtual Port
        PAUSE 100
    NEXT Idx
GOTO Main

[ERMEGM]

OK, so I ordered 2.6 and installed it. With some minor tweaking, I managed to get rid of all the error pop ups and get the LEDs to flash. Thank you so much for the translated bits. It works perfectly.

I've started changing some coding around to add some variety to it. Had another questions though. Even though I've labeled the pattern above ZigZag, when you reference the code to look up that pattern, you refer to the memory location. Is this the way it has to be done or can you reference the name ZigZag (or any other name)? I ask only because I am adding other patterns and it can become confusing if I have to count to what each memory position is.

Also, the board I am using has programming ports built onto it, so all I have to do is connect 5 wires from the PCB to the ZIF socket of my PBP. My hardware question is, can I leave all the wires attached after programming the chip on the PCB, or do I have to disconnect them? Was curious if when I turn the flasher on without removing the connections, will it fry anything or cause interference? I've been disconnecting the ZIF socket to prevent any back-flow in case it wasn't protected. It's becoming a real pain if it's not necessary. I just don't want to take a chance on an expensive programmer. As before, thanks in advance.

Tony

[Darrel Taylor]

Yes, you can reference them by name.

Sequence VAR BYTE

Sequence = ZigZag
GOSUB RunSequence

Sequence = Marquee
GOSUB RunSequence

Each sequence will probably be a different length, so you might have the first byte indicate the length, then delete all those 2's.
<br>