cable needs to be connected.Hi all,
I'd like to run DEBUG full time, are there any negative consequences?
Something like that would be ideal. I wrote an application in VB2003 express that logged the debug outputs to a .csv file. This allowed me to load the data into Excel and plot any of the variables for a NiMH battery charger that I was developing.I control my Heat Pump using a 28X1 in my workshop, I also have an old PC in there, so I would like to use it for monitoring the inputs and outputs to and from the Heat Pump.
There are always options like:I would love to have a graphic interface but I am fairly new to this and don't have the programming abilities. I am waiting patiently for ICE (IN Circuit Emulation) to become available.
Could you fit it into 4 lines of 20 characters?I need to monitor 4 inputs,7 outputs and 13 variables. Is the LCD OK for this?
#picaxe 20x2
#no_table
#no_data
b0 = 0
pause 1000
main:
sertxd (b0)
pause 250
inc b0
goto main
MainProgram:
setcommport 9 //<- change this as required
last_y = 65
rectangle 0,0,800,600
xystring 2,1,"This is a demo of receiving Serial Comms from a PICAXE 20X2"
xystring 2,18,"Numeric data receive will show as a bar chart in this window"
xystring 2,35,"Set the Receiver to Baud = 9600, 8 Bits, No parity, 1 Stop Bit, No Flow control"
while true
CheckSerBuffer m
if m > 0
serin m
DT_k = m
gosub DisplayText
endif
wend
End
//=====================================================
DisplayText:
while Length(DT_k) > 0
DT_kk = ascii(DT_k)
rectangle 2, 320, 100, last_y, white, white
rectangle 2, 320, 100, 320-DT_kk, black, black
last_y = 320 - DT_kk
rectangle 35, 325, 100, 340 ,white, white
xystring 35,325, DT_kk
if Length(DT_k) > 1
DT_k = Substring(DT_k,2,Length(DT_k))
else
break
endif
wend
Return