1 slave 1 master 1 MAX232 1 problem ?

[Melanie]

I'll lead you by the hand on this...

If you type a number 4 on the PC (eg Hyperterminal), it sends a character, but it doesn't send a numeric value of 4 as you expect, it sends something quite different...

Do you have a BASIC Interpreter on your PC (like GWBasic or QBasic or VisualBasic)?

Find out what happens when you do this...

Print asc("4")

and then this...

Print chr$(52)

what appears on your screen?

Look up what the ASC instruction does in BASIC (I'm not taking about PIC BASIC here but a BASIC that you can run on your PC). The ASC instruction will lead you to understaning the relationship between a string "4" and a numeric decimal 52. It will lead you to a TABLE of CODES... this table cross-references numeric values with displayable values... I'm trying hard not to give you the name of this table, that is for you to find out and tell me.

Now I know you say that "Read the Manual" is my answer to everything, but I'm insisting that you go to the MeLabs website, and download the latest manual. The TABLE of CODES are in an Appendix in the BACK OF THE MANUAL. Look for it.

I've also looked at your pictures... I'll guarantee this code table will be found in every one of your PICBasic Books.

[SuB-ZeRo]

Yes i have visual basic 6.0 professional now i understan what u mean.
Communication between pic and PC is a table of ASCII characters.I understand they re communicating not like as i think.For exmp when i am trying to sent 1 from pc to pic it sents 49 decimal number or 31 hex.If i try to compare numbers useing if i have to look 49 for 1 not look 1 then it will fail.

[Melanie]

Exactly! Now you can also understand the example code I posted.

You can always convert numbers from ASCII to numeric decimal...

So... in the example with the test variable, if you take the ASCII number and subtract 48, you will be left with the Decimal Numeric Value (but this is only valid for numbers).

Look at my new example...

	test var byte

loop:
	hserin [test]
	test=test-48
	if test=4 then 
		HSEROUT ["I've struck Gold",13,10]
		else
		HSEROUT ["No Cigar",13,10]
		endif
	goto Loop
	end

[SuB-ZeRo]

yes now i do the same.But i don't understan 1 think.Now i can sent 1 digit numbers how can i sent 2 digit numbers?
for example when i sent 15 it comes to pic 49 53.i try to use this code
HSERİN [STR test\2]
if test = 4953 then goto ok
goto loop
ok:
HSEROUT ["OK MAN U DID IT!",13,10]
goto loop
end

it will not work i know coz test is a byte that can't get numbers more than 255 if i make test a word PBP gives error i use str =string but it accepts charakters like a,b,c not numbers than what must i do ?
test var byte[2] means 2 value but how can i put 2 value to pic?

[Melanie]

test(0) holds the first ASCII digit (tens) = example 49
test(1) holds the second ASCII digit (units) = example 53

Value var byte

value=((test(0)-48)*10)+(test(1)-48)

value using our example ASCII 49 53 will be decimal 15.

If 'value' is likely to be bigger than 255, then it'll have to be a word.

You now have the knowledge... be creative...

I recon the hood in your avatar is stopping you seeing the big picture... lose the hood, buy a crate of beer...

[SuB-ZeRo]

test var byte
test2 var byte
value var byte
loop:
hserin [test,test2]
value=((test-48)*10)+(test2-48)
if value=15 then
goto ok
else
goto fail
endif
goto loop
ok:
hserout ["you did it!",13,10]
goto loop
fail:
hserout ["U re an idiot",13,10]
goto loop
end
now did it and after i see u re code test(0) means 1 number.(0) useing this is a litle bit same like useing index in visual basic right?