PIC Strobe (flasher)

Sve vezano za mikrokontrolere

Moderators: pedja089, stojke369, [eDo], trax

Post Reply
User avatar
elektor
Pravi forumaš
Pravi forumaš
Posts: 1588
Joined: 14-10-2008, 20:40
Location: Hrvatska, Rijeka

PIC Strobe (flasher)

Post by elektor »

Evo jedan projektić da ne ispadne da samo Feko nešto radi :lol: . Inače riječ je o projektu iz usluge koji je gotov već par mjeseci.
Pita mene frend jednom prilikom da bi bih ja mogao zamjeniti crvene ledice s plavima u onim kineskim "policijskim" bljeskalicama sa ebaya. Kaže da bi naručio za alegorijska kola na karnevalu, al da bi htio da su sve plave. Ja reko ma što ćeš naručivat napravim ti to ja. Na kraju projekt nisam stigao izrealizirati do karnevalske povorke, jer sam bio zauzet s faksom :roll: . Al sad ih bar ima za sljedeću godinu.
Pošto je riječ o jednostavnom projektu samo sa osnovnim stvarima (stabilizacija napona, pic, konektor za programiranje, taster za odabir modova, tranzistorska sklopka i ledice) pustit ću da dokumentacija priča sama za sebe.
Kod je pisan u PICBasicu

Code: Select all

symbol mode=porta.1                  
symbol lijevi=portb.1    
symbol desni=portb.0
      
input mode      
ADCON1 = 7              'iskljucuje analogne portove (hvala morski)
    
output lijevi
output desni
    
i var byte
count1 var byte                
count2 var byte
NovoStanje var bit
StaroStanje var bit
i=1
    
pocetak:
novostanje = mode                                            
if novostanje<starostanje then         
i=i+1
if i>5 then i=1                        
endif
STAROSTANJE=NOVOSTANJE
    
if i=1 then 
    goto prvi
else 
    if i=2 then
        goto drugi
       else 
          if i=3 then
             goto treci 
          else
             if i=4 then
                goto cetvrti
             else 
                if i=5 then
                   goto peti
                endif
             endif
          endif
    endif
endif 
goto pocetak
                 
prvi:               
count1 = 0
count2 = 0
repeat 
    high lijevi
    low desni
    pause 60
    low lijevi
    low desni
    pause 60
    count1=count1 + 1
until count1 = 5    
repeat 
    low lijevi
    high desni
    pause 60
    low lijevi
    low desni
    pause 60
    count2=count2 + 1
until count2 = 5
goto pocetak
     
drugi:              
count1 = 0 
repeat
    high lijevi
    high desni
    pause 60
    low lijevi
    low desni
    pause 60
    count1=count1 + 1
until count1 = 5
pause 120
goto pocetak
    
treci:             
high lijevi
low desni
pause 100
low lijevi
high desni
pause 100
goto pocetak
    
cetvrti:            
high lijevi
low desni
pause 250
low lijevi
high desni
pause 250
goto pocetak
    
peti:              
high lijevi
high desni
pause 100
low lijevi
low desni
pause 100
goto pocetak
Shema i izgled pločice:
http://imageshack.us/photo/my-images/819/shemaj.png/
http://imageshack.us/photo/my-images/11/plocica.png/
Usput sam malo eksperimentirao s UV bojom:
http://imageshack.us/photo/my-images/20 ... 928wp.jpg/
http://imageshack.us/photo/my-images/43/dsc02931a.jpg/
Gotovo:
http://imageshack.us/photo/my-images/62/dsc02991u.jpg/
http://imageshack.us/photo/my-images/846/dsc02992q.jpg/
http://imageshack.us/photo/my-images/543/dsc02924e.jpg/
http://imageshack.us/photo/my-images/850/dsc02920y.jpg/
http://imageshack.us/photo/my-images/850/dsc02920y.jpg/
http://imageshack.us/photo/my-images/543/dsc02998d.jpg/
U raru se nalazi hex i eagle fileovi. U fileu s led postoji višak otpornika, oni su stavljeni na isto mjesto gdje idu i pravi samo na gornju stranu pločice. Morao sam tako napravit da bi mogao isprintat SMD padove skupa s normalnim padovima pri izradi LOTSTOP-a. Njih se može slodobno obrisat.
Attachments
PicStrobe.rar
(76.55 KiB) Downloaded 397 times
User avatar
Kukinjos
Pravi forumaš
Pravi forumaš
Posts: 1724
Joined: 28-03-2012, 18:01
Location: Split

Re: PIC Strobe (flasher)

Post by Kukinjos »

Ima se kontrolera, ne pati se :lol:
Cezare, star sam i nemoćan, ali poslušaj moj savjet ....
User avatar
elektor
Pravi forumaš
Pravi forumaš
Posts: 1588
Joined: 14-10-2008, 20:40
Location: Hrvatska, Rijeka

Re: PIC Strobe (flasher)

Post by elektor »

Dok je u svrhu znanja i učenja ne žalim ih :wink:
User avatar
Feko
Stariji član
Stariji član
Posts: 4394
Joined: 23-07-2008, 06:18
Location: Hrvatska, Slavonija, Selo moje malo...

Re: PIC Strobe (flasher)

Post by Feko »

Čim par dana zahladi...i na moru budu malo aktivni. Sad kad sunce upekne nema više posla do jeseni. Samo kupanje i picigin :lol:

Lipo si ti to napravio!
User avatar
LIAM
Pravo uznapredovao :)
Pravo uznapredovao :)
Posts: 379
Joined: 27-06-2008, 14:52
Location: Rijeka - Hrvatska

Re: PIC Strobe (flasher)

Post by LIAM »

Druze profi kao i uvjek ali ovo plavo pre je...o
User avatar
elektor
Pravi forumaš
Pravi forumaš
Posts: 1588
Joined: 14-10-2008, 20:40
Location: Hrvatska, Rijeka

Re: PIC Strobe (flasher)

Post by elektor »

Hvala puno, iako sa samim izgledom nisam posebno zadovoljan.
Lemljeno je u žurbi, a masa je blizu vodova pa se tinol tu i tamo razlio i gdje nije trebao. Pa malo estetski sve skupa zaostaje...
Post Reply