Hex code for Rufbot needed!

[HerrBall]

Lost here and could use some help!
I am trying to build this project.

http://www.rentron.com/ruf-bot.htm

I have gone out and bought all the parts and now I find I made a big mistake.
The code on the page was done in Picbasic, DUMMY me only has Picbasic Pro, and that will NOT work.
I really can't afford to go and buy Picbasic just for this one project.
Anyone willing to do a .Hex file of the project for me.
I would be glad to PayPal some funds!

Herr Ball

[mackrackit]

The code on the web site should work fine with PBP.
What problems are you having?

[Acetronics2]

Hi, Dave

a PbP license missing ,to compile, might be ???

Alain

[mackrackit]

Hi, Dave

a PbP license missing ,to compile, might be ???

Alain

Maybe?
The OP said

me only has Picbasic Pro

???

Herr Ball,
Where did you get Pic Basic Pro?

[HerrBall]

No the code will not work with Picbasic Pro. I have contacted Rentron and they told me the code is for Picbasic and will not work with Picbasic Pro.
I have contacted the author about the .hex file and have never heard back.
I'm lost here and was just hoping to find someone to help.


Melabs.com

[mackrackit]

That is weird..
I only have PBP and just tried it. "to many errors"

So we need to do a re-write.

Add this to the top of your code

INCLUDE "modedefs.bas"
    B0  var BYTE
    B1 VAR BYTE

Not sure why "yf" and the other labels are causing errors, Re-name the labels.

[mackrackit]

Not sure if this will work but it compiles with PBP.
square brackets in the serout command are used in place of ()
This is the TX code. Should be able to do the same with the RX..

   INCLUDE "modedefs.bas"
    B0  var BYTE
    B1 VAR BYTE

trisb = 134
trisa = 133
portb = 6
porta = 5
low 1
input 0
input 2

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

[HerrBall]

If it works or not I will see but as you say at least now it compiles
I will do the same for the RX code and then program the pics.
Will let you know later(maybe a couple days) if it works or not.

Thank you for your help ( working or not ).
I'm grateful

Herr Ball

[mackrackit]

If it does not work let us know, we will figure it out.