آموزش کار با ماژول های hmtr_ttl , hmtr-rs232

[rfbook]

چت دو طرفه توسط ماژول های HMTR
You can see links before reply

در این پروژه می توانیدتوسط ماژول های HMTR توسط دو صفحه کلید بین دو نقطه چت کنید

زبان برنامه نویسی : basic

حجم فایل = 450 کیلو بایت

You can see links before reply

------------------------------------------------------------------------------------------------------------------

آموزش کار با ماژول HMTR-RS232 و کار با نرم افزار های مانیتورینگYou can see links before reply

به صورت کامل و ساده + پروژه انتقال مقدار دما به کامپیوتر

شما توسط این ماژول می توانید دیتا های دریافتی را به کامپیوتر منتقل کنید

این ماژول قابلیت اتصال مستقیم به پورت سریال را دارد .

زبان برنامه نویسی = basic

حجم فایل = 850 کیلو بایت



You can see links before reply



وبلاگ تخصصی ماژول های RF
You can see links before reply

[Aghaeifar]

قيمت اين ماژول رو هم ميشه در بازار ايران بگيد ؟

[1nafar]

You can see links before reply

[rfbook]

روش کد گذاری همراه اطلاعات :

در روش های قبلی برای کد گذاری روی دیتا ها ابتدا یک کد ارسال میشد و در صورتی که کد دریافتی صحیح بود اطلاعات اصلی دریافت شده و عملیات مورد نظر طبق نیاز انجام میشد .

در این روش کد ارسالی همراه اطلاعات ارسال میشود و در واقع اطلاعات و کد در قالب یک رشته به صورت یک جا ارسال میشوند.


s="a"----------------------------------------------------

data="salam"سپس این دو به یک رشته تبدیل میشوند


_data=s+data
و این دیتا ارسال خواهد شد .

در گیرنده ابتدا اطلاعات را دریافت کرده و کاراکتر اول را از کل رشته جدا می کنیم

به طور مثال :


Input Data_rec
N = Len(data_rec)
V = Mid(data_rec , 1 , 1)
N = N - 1
_data = Right(data_rec , N)

If V = "a" Then
Home : Lcd _data
End If

و سپس با یک شرط که اگر کاراکتر دریافتی اول که از رشته اصلی جدا شده a بود اطلاعات اصلی نمایش داده شوند .

البته باید کاراکتر اول را از اطلاعات اصلی حذف کنیم .

[hossein-ab]

سلام اگر ماژول HMTR ارسال را انجام بده بايد led سبز بايد بر اساس تاخيري كه ايجاد كرديم روشن خاموش بشه آيا درسته؟
اين برنامه فرستنده هست آيا درسته؟
$regfile = "m16def.dat"
$crystal = 8000000
$baud = 9600
Config Portb.1 = Output
Dim S As String * 6
Enable_majol Alias Portb.1
Set Enable_majol
Do
Print "SOBHAN"
Waitms 75
Loop
End
در من ميخوام به اي 8mhz يك كريستال خارجي 11.0592 بذارم آيا درسته كه جلوي كريستال تو برنامه بنويسم 11059200 ؟
ممنون ميشم

[rfbook]

سلام .

مشکل شما با ماژول های hmt , hmr حل شد یا دارین به جای اون ماژول ها از hmtr استفاده می کنین ؟

ماژول های hmtr در حالت ارسال led قرمز و در حال دریافت دیتا led سبز چشمک میزنه .

(البته در شرایط خاص هر 2 چشمک میزنن حتی در حالت دریافت یا ارسال )

بله برنامه درسته و موردی نداره

[hossein-ab]

ممنون از راهنماييتون
دارم به جاي اون ماژول ها از hmtr استفاده مي كنم
منظورتون از شرايط خاص چه شرايطي هست؟
ممنون ميشم

[rfbook]

سلام

1- ماژول شما از نوع ttl هست یا rs232 ؟

2-با برنامه ای که شما الان نوشتین اطلاعات بدرستی دریافت می شوند یا نه ؟

3- پایه های hmtr را میشه بگین چطوری بستین ؟(همه پایه ها )

[hossein-ab]

سلام ماژول من ttlهست
با برنامه اي كه نوشتم اطلاعات دريافت ميشه
vcc رو به 5 ولت
drx فرستنده رو به tx ميكرو فرستنده
config رو به زمين وenable رو به 5 ولت وgnd رو به زمين
در گيرنده هم مثل فرستنده فقطdtx رو به rx ميكرو گيرنده وصل كردم
و جواب گرفتم

[hossein-ab]

من با برنامه اي كه نوشتم موتور dc رو از راه دور كنترل ميكنم(چپ گرد وراست گرد) من ميدونم كه براي كنترل سرعت موتور بايد ازpwm استفاده كنم
ولي نميدونم بايد برنامشو چه جوري بنويسم؟
لطفا كمكم كنيد
ممنون

