logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

[mega8][bascom]Error 320 - WTF?

Brzozza93 17 Lis 2009 18:21 1077 4
REKLAMA
  • #1 7273518
    Brzozza93
    Poziom 15  
    Po kompilacji tego wywala mi error 320 [syntax error, token=' w ostatniej linii :
    $crystal = 1000000
    Dim Kod As Bit
    Dim Command As Byte , Subaddress As Byte
    Config Lcd = 16 * 1a                                        ' lub Config Lcd = 16 * 1
    Config Int0 = Falling
    On Int0 Receiverc5
    Enable Int0
    Enable Interrupts
    Cls
    Lcd "W8ing 4 RC5"
    Cursor Off
    Do
    If Kod = 1 Then
    Disable Int0
    Cls
    Lcd "Com: " ; Command ; ",Adr: " ; Subaddress
    Kod = 0
    Enable Int0
    End If
    Loop
    Receiverc5:
    Getrc5(subaddress , Command)
    Kod = 1
    Return
  • REKLAMA
  • #2 7273585
    yokoon
    Poziom 29  
    Brak deklaracji mikrokontrolera.
  • REKLAMA
  • #3 7273623
    Brzozza93
    Poziom 15  
    Wcześniej zrobiłem to w optionsach , ale dodałem $regfile = "m8def.dat" i wciąż to samo ;/
  • REKLAMA
  • #5 7273789
    Brzozza93
    Poziom 15  
    Wielkie dzięki... "portowałem" ten kod z 8051 i mi to umknęło. ;)
REKLAMA