Triggering 5 TTL clocks simultaneously

[mister_e]

1.) Is there a way to split PORTA into analog and digital inputs?

for sure... see datasheet in the A/D section.. ADCON1 TABLE 19-2

will be interesting to have kind of flowchart and schematic for the other problems you have.

[Darrel Taylor]

TurboLS,

What version of PBP are you using? I've never seen this work in any versions I've had.

IF vertpulse < 512
THEN GOTO horizloop
ELSE GOTO buttonloop

I've wanted to use that type of syntax before, but I get nothing but errors. Did I miss an update or something. I have 2.45

Darrel

[TurboLS]

I am using 2.46 and I will have a pic up soon that has the timing scheme. thanks for the replies.

[TurboLS]

here is the timing diagram. notice how the reset, H1, and H2 are in synch at the lower right. Also notice that the reset is going all the time, even when the other 4 clocks are not.

please click the link and scroll to page 13

http://www.kodak.com/global/plugins/...2ELongSpec.pdf

thanks.

[TurboLS]

Oh yeah, i am gettin some errors from that if else stuff too.... gonna have to find a way around that arghhhh!

scratch that, you just have to put all the commands on the same line, like so:

IF vertpulse < 512 THEN GOTO horizloop ELSE GOTO buttonloop

however, i still have 9 errors to fix before mine compiles properly.

[TurboLS]

Also, I tried looking at the ADCON1 register, and i guess if I am reading from the table properly... to set PORTA.2 to digital in, I should say ADCON1 = %00001101 cuz that's where the D and the AN2 meet.

I am still having a problem with the OnPushButton command and apparently I have to use END IF commands, which I am not sure how I will implement just yet.

[TurboLS]

I got it down to 6 errors, all with my IF statements. Here is what I have for a generic IF line:

IF PushButtonOnPORTABIT2 = 1 THEN GOTO vertloop ELSE GOTO buttonloop

on the following line i have

ENDIF

and doing that got rid of 3 of the errors, but now I need to figure out why it doesn't like my then goto / else goto commands.

For each of my 3 if statements, I get

bad expression
bad expression or missing then

[mister_e]

IF vertpulse < 512 THEN GOTO horizloop ELSE GOTO buttonloop

I prefer like this

IF vertpulse < 512 THEN 
    GOTO horizloop 
ELSE 
    GOTO buttonloop
ENDIF

Using Alias to i/o

TRISA = 255 ' Set PORTA as input

PushButton1 var PORTA.0
PushButton2 var PORTA.1
PushButton3 var PORTA.2

IF PushButton1 then ' Same as PushButton=1
   ' do your stuff here
ENDIF