B
Bannana15
Guest
Tôi đang làm việc trên một dự án cho các trường học, nơi chúng tôi đang sử dụng một pic16f877 với pro PicBasic hoặc PicBasic.Tôi có một thuê bao với CompileSpot.com, nhưng tôi nhận được rất nhiều lỗi với mã của tôi, tôi nghĩ rằng đó là vì modedefs.bas không có trong thư viện của tôi nhưng tôi không thể tìm thấy nó có vẻ bất cứ nơi đâu.Đây là mã của tôi và các sai sót bất kỳ trợ giúp sẽ được đánh giá cao.Đầu vào của chúng tôi dự án 5 tín hiệu analog và bật đèn LED, cuối cùng nó sẽ ra vào máy tính qua cổng nối tiếp.
Cảm ơn
'ADC
'Defnitions cho ADC
bao gồm "modedefs.bas"
'Xác định đồng hồ là 3,6 MHz
DEFINE OSC 3
'10-Bit A / D chuyển đổi
'Số SET của bit trong kết quả
DEFINE ADC_BITS 10
'Đặt đồng hồ nguồn (3 = rc)
DEFINE ADC_CLOCK 3
'Đặt thời gian lấy mẫu trong micro
DEFINE ADC_SAMPLEUS 21
'Đặt tất cả các bit trên PORTA cao, để làm cho cổng đầu vào
TRISA =% 11111111
'Set ADCON1 Reg làm cho tất cả 5 đầu vào analog
ADCON1 =% 10.000.000
'Set ADCON0 Reg, chọn pin và thiết lập contols
ADCON0 =% 00.000.001
'Set PORTB như là kết quả đầu ra
TRISB =% 00000000
'LED thử nghiệm
adcVar VAR WORD
x var byte
x = 0
Pause 500 'Đợi 0,5 giây
chính:
'blinky
trong khi x <3
portb.0 = 1
tạm dừng 120
portb.0 = 0
tạm dừng 120
x = x 1
xoay về
ADCIN 0, kênh Đọc adcVar '0
'Nếu ADC giá trị cao hơn 500 bật đèn LED khác tắt nó
nếu adcVar> 500 sau đó
portb.0 = 1
khác
portb.0 = 0
endif
Tạm dừng 10 'Wait.01 thứ hai
GoTo chính 'Do nó mãi mãi'Nối tiếp bằng cách sử dụng serout2
'đặt PORTB như là kết quả đầu ra
TRISB =% 00000000
Pause 500 'Đợi 0,5 giây
cr con 13
lf con 10
x var byte
X = 0
counterVar var byte
counterVar = 0
chính:
'blinky
trong khi x <3
portb.0 = 1
tạm dừng 120
portb.0 = 0
tạm dừng 120
x = x 1
xoay về
counterVar = counterVar 1
'Gửi các số truy cập đại diện thập phân ở độ truyền 9.600 đảo
serout2 portc.6, 16.468, [ "truy cập tháng mười hai của tôi:", DEC counterVar, cr, lf]
serout2 portc.6, 16.468, [ "truy cập của tôi hex:", hex counterVar, cr, lf]
serout2 portc.6, 16.468, [ "truy cập của tôi bin:", bin counterVar, cr, lf]Pause 1000 'Wait.01 thứ hai
GoTo chính 'Do nó mãi mãiPicBasic Compiler 1,45, Bản quyền (C) 1995-2003 microEngineering Labs, Inc
Tất cả các quyền.
Lỗi DEREK2.BAS, 3: ':' hoặc '=' dự kiến (Token 'modedefs.bas')
Lỗi DEREK2.BAS, 5: ':' hoặc '=' dự kiến (Token 'OSC')
Lỗi DEREK2.BAS, 9: ':' hoặc '=' dự kiến (Token 'ADC_BITS')
Lỗi DEREK2.BAS, 11: ':' hoặc '=' dự kiến (Token 'ADC_CLOCK')
Lỗi DEREK2.BAS, 13: ':' hoặc '=' dự kiến (Token 'ADC_SAMPLEUS')
Lỗi DEREK2.BAS, 16: Undefined Variable 'TRISA'
Lỗi DEREK2.BAS, 19: Undefined Variable 'ADCON1'
Lỗi DEREK2.BAS, 22: Undefined Variable 'ADCON0'
Lỗi DEREK2.BAS, 25: Undefined Variable 'TRISB'
Lỗi DEREK2.BAS, 28: ':' hoặc '=' dự kiến (Token 'VAR')
Lỗi DEREK2.BAS, 29: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 30: Undefined Variable 'x'
Lỗi DEREK2.BAS, 35: ':' hoặc '=' dự kiến (Token 'x')
Lỗi DEREK2.BAS, 36: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 36: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 38: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 38: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 41: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 43: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 45: Biến dự kiến (Token 'adcVar')
Lỗi DEREK2.BAS, 46: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 46: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 47: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 48: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 48: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 49: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 60: ':' hay 'con =' mong đợi (Token '')
Lỗi DEREK2.BAS, 61: ':' hay 'con =' mong đợi (Token '')
Lỗi DEREK2.BAS, 62: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 64: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 65: Undefined Variable 'counterVar'
Lỗi DEREK2.BAS, 67: Thử định nghĩa lại Nhãn 'chính'
Lỗi DEREK2.BAS, 70: ':' hoặc '=' dự kiến (Token 'x')
Lỗi DEREK2.BAS, 71: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 71: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 73: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 73: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 76: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 79: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 79: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 79: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 79: Ký tự bất hợp pháp ']'
Lỗi DEREK2.BAS, 80: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 80: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 80: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 80: Ký tự bất hợp pháp ']'
Lỗi DEREK2.BAS, 81: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 81: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 81: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 81: Ký tự bất hợp pháp ']'
50 lỗi, Không có Warnings
Cảm ơn
'ADC
'Defnitions cho ADC
bao gồm "modedefs.bas"
'Xác định đồng hồ là 3,6 MHz
DEFINE OSC 3
'10-Bit A / D chuyển đổi
'Số SET của bit trong kết quả
DEFINE ADC_BITS 10
'Đặt đồng hồ nguồn (3 = rc)
DEFINE ADC_CLOCK 3
'Đặt thời gian lấy mẫu trong micro
DEFINE ADC_SAMPLEUS 21
'Đặt tất cả các bit trên PORTA cao, để làm cho cổng đầu vào
TRISA =% 11111111
'Set ADCON1 Reg làm cho tất cả 5 đầu vào analog
ADCON1 =% 10.000.000
'Set ADCON0 Reg, chọn pin và thiết lập contols
ADCON0 =% 00.000.001
'Set PORTB như là kết quả đầu ra
TRISB =% 00000000
'LED thử nghiệm
adcVar VAR WORD
x var byte
x = 0
Pause 500 'Đợi 0,5 giây
chính:
'blinky
trong khi x <3
portb.0 = 1
tạm dừng 120
portb.0 = 0
tạm dừng 120
x = x 1
xoay về
ADCIN 0, kênh Đọc adcVar '0
'Nếu ADC giá trị cao hơn 500 bật đèn LED khác tắt nó
nếu adcVar> 500 sau đó
portb.0 = 1
khác
portb.0 = 0
endif
Tạm dừng 10 'Wait.01 thứ hai
GoTo chính 'Do nó mãi mãi'Nối tiếp bằng cách sử dụng serout2
'đặt PORTB như là kết quả đầu ra
TRISB =% 00000000
Pause 500 'Đợi 0,5 giây
cr con 13
lf con 10
x var byte
X = 0
counterVar var byte
counterVar = 0
chính:
'blinky
trong khi x <3
portb.0 = 1
tạm dừng 120
portb.0 = 0
tạm dừng 120
x = x 1
xoay về
counterVar = counterVar 1
'Gửi các số truy cập đại diện thập phân ở độ truyền 9.600 đảo
serout2 portc.6, 16.468, [ "truy cập tháng mười hai của tôi:", DEC counterVar, cr, lf]
serout2 portc.6, 16.468, [ "truy cập của tôi hex:", hex counterVar, cr, lf]
serout2 portc.6, 16.468, [ "truy cập của tôi bin:", bin counterVar, cr, lf]Pause 1000 'Wait.01 thứ hai
GoTo chính 'Do nó mãi mãiPicBasic Compiler 1,45, Bản quyền (C) 1995-2003 microEngineering Labs, Inc
Tất cả các quyền.
Lỗi DEREK2.BAS, 3: ':' hoặc '=' dự kiến (Token 'modedefs.bas')
Lỗi DEREK2.BAS, 5: ':' hoặc '=' dự kiến (Token 'OSC')
Lỗi DEREK2.BAS, 9: ':' hoặc '=' dự kiến (Token 'ADC_BITS')
Lỗi DEREK2.BAS, 11: ':' hoặc '=' dự kiến (Token 'ADC_CLOCK')
Lỗi DEREK2.BAS, 13: ':' hoặc '=' dự kiến (Token 'ADC_SAMPLEUS')
Lỗi DEREK2.BAS, 16: Undefined Variable 'TRISA'
Lỗi DEREK2.BAS, 19: Undefined Variable 'ADCON1'
Lỗi DEREK2.BAS, 22: Undefined Variable 'ADCON0'
Lỗi DEREK2.BAS, 25: Undefined Variable 'TRISB'
Lỗi DEREK2.BAS, 28: ':' hoặc '=' dự kiến (Token 'VAR')
Lỗi DEREK2.BAS, 29: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 30: Undefined Variable 'x'
Lỗi DEREK2.BAS, 35: ':' hoặc '=' dự kiến (Token 'x')
Lỗi DEREK2.BAS, 36: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 36: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 38: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 38: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 41: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 43: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 45: Biến dự kiến (Token 'adcVar')
Lỗi DEREK2.BAS, 46: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 46: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 47: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 48: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 48: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 49: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 60: ':' hay 'con =' mong đợi (Token '')
Lỗi DEREK2.BAS, 61: ':' hay 'con =' mong đợi (Token '')
Lỗi DEREK2.BAS, 62: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 64: ':' hoặc 'var =' mong đợi (Token '')
Lỗi DEREK2.BAS, 65: Undefined Variable 'counterVar'
Lỗi DEREK2.BAS, 67: Thử định nghĩa lại Nhãn 'chính'
Lỗi DEREK2.BAS, 70: ':' hoặc '=' dự kiến (Token 'x')
Lỗi DEREK2.BAS, 71: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 71: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 73: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 73: ':' hoặc '=' dự kiến (Token '0 ')
Lỗi DEREK2.BAS, 76: ':' hoặc '=' dự kiến
Lỗi DEREK2.BAS, 79: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 79: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 79: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 79: Ký tự bất hợp pháp ']'
Lỗi DEREK2.BAS, 80: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 80: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 80: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 80: Ký tự bất hợp pháp ']'
Lỗi DEREK2.BAS, 81: ':' hoặc '=' dự kiến (Token 'portc')
Lỗi DEREK2.BAS, 81: Illegal Ký tự '.'
Lỗi DEREK2.BAS, 81: Ký tự bất hợp pháp '['
Lỗi DEREK2.BAS, 81: Ký tự bất hợp pháp ']'
50 lỗi, Không có Warnings