سلام.
من این برنامه رو نوشتم.
کریستال ایکسمگا رو 12مگاهرتز گذاشتم. بود ریت و اینها رو هم درست تنظیم کردم. اما اطلاعات ارسالی توی پورت اشتباه است. چرا؟
من این برنامه رو نوشتم.
$regfile = "xm128a1def.dat"
$crystal = 32000000
$lib "xmega.lib"
$external _xmegafix_clear
$external _xmegafix_rol_r1014
Config Osc = Enabled , 32mhzosc = Enabled
Config Sysclock = 32mhz , Prescalea = 1 , Prescalebc = 1_1
Dim W As Word
Config Com5 = 19200 , Mode = Asynchroneous , Parity = None , Stopbits = 1 , Databits = 8
Open "COM5:" For Binary As #5
Do
Print #5 , "Shazdeh"
Waitms 500
Loop
$crystal = 32000000
$lib "xmega.lib"
$external _xmegafix_clear
$external _xmegafix_rol_r1014
Config Osc = Enabled , 32mhzosc = Enabled
Config Sysclock = 32mhz , Prescalea = 1 , Prescalebc = 1_1
Dim W As Word
Config Com5 = 19200 , Mode = Asynchroneous , Parity = None , Stopbits = 1 , Databits = 8
Open "COM5:" For Binary As #5
Do
Print #5 , "Shazdeh"
Waitms 500
Loop
کریستال ایکسمگا رو 12مگاهرتز گذاشتم. بود ریت و اینها رو هم درست تنظیم کردم. اما اطلاعات ارسالی توی پورت اشتباه است. چرا؟
دیدگاه