Error: extra tokens on end of line


Results 1 to 8 of 8

Threaded View

  1. #6
    skimask's Avatar
    skimask Guest


    Did you find this post helpful? Yes | No

    Default

    I see your code, and I raise you...ok, never mind...
    Seems a bit goofy in my mind, but give this a shot:
    (yes there is a bunch of colons here, only so I can see more of it on the screen)
    Code:
    DEFINE HSER_RCSTA 90h    'ALWAYS capitalize DEFINEs
    DEFINE HSER_TXSTA 20h
    DEFINE HSER_SPBRG 25
    ccp1con = 0 : ccp2con = 0 : adcon1 = 6 : trise = 7 : trisc = 191
    porte = 0 : trisa = 255 : trisb = 0 : trisd = 255 : portEval var byte
    portCval var byte : portCfinval var byte : stripBit var bit
    portDval var byte : portAval var byte : IdNumber var byte
    OutVal var byte : btvar var byte : oldbtvar var byte : portb = 0
    START:
    portcfinval = portc & $3f
    if porta <> portaval then
        portaval = porta : hserout [#porte,"A",#porta,13,10]
    endif
    if portd <> portdval then
        portdval = portd : hserout [#porte,"D",#portd,13,10]
    endif
    if (portcfinval <> portcval) then
        portcval = portcfinval : hserout [#porte, "C", #portcfinval, 13,10]
    endif
    hserin ,100,start,[Idnumber] : porteval = porte
    if idnumber <> porteval then start
    HSERIn ,500,START,[Btvar]
    if ( btvar => 48 ) and ( btvar <= 55 ) then
         oldbtvar = btvar - 48 : HSERIn, 1000 , START , [btvar]
         if btvar <= 49 then outval.0[ oldbtvar ] = btvar.0
         portb = outval : goto start
    endif
    goto start
    Last edited by skimask; - 23rd January 2008 at 17:12.

Similar Threads

  1. Loop with two motor and 2 sensors
    By MrRoboto in forum mel PIC BASIC
    Replies: 4
    Last Post: - 8th December 2008, 23:40
  2. RC5 decode on a 10F + Question
    By ultiblade in forum mel PIC BASIC Pro
    Replies: 8
    Last Post: - 11th September 2008, 08:20
  3. Replies: 11
    Last Post: - 12th July 2008, 02:36
  4. ELSEIF Block Would be Good.
    By T.Jackson in forum PBP Wish List
    Replies: 30
    Last Post: - 14th May 2007, 03:36
  5. having problems with Hantronix 20x4 lcd
    By Rhatidbwoy in forum mel PIC BASIC Pro
    Replies: 16
    Last Post: - 22nd December 2005, 12:22

Members who have read this thread : 0

You do not have permission to view the list of names.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts