久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

<tfoot id="vhrua"></tfoot>

標(biāo)題: BASCOM-AVR_2.0.8.3最新完整版 [打印本頁]

作者: wu111111mi 時(shí)間: 2021-4-30 03:58
標(biāo)題: BASCOM-AVR_2.0.8.3最新完整版
BASCOM-AVR_2.0.8.3最新完整版，BASCOM-AVR 語句簡潔，適合自學(xué)開發(fā)avr芯片，軟件集程序編、仿真、多種寫碼程序、詳細(xì)的幫助文檔、實(shí)例。兼容arduino硬件。
分卷壓縮包需要全部下載放在同一目錄才能解壓

BASCOM-AVR 2.0.8.3.part1.rar

15 MB, 下載次數(shù): 136, 下載積分: 黑幣 -5

BASCOM-AVR 2.0.8.3.part2.rar

15 MB, 下載次數(shù): 124, 下載積分: 黑幣 -5

BASCOM-AVR 2.0.8.3.part3.rar

11.72 MB, 下載次數(shù): 149, 下載積分: 黑幣 -5

作者: Highnose 時(shí)間: 2021-5-3 10:31
嗯，謝謝樓主，常用這個(gè)搞開發(fā),需要3個(gè)壓縮包全部下載了才能解壓

作者: SLWH19570803 時(shí)間: 2021-5-30 10:53
Windows10能用嗎？

作者: taotie 時(shí)間: 2021-5-31 15:53
這個(gè)好像就是為Windows10準(zhǔn)備的

作者: 243412038 時(shí)間: 2021-7-14 15:42
basic代碼比arduino還簡便

作者: 祥子陳 時(shí)間: 2021-8-23 10:15
好久不用avr了，之前入門就用的這個(gè)還是fastAVR來著，fastAVR也不錯(cuò)，不過不更新了。那個(gè)更簡單。

作者: panxiaoyi 時(shí)間: 2021-8-23 13:53
想當(dāng)年我就是從BASCOM-AVR踏入單片機(jī)的門檻的，不過從會看數(shù)據(jù)手冊后，我就轉(zhuǎn)到C語言去了

作者: opcb 時(shí)間: 2021-8-26 22:59
用來做一些簡單的測試架控制，不知道basic會不會容易學(xué)一點(diǎn)

作者: frank_tw 時(shí)間: 2021-9-20 09:05
Thanks!

作者: houjue 時(shí)間: 2022-2-2 20:25
當(dāng)年我就是從BASCOM-AVR踏入單片機(jī)的門檻的

作者: JacksonWang666 時(shí)間: 2022-6-25 18:25
謝謝分享，感恩！

作者: JacksonWang666 時(shí)間: 2022-6-25 18:25
實(shí)測，支持win10，非常感謝！

作者: a294303665 時(shí)間: 2022-7-13 21:00
過時(shí)了，不過謝謝分享

作者: guzhoufangge 時(shí)間: 2022-7-20 11:09
求教，bascom-avr開發(fā) LCD Keypad Shield時(shí)，GetADC（0）得到的一直是1023，按四個(gè)方向鍵和選擇鍵都不反應(yīng)，為什么？用Arduino開發(fā)時(shí)沒有問題，能夠正確讀取鍵值。

作者: taotie 時(shí)間: 2022-7-20 19:55

程序：
$regfile = "m8def.dat"
$hwstack = 32
$swstack = 32
$framesize = 32
$crystal = 8000000

Config Scl = Portc.5                                                          ' 用I2C引腳Scl = Portc.5 ，Sda = Portc.4
Config Sda = Portc.4
Config Twi = 400000                                                          ' i2c 的速度

I2cinit
$lib "i2c_twi.lbx"                                                                      ' 不使用模擬I2c的軟件，而是使用twi
$lib "glcdSSD1306-I2C.lib"                                                       ' 用glcdSSD1306-I2C庫替換默認(rèn)庫要添加在bascom avr庫中

#if _build < 20784
Dim ___lcdrow As Byte , ___lcdcol As Byte                               ' 老版本變量格式進(jìn)行編譯
#endif

Config Graphlcd = Custom , Cols = 128 , Rows = 64 , Lcdname = "SSD1306" '配置圖形顯示器

Showpic 0 , 0 , Plaatje                                                          '在oled顯示器0,0位置展示128x64圖片
Wait 3
Cls
Config Adc = Single , Prescaler = Auto                   '             定義ADC為單次運(yùn)行模式,轉(zhuǎn)換時(shí)鐘-自動

Start Adc                                                                            'ATmega88可以不要Start Adc語句,ATmega8就一定要這個(gè)語句啟動adc
Dim W As long, Channel As Byte, D as string*5, C As Byte
Channel = 0                                                                         '現(xiàn)在從通道0讀取A/D值

Do
W = Getadc(Channel)

