stm32f4-discovery mikrobasic buton ile led yakma örneği

[MCansız]

arkadaşlar mikrobasic ile discovery kitimi progralamaya geçtim gerçekten çok kolay bir dil özellikle basic kullanıcıları için şimdi user butonuna basıldığında led yakan proragramımızı görelim öncelikle microbasic for arm programını kurduktan  sonra kitimizi programa tanıtmak için mikroProg Suite For ARM programını açıyoruz




options giriyoruz

karşımıza bu ekran geliyor ekrandaki ayarları yaptıktan sonra





mikroBasic PRO for ARM programını açıyoruz


new project butonuna tıklayıp ileri dediğimizde


işlemci ayarlarını yapıp nex diyorum açılan kod sayfasına

program Button_Test


main:

  GPIO_Digital_Input(@GPIOA_BASE, _GPIO_PINMASK_ALL)      ' Set PA0 as digital input
  GPIO_Digital_Output(@GPIOD_BASE, _GPIO_PINMASK_ALL)    ' Set PORTD as digital output


  BASLA:
    if GPIOA_IDR.B0 = 1 then            ' pa0 pini set edildi
       GPIOD_ODR.B15 = NOT GPIOD_ODR.B15   'toggle pa0
       WHILE  GPIOA_IDR.B0 = 1            'pa0 pini hala basılımı
       WEND                             'bırakılıncaya kadar bekle

    end if

  GOTO BASLA
end.

ctrl+F11 tuşlarına bastığımızda yazılım derlenip kitimize yüklenecek uğraşan arkadaşlara kolay gelsin