à mình làm được rồi nhưng đang vướn ở chỗ, mình muốn hiển thị giá trị ADC và Voltage lên VB nhưng làm mãi vẫn ko hiện lên ô text được :((
|
Trích:
|
Mình đã thực hiện giống hệt cách bạn chỉ nhưng nếu nhấn giao diện trên VB thì led hiện nhưng nếu chỉnh ngược lại từ SW thì led hiện nhưng VB thì không hiện ra được, tại sao dzậy???
|
chi mình hỏi: ở đầu bài thì dùng phần mêm tạo cổng COM ảo rồi nối cổng 4 với cổng 5.
Đến khi thiết lập cổng COM cho VB thì đặt "Comport = 1"? Và trong 2 cổng 4, 5 thì cổng COM nào là của Proteus? |
mấy Pro cho mình hỏi tí: chương trình mình điêu khiển 1 led đơn nối đến chân RD0 mà không biết sai chỗ nào. nó không giao tiếp để điều khiển được.
code viết trên CCS C #INCLUDE <16F887.H> #FUSES NOWDT,PUT,HS,NOPROTECT,NOLVP #USE DELAY(CLOCK=20000000) #USE RS232(BAUD=9600,XMIT=PIN_C6,RCV=PIN_C7) INT NHAN=0; #INT_RDA VOID NGAT_RDA() { NHAN=GETC(); IF(NHAN==1) {OUTPUT_HIGH(PIN_D0);} IF(NHAN==2) { OUTPUT_LOW(PIN_D0); } } VOID MAIN() { SET_TRIS_D(0X00);OUTPUT_LOW(PIN_D0);//PORTD=0x00; SET_TRIS_C(0X80); enable_interrupts(INT_RDA); enable_interrupts(GLOBAL); WHILE(TRUE) { }} code VB6: Private Sub Command1_Click() MSComm1.Output = Chr(1) End Sub Private Sub Command2_Click() MSComm1.Output = Chr(2) End Sub Private Sub Command3_Click() End End Sub Private Sub Form_Load() MSComm1.CommPort = 3 MSComm1.Settings = "9600,n,8,1" MSComm1.RThreshold = 1 MSComm1.PortOpen = True End Sub **************** |
Trích:
|
Múi giờ GMT. Hiện tại là 05:50 PM. |
Tên diễn đàn: vBulletin Version 3.8.11
Được sáng lập bởi Đoàn Hiệp.
Copyright © PIC Vietnam