D=str(w)                                           '轉(zhuǎn)換成字符串

waitms 2

Setfont Font12x16
Lcdat 5, 36 , d;" "
waitms 2

Loop

$include "../font12x16.font"                                                    '包含的字體文件
$include "../font8x8.font"                                                       '包含的字體文件
Plaatje:
  $bgf "../picture.bgf"                                                             ' 圖片文件

作者: guzhoufangge 時(shí)間: 2022-7-21 10:06
謝謝！我用bascom-avr仿真器，也沒有問題，但實(shí)際操作就是不行

1658369019988.png (22.62 KB, 下載次數(shù): 254)

作者: guzhoufangge 時(shí)間: 2022-7-21 10:19

taotie 發(fā)表于 2022-7-20 19:55
程序：
$regfile = "m8def.dat"
$hwstack = 32

仿真沒有問題，就是實(shí)際測量，總是1023

作者: taotie 時(shí)間: 2022-7-21 12:12
沒有鍵按下時(shí)是1023，有鍵按下跳出循環(huán)掃描按鍵。
看：
$regfile = "m8def.dat"
$hwstack = 32
$swstack = 32
$framesize = 32
$crystal = 8000000

Config Scl = Portc.5                                                          ' 用I2C引腳Scl = Portc.5 ，Sda = Portc.4
Config Sda = Portc.4
Config Twi = 400000                                                          ' i2c 的速度

I2cinit
$lib "i2c_twi.lbx"                                                                      ' 不使用模擬I2c的軟件，而是使用twi
$lib "glcdSSD1306-I2C.lib"                                                       ' 用glcdSSD1306-I2C庫替換默認(rèn)庫要添加在bascom avr庫中

#if _build < 20784
Dim ___lcdrow As Byte , ___lcdcol As Byte                               ' 老版本變量格式進(jìn)行編譯
#endif

Config Graphlcd = Custom , Cols = 128 , Rows = 64 , Lcdname = "SSD1306" '配置圖形顯示器

                                                      '在oled顯示器0,0位置展示128x64圖片

Cls
Config Adc = Single , Prescaler = Auto                   '             定義ADC為單次運(yùn)行模式,轉(zhuǎn)換時(shí)鐘-自動,使用內(nèi)部參考電壓 Reference = Internal

Start Adc                                                                            'ATmega88可以不要Start Adc語句,ATmega8就一定要這個(gè)語句
Dim W As long, Channel As Byte, D as string*5, C As Byte  'WORD
Channel = 0                                                                         '現(xiàn)在從通道0讀取A/D值
waitms 10
Setfont Font12x16
do
Do
W = Getadc(Channel)
if w<1000 then exit do
loop
'D=str(w)
                                                      '采樣值輸出格式
waitms 2
if w<=50  then Lcdat 2, 36 ,  chr(131);chr(134);" "
if w<=250 and w>=100 then Lcdat 2, 36 , chr(128);chr(134);" "
if w<=450 and w>=200 then Lcdat 2, 36 , chr(129);chr(134);" "
if w<=650 and w>=400 then Lcdat 2, 36 , chr(130);chr(134);" "
if w<=850 and w>=600 then Lcdat 2, 36 , chr(132);chr(133);chr(134);" "
Lcdat 5, 36 , w;" "
waitms 2

Loop

$include "../font12x16.font"
效果如下：

作者: guzhoufangge 時(shí)間: 2022-7-21 20:48

taotie 發(fā)表于 2022-7-21 12:12
沒有鍵按下時(shí)是1023，有鍵按下跳出循環(huán)掃描按鍵。
看：
$regfile = "m8def.dat"

我寫的程序和你的類似，循環(huán)檢測哪個(gè)按鍵被按下，仿真也沒有問題。實(shí)物連接就不行，按那個(gè)鍵都不好使，只顯示出1023

作者: mick32 時(shí)間: 2022-7-23 18:47
BasCom-AVR 2.0.8.5

BasCom-AVR 2.0.8.5.part2.rar

15 MB, 下載次數(shù): 35, 下載積分: 黑幣 -5

BasCom-AVR 2.0.8.5.part3.rar

12.47 MB, 下載次數(shù): 35, 下載積分: 黑幣 -5

BasCom-AVR 2.0.8.5.part1.rar

15 MB, 下載次數(shù): 40, 下載積分: 黑幣 -5

作者: guzhoufangge 時(shí)間: 2022-7-25 11:48

mick32 發(fā)表于 2022-7-23 18:47
BasCom-AVR 2.0.8.5

下載了，有哪些更新呢？

作者: mick32 時(shí)間: 2022-8-2 14:18
online help features of Bascom 2085

Version 2.0.8.5 document build 97

作者: nlming 時(shí)間: 2022-8-22 17:20

mick32 發(fā)表于 2022-7-23 18:47
BasCom-AVR 2.0.8.5

