求BASCOM幾條代碼，實(shí)現(xiàn)D觸發(fā)器功能。

ID:364364 · 發(fā)表于 2018-9-29 16:15

PD.0輸入端上拉電阻有效,接按鈕開關(guān)到地，PB.0為輸出端。
那么問題來了，怎么能讓按鈕按下，輸出端出高電平，再按下輸出端為低電平？

要求按鈕長(zhǎng)時(shí)間按下，輸出端電平不會(huì)反復(fù)高低變換。意思就是用代碼實(shí)現(xiàn)CD4013的功能。

求大神解答，付黑幣為報(bào)酬。若對(duì)黑幣沒興趣，可以人民幣。

ID:342822 · 發(fā)表于 2018-9-30 12:39

這是RS觸發(fā)器功能而非D觸發(fā)器功能，見3樓

ID:364364 · 發(fā)表于 2018-9-30 14:03

什么觸發(fā)器無所謂，關(guān)鍵是代碼。我弄了好幾天了，最多K1開，K2關(guān).就是搞不出來一個(gè)開關(guān)。

ID:342822 · 發(fā)表于 2018-10-2 13:16

給你一個(gè)51代碼做參考。
根據(jù)這個(gè)來寫bascom-avr程序。
使用計(jì)數(shù)法識(shí)別長(zhǎng)短按*/
#include<reg52.h>
#define key_S 1000 //宏定義短按(約20ms)
#define key_L key_S*50 //宏定義長(zhǎng)按(約1s)
//定義端口
sbit KEY=P1^4;
sbit LED1 = P2^0;
sbit LED2 = P2^1;
unsigned int count=0;//計(jì)數(shù)變量

int main (void)
{
      LED1=1;
      LED2=1;
      KEY=1; //按鍵輸入端口電平置高
      while(1)       //主循環(huán)
      {
            if(!KEY)  //如果檢測(cè)到低電平，說明按鍵按下
            {
                     count++;
                     if(count==key_L)                               //長(zhǎng)按
                              LED2=!LED2;
                     if(count>key_L)
                              count=key_L+1;                               //防止count溢出
            }
            else                                                                      //按鍵抬起
            {
                     if(count>key_S && count<key_L)//短按
                              LED1=!LED1;
                     count=0;                                                       //count清0
            }
      }
}

ID:364364 · 發(fā)表于 2018-10-2 19:27

感謝樓上的51代碼，嘿嘿 C語言的咱看不懂，我只會(huì)一點(diǎn)點(diǎn)BASCOM（BASIC）語言，雖然不會(huì)用，但是還得是要感謝你！

ID:342822 · 發(fā)表于 2018-10-3 21:45

bascom avr-----用中斷實(shí)現(xiàn)的單鍵控制開關(guān)——代碼
rem Main.bas file generated by New Project wizard
rem
rem Created: 周三 10月 3 2018
rem Processor: ATmega8
rem Compiler:  BASCOM-AVR

$regfile="m8det.dat"
$crystal=8000000
ddrd.3=0
portd.3=1
ddrc.0=1
Config Int1 = Falling                                     'int1由何種信號(hào)引發(fā)rising/Falling/lowlevel
On Int1 Abc nosave                                              'int1中斷服務(wù)子程序標(biāo)號(hào)是abc
Enable Interrupts                                        'cpu允許中斷nterrupts是全局中斷
Enable Int1                                              '允許中斷，enable是使能的意思

do
IDLE
loop
End

Abc:                                                       '中斷服務(wù)子程序入口

portc.0=not portc.0
Return

ID:63090 · 發(fā)表于 2018-10-4 21:54

這個(gè)很簡(jiǎn)單的，不復(fù)雜

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

求BASCOM幾條代碼，實(shí)現(xiàn)D觸發(fā)器功能。

評(píng)分

瀏覽過的版塊


10 黑幣	回復(fù)本帖可獲得 10 黑幣獎(jiǎng)勵(lì)! 每人限 1 次(中獎(jiǎng)概率 10%)

求BASCOM幾條代碼，實(shí)現(xiàn)D觸發(fā)器功能。

評(píng)分

瀏覽過的版塊

求BASCOM幾條代碼，實(shí)現(xiàn)D觸發(fā)器功能。