Menülü Oyuncak Araba....(Picli)

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek

    pic'e yeni merak saran arkadaşlar için eğlenceli olur diye düşündüm fakat menü kısmını biraz kısalttım staj defterine sığmıyordu isteğe göre menü seçeneği arttırılabilinir....ben ışık eklemeyi unutmuşum isteyen ekleyebilir fikir olsun

    devre isiste çizildi isteyen hex. kodunu çağırıp simule edilebilir....kodlarda pic basic'te yazıldı


    http://rapidshare.com/files/66291337/OYUNCAK_ARABA.rar.html 

    araçta 2 buton bulunmakta ilk önce devreiy çalıştırdığımızda set butonuna basacağız bırakacağız led yanıp sönecek ve daha sonra menu tusndan menu ayarlıcak tabi menuleri gezerken led menu'den menuye geçtiğini bildirmek için yanıp sönucek daha sonra  set butonuna basıp motorları çalıştıracağız :D bu akdar basit programı bitiğinde yine basa dönecektir eğer set e yine basılırsa program yine bastan baslar ayrıntılı bilgi için kodları inceleyin :D bende unuttum... 

    kodlar :


    Kod:
        symbol SAG1=PORTB.3
         SYMBOL SOL1=PORTB.4
         
         SYMBOL SAG2=PORTB.5
         SYMBOL SOL2=PORTB.6
         
         SYMBOL SET=PORTA.1
         SYMBOL MENU=PORTA.0
         SYMBOL BUZZER=PORTB.7
         SYMBOL LED=PORTA.2
         SYMBOL LED2=PORTB.2
         
         BASLA:
         
         PAUSE 300
         HIGH LED2
         IF SET=1 THEN ANA
         GOTO BASLA
         
         ANA:
         
         IF MENU=1 THEN LOOP1
         HIGH LED
         PAUSE 100
         LOW LED
         PAUSE 150
         GOTO ANA2
         
         ANA2:
         PAUSE 300
         IF MENU=1 THEN LOOP1
         GOTO ANA2
       
         
         LOOP1:
       
         IF SET=1 THEN KONT1
         IF MENU=1 THEN LOOP2
           HIGH BUZZER
         HIGH LED
         PAUSE 100
         LOW BUZZER
         LOW LED
         GOTO LOP1
         
         LOP1:
         IF SET=1 THEN KONT1
         IF MENU=1 THEN LOOP2
         GOTO LOP1
         
         
         
         
         KONT1:
         
         HIGH SAG1
         HIGH SOL2
         PAUSE 3000
         LOW SAG1
         LOW SOL2
         
         PAUSE 500
         
         HIGH SAG1
         HIGH SAG2
         PAUSE 5000
         LOW SAG1
         LOW SAG2
         
         PAUSE 500
         
         GOTO LOOP1
         
         
         LOOP2:
         
         IF SET=1 THEN KONT2
         IF MENU=1 THEN LOOP1
          HIGH BUZZER
         HIGH LED
         PAUSE 100
         LOW BUZZER
         LOW LED
         GOTO LOP2
         
         LOP2:
         IF SET=1 THEN KONT2
         IF MENU=1 THEN LOOP1
         GOTO LOP2
         
         
         KONT2:
         
         HIGH SOL1
         HIGH SOL2
         PAUSE 5000
         LOW SOL1
         LOW SOL2
         
         PAUSE 500
         
         HIGH SOL1
         HIGH SAG2
         PAUSE 6000
         LOW SOL1
         LOW SAG2
         
         PAUSE 500
         
         HIGH SAG1
         HIGH SAG2
         PAUSE 7000
         LOW SAG1
         LOW SAG2
         
         PAUSE 500
         
         GOTO LOOP2
         
         END

    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    FOXXLY
    FOXXLY's avatar
    Kayıt Tarihi: 19/Haziran/2006
    Erkek
    bu piç hocam basiclerin en piçi gailba :D

    kelimeler albayım bazı anlamlara gelmiyor.
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek
    hocam bu pic öle bir meret hiç sorma   bence öğren derim :D

    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tabela Fatihi
    kaygusuz
    kaygusuz's avatar
    Kayıt Tarihi: 06/Nisan/2007
    Erkek
    sen yaptınmı bunu yoksam çaldın mı tasarımıyla uğraşmak gerek. birde çalıştır dediğinde similason hata veriyor

    Türkiye’deki emekli yaşlı insanları sevmiyorum. Ailemde emekli olanlarda dahil. Geleceğimizin çalınmasına izin verdiler. Umarım ızdırap dolu bir çileli hayat çekip elveda deyip bu dünyadan gidersiniz. Siz gençleri zırnık düşünmediniz hayallerini mahvettiniz.14.500TL ile hiçbirşey almadan karnınızı doyurun gelecek nesili düşünmeden yaşadığınızı sanıp gidin bu dünyadan.
Toplam Hit: 1362 Toplam Mesaj: 4