好多人下，請等待。。。。。。。謝謝樓主

作者: Highnose 時(shí)間: 2022-8-24 19:10

mick32 發(fā)表于 2022-7-23 18:47
BasCom-AVR 2.0.8.5

謝謝老兄
已經(jīng)下載

作者: siemenswj 時(shí)間: 2022-9-3 22:34
早就聽說過。一直沒有用過

作者: yyj679 時(shí)間: 2022-9-6 11:08
好人一生平安

作者: 祥子陳 時(shí)間: 2022-10-4 01:10

祥子陳發(fā)表于 2021-8-23 10:15
好久不用avr了，之前入門就用的這個(gè)還是fastAVR來著，fastAVR也不錯(cuò)，不過不更新了。那個(gè)更簡單。

我也是這個(gè)入門的，特別簡單，不用關(guān)心寄存器。新手特別友好，不更新確實(shí)是可惜了。

作者: guzhoufangge 時(shí)間: 2022-10-10 18:01
求教大蝦：bascomavr 如何驅(qū)動iic接口的LCD602？有例程嗎？

作者: taotie 時(shí)間: 2022-10-10 18:29

i2c_1602程序：rem Main.bas file generated by New Project wizard
rem
rem Created: 周一 7月 4 2022
rem Processor: ATmega328P
rem Compiler:  BASCOM-AVR

rem Write your code here
$programmer = 22                                           'ARDUINO（使用 stk500v1 協(xié)議)
'
'  *************************************
'  *  PCF8574 I2C LCD Adapter test    *
'  * For multiple LCDs 2021/ 3/24 *
'  *************************************
'
$regfile = "m328pdef.dat"                                  '設(shè)置要使用的 AVR。
$crystal = 16000000                                        '設(shè)置 AVR 時(shí)鐘。
'
$hwstack = 64                                              '設(shè)置硬件堆棧的容量。
$swstack = 10                                              '設(shè)置軟件堆棧的容量。
$framesize = 24                                           '設(shè)置框架區(qū)域的容量。
'
'  * PCF8574 I2C LCD 適配器設(shè)置 *
'
Const I2c_select = 1                                  '0：軟件 I2C，1：TWI
#if I2c_select = 0
'------[對于軟件 I2C]------
Config I2cdelay = 10                                  'SCL 時(shí)鐘頻率 = 大約 42KHz。（在 AVR 時(shí)鐘 16MHz 時(shí)）（* 最大 100KHz）
Config Scl = Portd.2                                  '設(shè)置端口引腳連接 I2C 總線的 SCL 線。
Config Sda = Portd.3                                  '設(shè)置端口引腳連接 I2C 總線的 SDA 線。
I2cinit                                                 '初始化 I2C 總線的 SCL 和 SDA 線。
'-------------------------------
#else
'------[對于 TWI]------------------
$lib "i2c_twi.lib"                                     '結(jié)合硬件 I2C/TWI 庫。
Config Twi = 100000                                     'I2C 總線時(shí)鐘 = 100KHz
Config Scl = Portc.5                                  '您必須指定 SCL 引腳名稱。
Config Sda = Portc.4                                  '您必須指定 SDA 引腳名稱。
I2cinit                                                 '初始化 I2C 總線的 SCL 和 SDA 線。
'-------------------------------
#endif
Dim Pcf8574_lcd As Byte : Pcf8574_lcd =64 '&H40       'PCF8574 從機(jī)地址。 (&H40,&H42,&H44,&H46,&H48,&H4A,&H4C,&H4E)
Dim Backlight As Byte : Backlight = 1                   'LCD背光控制。（0：關(guān)閉，1：開啟）
$lib "lcd_i2c_PCF8574.LIB"                            '包含 I2C LCD PCF8574 適配器庫。
Config Lcd = 20x4                                     '將 LCD 設(shè)置為 20 個(gè)字符和 4 行。
Initlcd                                                 '初始化液晶顯示器。
'
'  * 安裝第二個(gè)及后續(xù) LCD 時(shí)  *
'
pcf8574_lcd = &H4c                                     '第二個(gè)PCF8574的從機(jī)地址。 (&H40,&H42,&H44,&H46,&H48,&H4A,&H4C,&H4E)
Initlcd                                              '初始化第二個(gè) LCD。
'
Pcf8574_lcd = &H4A                                     '第三個(gè)PCF8574的從機(jī)地址。 (&H40,&H42,&H44,&H46,&H48,&H4A,&H4C,&H4E)
Initlcd                                                 '初始化第三個(gè) LCD。

