For-Next INSIDE While - Wend

[Sneaky-geek]

I have spent the last 2 days trying to get a For-Next to work Inside a While-Wend. But I keep getting a BLOCK MISMATCH error. The manual for PBP V2.50b offered little to no help and I can't find it here on the Forum. So where do I look?

Thanks ONE and All
Terry K9HA

[nemesis]

Please post some code

[BrianT]

Here is some code from a working program that has a FOR ... NEXT within a WHILE .... WEND. I did not throw up any problems when I wrote it or since. It runs on an 18F4620 and is compiled in PBPL.

SendPacket:
      txchksum = 0
      msgloops = 0
      txmsglen = txchar[3]
      while ack = 0            'destination has not yet got a clean copy
         msgloops = msgloops + 1
         if msgloops > 63 then msglooperror    ' send packet maximum of 64 times
         for commsctr = 0 to precnt
            serout2 msg, 32, [prechar]    'send preamble
         next commsctr
         serout2 msg, 32, ["$"]    'send Start Of Message
         for commsctr = 0 to 255   'send rest of message - won't get to 255
            if commsctr = txmsglen then sendeom
            serout2 msg, 32, [txchar[commsctr]]
            txchksum = txchksum + txchar[commsctr]
            'active message length is 0~(TxMsgLen - 1)
            'EOM is at position TxChar[TxMsgLen]
         next commsctr
         SendEOM:    'plus the SendChkSum:
         serout2 msg, 32, ["*",txchksum]
         txchar[txmsglen] = "*"
         txchar[txmsglen + 1] = txchksum

      wend

HTH
BrianT

[Sneaky-geek]

Thank you BRIAN!!,,
Brian your code example was a real help. In my code I had a conditional If Then, some how
during the marathon coding session I had dropped a EXTRA endif in. The compilier knew that there was a problem, told me there was a problem, but did not tell me WHAT the problem. So, I think I will "borrow" a programming trick from Skimask, DT, etal. SWITCH TO COKE! The DRINK that is!

Again, I want thank ONE AND ALL, for their help.