[rfbook]

سلام

شما اطلاعات را از فرستنده با چه دستوری ارسال می کنی و در گیرنده با چه دستوری دریافت می کنی ؟

برای ارسال مقادیر از فرستنده از دستور printbin استفاده کنید و یک متغیر از نوع byte یا word را ارسال کنید
فرض کنید میخواهید با یک ولوم که در فرستنده هست دور موتور را توی گیرنده کنترل کنید .

خوب سر اول پتانسومتر را به vcc و سر وسط را مثلا به ADC(0 وصل می کنیم و سر پایین را به زمین .


dim a as word
dim _data as byte
config adc=single , prescaler=auto,reference=avcc
start adc
do

a=getadc(0) ' analog to digital
_data=a/4 ' maghadir az 0 ta 255
printbin _data

waitms 20

loop

و در گیرنده اطلاعات را با دستور waitkey دریافت می کنی .

dim rec_data as byte

do

rec_data =waitkey() ' daryaft etelaat az rx
pwm1a=rec_data

loop

به همین سادگی میشه این کار را انجام داد .
برای pwm هم از تایمر 1 استفاده شده .

[hossein-ab]

اين برنامه فرستنده:
$regfile = "m16def.dat"
Config Portd.3 = Input
Config Portd.4 = Input
Config Portd.5 = Input
Ddrd.3 = 0 : Portd.3 = 1
Ddrd.4 = 0 : Portd.4 = 1
Ddrd.5 = 0 : Portd.5 = 1
Dim B As Byte
Do
Debounce Pind.3 , 0 , Right
Debounce Pind.4 , 0 , Left
Debounce Pind.5 , 0 , Stop
Loop
Right:
For B = 1 To 10
Print "Right"
Waitms 50
Next
Return
Left:
For B = 1 To 10
Print "Left"
Waitms 50
Next
Return
Stop:
For B = 1 To 10
Print "Stop"
Waitms 50
Next
Return
End
گيرنده:
$regfile = "m16def.dat"
Config Portd.4 = Output
Config Portd.5 = Output
Dim B As Byte
Do
B = Waitkey()
If B = "Right" Then
Reset Portd.4
Set Portd.5
End If
If B = "Left" Then
Reset Portd.5
Set Portd.4
End If
If B = "Stop" Then
Reset Portd.4
Reset Portd.5
End If
Loop
End
اين برنامه كه گفتيد كجاي برنامم قرار بدم؟؟
در ضمن مقدار پتانسيومتر چقدر هست؟؟؟
ممنون ميشم

[hossein-ab]

كسي نميتونه بهم كمك كنه؟

[rfbook]

سلام

دوست عزیز من این روژه را قبلا انجام دادم دنبال فایل های اون میگردم پیدا کردم براتون میزارم اینجا.

[hossein-ab]

من بايد اين پروژه رو به زودي تحويل دهم
ممنون ميشم

[hossein-ab]

سلام من ميخام وقتي موتور اطلاعات را دريافت كرد گيرنده يك كاراكتر را به عنوان اينكه اطلاعات را دريافت كرده به
فرستنده ارسال كند چه تغييراتي در برنامم انجام دهد؟؟؟
فرستنده:
$regfile = "m16def.dat"
Config Porta.3 = Input
Config Porta.4 = Input
Config Porta.5 = Input
Config Porta.6 = Input
Config Porta.7 = Input
Config Portb.2 = Output
Ddra.3 = 0 : Porta.3 = 1
Ddra.4 = 0 : Porta.4 = 1
Ddra.5 = 0 : Porta.5 = 1
Ddra.6 = 0 : Porta.6 = 1
Ddra.7 = 0 : Porta.7 = 1
Dim B As Byte
Do
Debounce Pina.3 , 0 , Low
Debounce Pina.4 , 0 , High
Debounce Pina.5 , 0 , Right
Debounce Pina.6 , 0 , Left
Debounce Pina.7 , 0 , Stop
Loop
Low:
For B = 1 To 10
Print "k"
Waitms 50
Next
Return
High:
For B = 1 To 10
Print "t"
Waitms 50
Next
Return
Right:
For B = 1 To 10
Print "R"
Waitms 50
Next
Return
Left:
For B = 1 To 10
Print "L"
Waitms 50
Next
Return
Stop:
For B = 1 To 10
Print "S"
Waitms 50
Next
Return
End
گيرنده:
$regfile = "m16def.dat"
Config Portd.2 = Output
Config Portd.3 = Output
Config Portd.5 = Output
Dim B As Byte
Dim A As Word
Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Prescale = 1024
A = 100
Do
B = Waitkey()
If B = "k" Then
A = A - 10
If A <= 10 Then A = 10
Pwm1a = A
End If
If B = "t" Then
A = A + 10
If A >= 250 Then A = 250
Pwm1a = A
End If
If B = "R" Then
Reset Portd.2
Set Portd.3
End If
If B = "L" Then
Reset Portd.3
Set Portd.2
End If
If B = "S" Then
Reset Portd.3
Reset Portd.2
End If
Loop
End
ممنون ميشم

[hasan206]

سلام دوستان
اگر هنگام راه اندازی ماژول rfm12bp آنتن وصل نباشد مشکلی برای ماژول به وجود می آید؟

[منبتی]

سلام
آخرین بار ماژولم سوخت

[haji110]

لینک ها پاک شده دباره آپ میکنید
ممنون

[alielec1]

برای برد بالا آنتن باید چه جوری باشه

[yaser k]

سلام من یه سوال دارم . چطور میشه با صفه کلید 4*4 اعداد را از طریق ماژول به میکرو ارسال کرد و روی lcd نمایش داد
اگه نقشه یا برنامه ای دارید در سایت قرار بدید
با تشکر فراوان

[t.o.e]

سلام من یه سوال دارم . چطور میشه با صفه کلید 4*4 اعداد را از طریق ماژول به میکرو ارسال کرد و روی lcd نمایش داد
اگه نقشه یا برنامه ای دارید در سایت قرار بدید
با تشکر فراوان

سلام:
کاربر محترم:
این مبحث قبلا تو سایت بحث شده.لطف کنید مطالعخ بکنید و در صورت مشکل، مشکل رو بفرمایید تا دوستان و حقیر راهنمایی کنیم.

موفق و موید باشید.

[microprocesor_2002]

سلام دوست عزیز ... کار ماژول های hmt و hmr خیلی راحته ... ولی یه نکته رو باید رعایت کنی .... اینکه ماژول hmr وقتی که دیتا براش ارسال نشه میره تو حالت کم مصرف .... وقتی که ما میخوایم مثلا با میکرو دیتایی ارسال کنیو یه مقدار از اطلاعاتمون تا اینکه ماژول از حالت کم مصرف بیرون بیاد ، از بین میره البته گفتم که این مشکل معمولا وقتی پیش میاد که می خوایم با میکرو باهاش کار کنیم.... من این مشکل رو با یه سری بایت های اضافی قبل از اینکه مثلا بایت اصلی رو بفرستیم .... اگه مشکلی بود بگید حل بشه ... دروووووووووووووووووود

[vahidasm]

چت دو طرفه توسط ماژول های hmtr
You can see links before reply

در این پروژه می توانیدتوسط ماژول های hmtr توسط دو صفحه کلید بین دو نقطه چت کنید

زبان برنامه نویسی : Basic

حجم فایل = 450 کیلو بایت

You can see links before reply

------------------------------------------------------------------------------------------------------------------

آموزش کار با ماژول hmtr-rs232 و کار با نرم افزار های مانیتورینگYou can see links before reply

به صورت کامل و ساده + پروژه انتقال مقدار دما به کامپیوتر

شما توسط این ماژول می توانید دیتا های دریافتی را به کامپیوتر منتقل کنید

این ماژول قابلیت اتصال مستقیم به پورت سریال را دارد .

زبان برنامه نویسی = basic

حجم فایل = 850 کیلو بایت



You can see links before reply



وبلاگ تخصصی ماژول های rf
وبلاگ تخصصی ماژول های RF (You can see links before reply)
سلام ميشه اين لينك رو چك كنيد؟؟
فك كنم مشكل داره

[safavism]

با سلام...
لینک مشکل داره دانلود نمیشه

[miladevil]

با سلام من یه جفت hmtr915 دارم وقتی دیتا می فرستم بدون hmtr درست کار میکنه ولی با hmtr نه در ضمن هر دو ماژول رو مثل هم config کردم لطفا کمک کنید؟؟؟؟

[vahidasm]

سلام
کسی نبود این لینکها رو درست کنه؟؟

[cmuiran]

سلام
کسی نبود این لینکها رو درست کنه؟؟
سلام
شاید پایه های rx/txجابجا وصل کردین

[cmuiran]

این فایل یک نگاه بنداز ببین اینجوری وصل کردی

[live_1389]

سلام به همه دوستان.
من با یه جفت hm-tr ttl می خوام یه کد رو ارسال کنم اما نمی شه,لطف کنید کمک کنید:


$regfile = "m8def.dat"
$crystal = 1000000
$baud = 9600
Dim test1 As byte
test1 = 123
Main:
Do
Printbin test1
Waitms 20
Loop
Goto Main

گیرنده:


$regfile = "m8def.dat"
$crystal = 1000000
$baud = 9600
Dim test1 As byte
Config Portb = Output
Main:
Do
test1 = Waitkey()
If test1 = 123 Then Goto Car1
Loop
Car1:
Set Portb.0
Waitms 500
Reset Portb.0
Waitms 500
Goto Main

فرستنده 123 رو ارسال کنه و طرف گیرنده که مشغول دریافت کد هست اگه 123 رو گرفت برای لحظه ای یکی از پینا رو روشن می کنه.پایه ها درست وصل شدن,قطعاتم جدید هستن و...
برنامه از این ساده ترم می شه,نمی دونم چرا جواب نمیده!!

[cmuiran]

مهندس
با waitkey ننویس
با input دریافت داشته یاش
اینجوری

dim a as string*10
do
input a

if a="123" then
....


loop

[live_1389]

متشکر,با این دستور هم امتحان کردم نشد.من از یک آدپتور بصورت مشترک استفاده می کنم و فاصله دو تاهم 1 متره این مشکل ساز نیست؟

[cmuiran]

سلام مهندس
اقا یک کار دیگه کن rx و tx که hmt,r ها رفته بهم وصل کن ببین دیتای ردو بدل میشه یا نه

[momo8182]

سلام ماژول من ttlهست
با برنامه اي كه نوشتم اطلاعات دريافت ميشه
vcc رو به 5 ولت
drx فرستنده رو به tx ميكرو فرستنده
config رو به زمين وenable رو به 5 ولت وgnd رو به زمين
در گيرنده هم مثل فرستنده فقطdtx رو به rx ميكرو گيرنده وصل كردم
و جواب گرفتم
سلام دوست عزیز من دقیقا می خوام اینکارو کنم ماژولی که استفاده کردی چی بود؟؟و آیا میشه از ماژول ask که ارزونتره استفاده کرد و بشه یه برد حدود 250 متری رو داشت.چون ask خیلی ارزونتره

[n340]

با درود
دوستان چطور میشه با مبدل usb ماژول رو کانفیگ کرد،داخل نرم افزار انتخاب پورت رو نداره
و ماژول های کانفیگ نشده با هم ارتباط دارند یا نه؟

[parsadsa]

دوستان پروزه ای به زبان سی ندارید لطف کنین ؟؟؟؟

[safavism]

با سلام
این ماژولها همینطور که میدونید میشه با نرم افزار باند فرکانسیشون تغییر داد ..میشه مثلا بجای فرکانس 433 فرکانس437 یا مثلا 440 کانفیگ کرد؟(همین گیرنده هم فرستنده)

[asalmoezi]

سلام
من باید برنامه ماژول

Compass 10 (CMPS10)
دیتاشیت قطعه:
You can see links before reply (You can see links before reply)

رو به زبان بسکام و با پورت سریال بنویسم برای استفاده و نمایش هدینگ یا جهت هواپیما در هواپیمای تک سرنشینی که در یک پروژه دانشجویی قصد ساخت بخشهای آلات دقیق و اویونیکش رو برعهده داریم.هرچی گشتم نمونه یا مثالی برای این ماژول به صورت سریال پیدا نکردم و فقط تونستم
I2C
رو پیدا کنم که لینک برنامه ش اینجاست:
You can see links before reply (You can see links before reply)
و

You can see links before reply (You can see links before reply)
البته توی دیتاشیتش توضیحاتی داده، اما من متاسفانه چون وارد نیستم، سر در نیاوردم.
ممنون میشم کمکم کنین که برنامه رو به صورت سریال بنویسم(چون کدهایی که توی این برنامه که لینکش رو گذاشتم هست مختص
I2C
هستش) یا اینکه در صورت امکان راهنمایی کنید که همین رو به صورت سریال برگردونم،چون قطعا تشابهاتی دارن.
بسیار متشکرم

[Ali0027]

سلام دوست عزیز ... کار ماژول های hmt و hmr خیلی راحته ... ولی یه نکته رو باید رعایت کنی .... اینکه ماژول hmr وقتی که دیتا براش ارسال نشه میره تو حالت کم مصرف .... وقتی که ما میخوایم مثلا با میکرو دیتایی ارسال کنیو یه مقدار از اطلاعاتمون تا اینکه ماژول از حالت کم مصرف بیرون بیاد ، از بین میره البته گفتم که این مشکل معمولا وقتی پیش میاد که می خوایم با میکرو باهاش کار کنیم.... من این مشکل رو با یه سری بایت های اضافی قبل از اینکه مثلا بایت اصلی رو بفرستیم .... اگه مشکلی بود بگید حل بشه ... دروووووووووووووووووود
سلام خسته نباشید. پروژه ساخت سه نود وایرلس دو طرفه با استفاده از ماژول hmtr برداشتم.نیاز به برنامه و شماتیکش دارم. میتونید کمکم کنید؟. در ضمن برنامه هایی که دارم بسکام و پروتئوس هست.