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

[cesar35]

Caros colegas eu achei  linkhttp://www.rentron.com/ruf-bot.htm  gostei do projeto mais Não manjo muito de picbasic eu ate fiz a compile mais não funciona .eu acho que está faltando os comandos
Vou posta o code ok .peço que os colegas possa me ajuda .ok
muito obrigado ...

tx

'include "modedefs.bas"
'DEFINE OSC 4
'@__config _XT_OSC & _WDT_ON & _CP_OFF

trisb = 134             
 ''''trisa = 133
'portb = 6
'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

'RX CODE:

'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
'start:
'B0 = 0
'serin 1,n9600,B0
'if B0 > 150 then right
'if B0 < 106 then left
'goto stop

'right:
'poke porta, 6
'goto start

'left:
'poke porta, 9
'goto start

'stop:
'poke porta, 0
'goto start
'end
 
 

[José Flor]

'include "modedefs.bas"

Muitos projetos encontrados na internet não funcionam. Não quer dizer que seja o caso deste. No teu caso tem outro arquivo que faz parte do programa, não será que está faltando esse ai na quotation.

José Flor

[cesar35]

Caro josé . vocé acha que o projeto não funciona .
Um achei que  era mais facio monta esse  robó  .eu não endendo muito de picbasic .
Você poderia me ajuda na imprentada .
Agradeço..

[José Flor]

Conheço BASIC e Assemble. Não conheço PICBASIC.
Supos que não tenha anexado o "modedefs.bas" ao projeto, isso é possivel de ter acontecido. Ou será que anexou?
José Flor

[cesar35]

Caro José . O  picbasic  compila normal sem erro .mais quando eu programo  o pic16f84 ele não funciona  ele Não  sé comunica entre si  . os modolos tx rx eu já testei ..
Você poderia me ajuda!

[gadelhas]

Caro José . O  picbasic  compila normal sem erro .mais quando eu programo  o pic16f84 ele não funciona  ele Não  sé comunica entre si  . os modolos tx rx eu já testei ..
Você poderia me ajuda!

Só por curiosidade, estás a usar oscilador exterior ( cristal de 4mhz)?
Tens MCLR ligado aos 5V?
 
Relativamente ao programa parece-me normal. Mas qual o programa que estás a usar? MPLAB? Microcode?
 Estás a compilar exactamente como esta no primeiro post?? Ou seja com a plica ( ' ) em antes das  instruções?

[cesar35]

  Caro gadelhas . No transmissor tem um resisto 10k no mclr eo cristal externo 4.000mhz
O brograma que eu estou usando picbasic demo .favor ver o link http://www.rentron.com/ruf-bot.htm

O brigado

[gadelhas]

  Caro gadelhas . No transmissor tem um resisto 10k no mclr eo cristal externo 4.000mhz
O brograma que eu estou usando picbasic demo .favor ver o link http://www.rentron.com/ruf-bot.htm

O brigado

Caro no código que se segue tens a plica em antes das instruções ( plica - ' ), complilaste com a plica ou sem??´É que se compilaste com a plica, é normal que não funcione.

'include "modedefs.bas"
'DEFINE OSC 4
'@__config _XT_OSC & _WDT_ON & _CP_OFF

[cesar35]

Caro Gadelhas . Eu não tenho pratica em picbasic  .Só gostei do projeto achei muito interesante mais o autor não postou os quivos hex .poriso eu estou  levando pau  no  programa  picbasic . Poderia me ajuda.
Um abraço
cesar

[gadelhas]

Caro Gadelhas . Eu não tenho pratica em picbasic  .Só gostei do projeto achei muito interesante mais o autor não postou os quivos hex .poriso eu estou  levando pau  no  programa  picbasic . Poderia me ajuda.
Um abraço
cesar

 Para te audar dentro das limitações que temos tens que me responder às perguntas na integra que já te fiz.

[cesar35]

Caro Gadelhas. Eu Peguei o code  colei no picbasic e compila . norma sem erro.Mais quando eu programo o pic16f84a ele não  funciona nada ,os pinos fica sem  tensão .Só os pinos 14 eo pino 4  mclr  o resto fica zerado . Não fais a leitura do joystick .Eo pic está bom ..

[gadelhas]

Caro Gadelhas. Eu Peguei o code  colei no picbasic e compila . norma sem erro.Mais quando eu programo o pic16f84a ele não  funciona nada ,os pinos fica sem  tensão .Só os pinos 14 eo pino 4  mclr  o resto fica zerado . Não fais a leitura do joystick .Eo pic está bom ..

 Caro, após verificar a tua imagem, constatei o problema que falava algumas mensagens atrás. tu tens no inicio de todas as instruções o caractér Plica ( ' ), e não podes, a plica só serve para quando queres comentar algo no teu programa, no teu caso tás a comentar tudo, obvio que o programa náo da erro, não estás a compilar nada porque tens todas as instruções comentadas, ou seja com a plica ( ' ) antes de cada linha.
 Em vez do teu código, copia e coloca o seguinte e compila;

include "modedefs.bas"
DEFINE OSC 4
@__config _XT_OSC & _WDT_ON & _CP_OFF

trisb = 134             
trisa = 133
portb = 6
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

'RX CODE:

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
start:
B0 = 0
serin 1,n9600,B0
if B0 > 150 then right
if B0 < 106 then left
goto stop

right:
poke porta, 6
goto start

left:
poke porta, 9
goto start

stop:
poke porta, 0
goto start
end

[cesar35]

Caro Gadelhas eu fiz a compile novamente  está no arquivo. ok

[cesar35]

Caro Gadelhas . fis a compile novamente .está no arquivo ,

[gadelhas]

Caro Gadelhas . fis a compile novamente .está no arquivo ,

Contino sem perceber porque é que aparece o caractér plica ( ' ) no início de cada linha, enquanto isso tiver aí, nunca vai funcionar.