Robotika [Program Menyalakan Buzzer dengan winAVR dan BasicCompillerAVR (Bascom)]

BasicCompilerAVR
-----------------------------------------------------------------
             $regfile = "m32def.dat"
//nilai dari sumber oscilator (12mega)
                 $crystal = 12000000
//karena device buzzer output maka portd.0
                 Config Portd.0 = Output
                 Buzz Alias Portd.0

                 Do
                     Buzz = 1
                     Wait 1
                     Buzz = 0
                     Wait 1
                 Loop
-------------------------------------------------------------------

winAVR == ingat ya program ini case sensitive
-------------------------------------------------------------------
                //berhubungan dengan port
                 #include <avr/io.h>
                //berhubungan dengan waktu
                  #include <avr/delay.h>
       //perintah sbi(set bit) & cbi (clear bit)
                 #include <compat/deprecated.h>
               //sama dengan bentuk alias di bascomAVR
                #define buzzer PORTB
                           void delay_ms(int ms){
                               for (int i=0; i<=ms;i++)
                               {_delay_ms(1);}
                             }
                 //menu utama
                             int main(void)
                             {
                           while(1)
                           {
                           //0 adalah port ke 0
                                   sbi(buzzer,0);
                                   delay_ms(500);
                                   cbi(buzzer,0);
                                   delay_ms(500);
                             }
                 return(0);
                          }
----------------------------------------------------------------------

Dalam pembuatan program harus berdasarkan hardware, jadi software menyesuaikan hardware yang akan dipakai. Semoga sedikit catatan kecil ini dapat bermanfaat :)


Share this:

ABOUT THE AUTHOR

Sekecil apapun ilmu yang kita punya alangkah indahnya bila bermanfaat bagi sesama :)

0 komentar:

Posting Komentar