Caros colegas da robóteca eu preciso em ajuda em picbasic

[cesar35]

   Caro Gadelhas Você me abriu olho sem as ' os pigos ele não compila .

[gadelhas]

   Caro Gadelhas Você me abriu olho sem as ' os pigos ele não compila .

 Agora é que ele está a compilar, mas apareceu erros, e o primeiro que aparece é devido ao

include "modedefs.bas"

 Se não tveres o ficheiro modedefs.bas, o compilador nunca vai perceber os comandos serin e serout, verifica se tens o ficheiro na directoria certa.

[cesar35]

Ola  Gadelhas tudo certo  achei um erro . de pontos.
Os pinos do pic agora tem tensão normal leu  o pot  em via dados pelos pino 7 do pic .
Mais o rx  fica desorientado  os servos fica  doido . com o joystick central .


include "modedefs.bas"

DEFINE OSC 4
'@__config _XT_OSC & _WDT_ON & _CP_OFF'

'symbol trisb = 134
'symbol trisa = 133
'symbol portb = 6
'symbol porta = 5
poke trisa, 0
poke porta, 0
low 0
input 1
B0 var byte
B1 var byte

prestart: pause 400
          poke porta, 10
          pause 200
          poke porta, 5
          pause 200
          poke porta, 6
          pause 200
          poke porta, 9
          pause 200
          poke porta, 0
          pause 200

start:    serin 1,n9600,B0
          if B0 = 1 then forward
          if B0 = 2 then backward
          if B0 = 3 then left
          if B0 = 4 then right
          if B0 = 5 then nomove
          goto start

forward:     poke porta, 10
                   goto start

backward:   poke porta, 5
                   goto start

right:         poke porta, 6
                 goto start

left:           poke porta, 9
                 goto start

nomove:    poke porta, 0
                  goto start
end

include "modedefs.bas"

DEFINE OSC 4
'@__config _XT_OSC & _WDT_ON & _CP_OFF'

'symbol trisb = 134
'symbol trisa = 133
'symbol portb = 6
'symbol porta = 5
low 1
input 0
input 2
B0 var byte
B1 var byte
start:
pot 0,50,B0

pot 2,50,B1
B0 = B0 * 5
B1 = B1 * 5

y:    if B0 < 100 then yf
       if B0 > 150 then yb

x:    if B1 < 100 then xr
       if B1 > 150 then xl

       serout 1,n9600,[5]
       goto start

yf:   serout 1,n9600,[2]
       goto start

yb:  serout 1,n9600,[1]
       goto start

xl:  serout 1,n9600,[3]
      goto start

xr:  serout 1,n9600,[4]
      goto start

end

[bettencourt]

include "modedefs.bas"

ainda não disseste se tens esse ficheiro

[cesar35]

Caro bettencourt  Eu nâo entendo muito de picbasic. nâo seu sé tenho o ficheiro .
O brigado .

[bettencourt]

eu também não percebo muito disso... mas faz o seguinte faz uma eskiza do win na pasta onde tens o teu compilador instalado e mete para procurar este nome modedefs.bas ver se encontra, se n encontrar é que provavelmente não tem.. Se encontrares pode-se eskecer esse problema....

Mas tipo para quem esta mais dentro do assunto, se não tivesse esse ficheiro não ia dar erro de compilação?

[cesar35]

Caro  bettencourt. O "modedefs.bas" tem no meu ficheiro  e sem ele nâo compila da erro .
Eu  acho que no tx nâo tem erro mais .Mais no rx eu acho que tem.
Obrigado

[gadelhas]

Cesar Porque continuas com a plica em algumas linhas do código??

include "modedefs.bas"

DEFINE OSC 4
'@__config _XT_OSC & _WDT_ON & _CP_OFF'  -------------------------- Retirar plica

'symbol trisb = 134 -------------------------- Retirar plica
'symbol trisa = 133 -------------------------- Retirar plica
'symbol portb = 6 -------------------------- Retirar plica
'symbol porta = 5 -------------------------- Retirar plica

[cesar35]

Caro   gadelhas .Tudo bem .

Sem os bonto o picbasic erro . var foto

O brigado por me ajuda

[bettencourt]

ainda tens as plicas ' a baixo do DEFINE OSC 4

retiras as ' e vê se da erro

edit: ja agora tens um erro removeste um 5 tens de por isto symbol porta = 5

[cesar35]

Caro bettencourt .  ver foto . quantinua dando error  (error line 16: syntax error (untitled.pbp

                                                                                                  error line  (15)
                                                                                                   error line (18)
                                                                                                   error line(17)

[gadelhas]

Qual o compilador que estás a utilizar?? O PicBasic ou o PICBasic Pro, casso seja o Pro a instrução Symbol não é utilizada, ou seja;
trisb = 134
trisa = 133
portb = 6
porta = 5

experimenta. Pelo que estou a vêr o programa está realizado para o picbasic, ou seja algo mais poderá falhar.

[cesar35]

Caro  gadelhas  eu estou usando picbasic pro reumente não tem SYmbal  Gora o erro e( erro untltled asm.82:(235)opcode.expected  instead  of'_xt_osc')

o brigada

[gadelhas]

Caro  gadelhas  eu estou usando picbasic pro reumente não tem SYmbal  Gora o erro e( erro untltled asm.82:(235)opcode.expected  instead  of'_xt_osc')

o brigada

 Ou utilizas o PicBasic, ou reorganizas o teu programa para picbasic pro. Aconselho-te a primeira visto que não tens conhecimentos.

[cesar35]

  Caro gadelhas. Realmente você te razâo eu nâo tenho  experiência  em  pic basic . como eu ti falei .Só gostei do projeto . Mais você do forum  Sâo  pessoas  muito gentis .gostan de ajuda .as pessoas sem nada entroca com aqui !!

Novamente o brigado