'
'  ****************
'  * 顯示測試 *
'  ****************
'
Pcf8574_lcd =64 '&H40                                     '指定第一個(gè) LCD。
'
Locate 1 , 1                                           '標(biāo)題的顯示。
Lcd "PCF8574"
'
Locate 2 , 2
Lcd "I2C LCD Adapter"
'
Deflcdchar 2 , &H02 , &H04 , &H0C , &H1E , &H0F , &H06 , &H04 , &H08    'Write the custom character [Lightning] to the LCD.
Locate 1 , 15                                           '顯示自定義字符。
Lcd Chr(2) ; "1"
'
Locate 1 , 9                                           '顯示 PCF8574 的從機(jī)地址。
Lcd "[" ; Hex(pcf8574_lcd) ; "]"
'
'  * 第二個(gè)液晶顯示器 *
'
Pcf8574_lcd = &H4C                                     'Specify the second LCD.
'
Locate 1 , 1                                           'Display of title.
Lcd "PCF8574"
'
Locate 2 , 2
Lcd "I2C LCD Adapter"
'
Deflcdchar 3 , &H02 , &H04 , &H0C , &H1E , &H0F , &H06 , &H04 , &H08    'Write the custom character [Lightning] to the LCD.
Locate 1 , 15                                           'Display custom characters.
Lcd Chr(3) ; "2"
'
Locate 1 , 9                                           '顯示 PCF8574 的從機(jī)地址。
Lcd "[" ; Hex(pcf8574_lcd) ; "]"
'
'  * 第三液晶顯示器 *
'
Pcf8574_lcd = &H4A                                     'Specify the third LCD.
'
Locate 1 , 1                                           'Display of title.
Lcd "PCF8574"
'
Locate 2 , 4
Lcd "I2C LCD Adapter"
'
Deflcdchar 4 , &H02 , &H04 , &H0C , &H1E , &H0F , &H06 , &H04 , &H08    'Write the custom character [Lightning] to the LCD.
Locate 1 , 19                                           'Display custom characters.
Lcd Chr(4) ; "3"
'
Locate 1 , 9                                           '顯示 PCF8574 的從機(jī)地址。
Lcd "[" ; Hex(pcf8574_lcd) ; "]"
'
Locate 3 , 3
Lcd "-- 3rd Line --"
'
Locate 4 , 4
Lcd "20x4 Display "
'
Locate 4 , 20                                           '顯示光標(biāo)。
Cursor On , Blink
End

作者: taotie 時(shí)間: 2022-10-11 17:59

rem Main.bas file generated by New Project wizard
rem
rem Created: 周六 8月 8 2020
rem Processor: ATmega88
rem Compiler:  BASCOM-AVR

rem Write your code here
rem 背光及對比度均取消，因這個(gè)模型沒有背光功能
$regfile = "m88def.dat"
$crystal = 8000000
$hwstack = 32
$swstack = 32
$framesize = 64

Const Vmode = 3                                           '3V模式

$lib "Lcd_RX1602A5.lbx"
$lib "i2c_twi.lbx"                                        ' 對軟件 I2c 使用硬件 twi 或注釋

Config Twi = 100000                                        ' 100kHz
Config Lcd = 16x2 , Chipset = St7032

Config Scl = Portc.5
Config Sda = Portc.4

I2cinit

Lcd_reset Alias Portc.2                                  ' 用于 LCD 復(fù)位的引腳
'Lcd_light Alias Portd.7                                  ' 背光的引腳

Config Lcd_reset = Output                                  ' 顯示器復(fù)位
'Config Lcd_light = Output                                  ' Display Licht

'Lcd_light = 1                                              ' 激活背景LED
Lcd_reset = 0                                              ' 復(fù)位模式
Waitms 100
Lcd_reset = 1                                              ' 正常模式

'Initlcd                                                    ' init LCD
'Lcdcontrast 30                                           '30到40之間的值在3V時(shí)最有效

Do
  Cls
  Locate 1 , 1 : Lcd "test--CHENGGONG"
  Waitms 100                                              '
Loop

End

作者: guzhoufangge 時(shí)間: 2022-10-15 11:02

taotie 發(fā)表于 2022-10-11 17:59
rem Main.bas file generated by New Project wizard
rem
rem Created: 周六 8月 8 2020

高手！謝謝！

作者: taotie 時(shí)間: 2022-10-16 09:49

guzhoufangge 發(fā)表于 2022-10-15 11:02
高手！謝謝！

。這些都是BASCOM AVR幫助里的例程~~~

作者: jms209 時(shí)間: 2022-12-29 10:21
謝謝老兄
已經(jīng)下載..

作者: wblqx 時(shí)間: 2023-3-3 10:08
很不錯(cuò)的軟件，我還買了一本書。

作者: gzhdssj 時(shí)間: 2024-4-12 21:41
好久沒用過了，謝謝

作者: gzhdssj 時(shí)間: 2024-4-14 09:06
沒想到還有2.0.8.5

歡迎光臨 (http://m.zg4o1577.cn/bbs/)

<kbd id="bekkw"></kbd>