Pic 12F629 Off Timer - Za sve koji zele uciti, i Pomoci

[Beginner]

Pozdrav svima,

Kako ste se u mojem proslom postu:
http://www.elektronika.ba/forum/viewtop ... =3&t=10073" onclick="window.open(this.href);return false;
pokazali voljnim, dobronamjernim, i nadasve mi pomogli, zainteresirali ste me za pic 12f629.

S obzirom da sam pocetnik, i nepoznajem picbasic, molio bih vas za vase savjete,promjene u kodu i dobru volju.

Namjeravam napraviti Timer off sa picom 12f629, (mnogo jeftinije nego sa NE555), a nadam se da ce ovaj projekt biti zgodan i primjenjiv drugima koji tek pocinju ili traze nesto slicno.

Dakle Zelim napraviti nazovimo Timer koji se ukljucuje (starta) po dolasku kratkog signala na pin GPIO.5 (Ulaz1), te ukljucuje pin (GPIO.0), drzi pin GPIO.0 ukljucenim 10min, a nakon 10min gasi pin GPIO.0, i ceka ponovno ulazak signala na pin GPIO.5.


Dolje cu zakaciti kod koji se uredno kompajlira u PBP ver. 2.60A,

I zamoliti za konkretne odgovore (hvala)
1. zanima me da li ce stvar raditi (kod dolje)?
2. Ima li neko zgodnije rjesenje od Pause 60000 koja odgovara

stanci od 10min.
3.Da li kad pic izvrsava naredbu pause nemoze raditi nista drugo?
4. Kako rjesiti da moze raditi i nesto drugo dokle ceka da ugasi pin GPIO.0?


5.Moje neko razmisljanje kako rjesiti ovaj program je koristeci interni timer i napraviti interrupt kada dodje signal na GPIO.5da li to ima logike?


Hvala Svima

Code: Select all

Define OSCCAL_1K 1  ' kalibracija internog oscilatora - ova radi samo sa novim nikad pobrisanim devices


Ulaz1       var     GPIO.5
Out1        var     GPIO.0

CMCON = 7 ' iskljuciti analogni komparator
'ANSEL = 0 ' iskljuciti analogno digitalni konverter, postavi sve pinove na digitalne
                'ne radi sa 12F629

TRISIO = %00100000  'ime portova na picevima PIC12C5xx, 12CE5xx, 12C67x and 12CE67x je GPIO.
                                ' Pa je tako ime za TRIS registar TRISIO. Postavi pin GP.5 kao input


WPU = %00100000 ' - pull up enabled  ? sto to tocno znaci?


'************************* kalibracija oscilatora *************        
            asm
            bsf     STATUS,RP0          ;' bank 1
            call    3ffH                ;' get the cal value ( podatak zapisan na zadnjoj adresi )
    		movwf   OSCCAL              ;' calibrate
            bcf     STATUS,RP0          ;' bank 0
            endasm
'***************************************************************


        low Out1
        input Ulaz1


Main:

if Ulaz1 = 1 then
	Out1=1
	Pause 60000
	Out1=0
	goto Main
endif
  goto Main

end

[vukboban]

Ja ne poznajem PBP,ali ovo nece da radi.
Stavio si interni pullup na GP5,a to znaci da je on na log1(interno si vezao pin na +5V)
A onda u programu cekas da bude log1,mada je on vec na log1.

Ustvari hoce da radi,ali ce se uvek vrteti u krug,bez uticaja tog input pina.

WPU registar odredjuje koji pinovi su interno vezani za +5V i to tako da ako je na mestu tog pina 1 onda je on vezan za +5V,a ako je 0 onda nije.

Da bi kod radio imas 2 mogucnosti:
1. ostavi WPU kako jeste,ali onda na pin dovodis GND preko tastera,i u programu stavis :if ULAZ1 = 0 then....
2.WPU=0 ,pin vezes eksterno preko 10K otpornika na GND,onda ostaje ono:if ULAZ1 = 1 then... i dovodis mu +5V preko tastera.

[pedja089]

pause 60000=1min.

[Beginner]

Pozdrav,

Da, pedja hvala, porijesio sam, 600 000 = 10 min

Hvala VukBobane.. dole cu postaviti shemu i ispravljeni kod pa reci jesi na to mislio i jel bi tako radilo...

Izabrao sam opciju 2.
S tim da sam ja stavio WPU = %00100000 pa GPIO = 0 to bi isto trebalo raditi, ili bas mora biti
samo WPU=0 ?

Code: Select all

Define OSCCAL_1K 1  

Ulaz1       var     GPIO.5
Out1        var     GPIO.0

CMCON = 7 
'ANSEL = 0  'ne radi sa 12F629
                
TRISIO = %00100000  
WPU = %00100000 ' - pull up enabled 
GPIO = 0

'************************* kalibracija oscilatora *************        
            asm
            bsf     STATUS,RP0          ;' bank 1
            call    3ffH                ;' get the cal value ( podatak zapisan na zadnjoj adresi )
          movwf   OSCCAL              ;' calibrate
            bcf     STATUS,RP0          ;' bank 0
            endasm
'***************************************************************


        low Out1
        input Ulaz1


Main:

if Ulaz1 = 1 then
   Out1=1
   Pause 600000
   Out1=0
   goto Main
endif
  goto Main

end

Hvala unaprijed, i mozete li mi odgovoriti na moja pitanja 3,4 i 5 sa pocetka.... Pedja sve zna ali mudro suti i promatra..


hvala vam.

[vukboban]

Ja vidim da si ispravio pauzu na 10 min,ali i dalje si ostavio WPU.Ako si upisao u WPU na nekom mestu log1,to znaci da si na bazu nekog tamo tranzistora doveo napon,taj tranzistor provede i pusti +5V na ulazni pin.
Nema veze sto si kasnije softverski rekao da je tu log0(GPIO=0),tu ostaje +5V.GPIO port zadaje vrednosti samo za izlazne pinove,ulazni pinovi su sa strane kontrolera u stanju visoke impedanse(nisu ni log0 ni log1).
To znaci da kontroler ne utice na ulazne pinove,t.j. ne moze da ih menja.Naravno osim preko ovog WPU registra.

Sto se tice 3,4 i 5 tu si u pravu,kontroler ne moze da radi nista dok se izvrsava pauza,osim obrade nekog prekida koji si prethodno dozvolio.

Da bi radio nesto drugo moras drugacije:

1.cekas da se pojavi log1 na ulazu.u tom trenutku palis diodu, startujes timer,i dozvolis da timer generise prekid.tajmer moze koliko se secam da broji maksimalno 65ms sa 4Mhz taktom.u prekidnoj rutini tajmera uvecavas neku promenljivu za 1.u program negde ubacis da proverava da li je ta promenljiva dostigla 9230.Zasto 9230? jer je 10 min=600sec=600000ms.600000/65=9230.ako jeste onda gasis diodu.Za sve ovo vreme mozes da radis bilo sta drugo u programu.Ovo nisam precizno racunao,ali tu je negde.

2.umesto da cekas log1 na ulazu,mozes i da dozvolis prekid na INT pinu(GP2),ulaz da dovedes na GP2,a u tom prekidu da startujes timer.Ovako izbegavas cekanje na pocetku.

[pedja089]

Da ovde ne razglabamo, procitaj kurs, pogledaj deo o ulazima i kako se resavaju.

[Beginner]

UH,UH VukBoban Care Hvala Boli me glava Sve si lijepo objasnio, ali meni jos stosta nije jasno....
Mozda da objasnis korak po korak..

skroz sam ono fulao za WPU, logicno sto si rekao, sada sam stavio option_reg.7 = 0 'sto bi trebalo podesiti global GPPU bit - za pull up enabled = 0. Hm... da li bi s ovim radilo?

izabrao sam tvoju ponudjenu opciju 2, teze no zanimljivije.

Proucih tonu stranica:
9.4 Interrupts (63str) - datasheet od pic12f629
http://melabs.com/resources/pbpmanual/9_0.htm" onclick="window.open(this.href);return false;
http://melabs.com/resources/pbpmanual/5_42-5_47.htm" onclick="window.open(this.href);return false;
http://www.edaboard.com/thread47559.html" onclick="window.open(this.href);return false;

i mnoge druge, no sada sam jos vise zbunjeniji....

1.Nigdje nema objasnjenja Kako dozvoliti timeru da generira prekid? Kao neki primjer koda?
2. Recimo ako imam 4Mhz clock i koristim 16bitni Timer1, sto je prescaler i kako ga podesiti, kako kontrolirati Timer overflow, kako provjeravati vrijeme, kako da Timer1 generira interrupt?

Znam mnogo pitanja ako se nekome da da mi pojasni...Naime u pic basicu sam nesto manje od tjedan dana...

Naime, jedino sto sam smislio na tvoj VukBoban savjet je kod koji cu postati, no neznam da li bi on uopce radio, no ne radi ono sto si ti savjetovao pa ako ga mozete pogledati i prokomentirati...

Pedja hvala ti, Super ti je kurs, no u kursu nema igranja sa timerima i interuptima, ako se nevaram...

Hvala vam,
Volioi bih da mi pomognete da se ovaj timer napravi kao projekt kojega ljudi mogu upotrijebiti...

Code: Select all

Define OSCCAL_1K 1  

Ulaz1       var     GPIO.5
Out1        var     GPIO.0

Timer1      var     Word 
Timer1h     var     Timer1.highbyte
Timer1l     var     Timer1.lowbyte

 CMCON = 7 
'ANSEL = 0  'ne radi sa 12F629
                

TRISIO = %00100000 
GPIO = 0 
WPU = %00100000 ' - pull up enabled 
option_reg.7 = 0 

'************************* kalibracija oscilatora *************        
            asm
            bsf     STATUS,RP0          ;' bank 1
            call    3ffH                ;' get the cal value ( podatak zapisan na zadnjoj adresi )
          movwf   OSCCAL              ;' calibrate
            bcf     STATUS,RP0          ;' bank 0
            endasm
'***************************************************************
'INTCON = %00100000   ' omoguci interrupt na GP5


        low Out1
        input Ulaz1


Main:
    'ON INTERRUPT GOTO Handler

Timer1.Highbyte=TMR1H 'get part of the timer value
Timer1.Lowbyte=TMR1L 'get the rest of the timer value

  if Ulaz1 = 1 then
       T1CON.0=0 'stop the timer
       TMR1H = 0 'Set the high part of the timer value to 0
       TMR1L = 0 'Set the low part of the timer value to 0
       T1CON.0=1 'start the timer

  endif

  If Timer1 = 9230 then
       T1CON.0=0 'stop the timer
       TMR1H = 0 'Set the high part of the timer value to 0
       TMR1L = 0 'Set the low part of the timer value to 0
       Out1=0
  endif 


goto Main
end

[Kizo]

E moj Beginneru, diraš u bolno mjesto PBP kompajlera

[pedja089]

Pa i nije bas bolno mesto.
Postoji prosiranje za pbp. U kojem se generisu asemblerski interapti u svega par linija koda...
I sto je najbolje od svega za svaki interapt se posebno definise labela na koju ce da skace. Tako da i kada imamo nekoliko interapta omogucenih, ne moramo proveravati koji se dogodio.
Evo pogledaj ovde
A imas cak i tajmer uradjen.

[en1di0n]

Probaj istu stvar napravit u PIC Simulator IDE ili mikroBasic for PIC

[pedja089]

Ne razuem te, ako je uopste bilo upuceno meni.

[Kizo]

Nedavno sam silom prilika morao napraviti program za 16F628 (pri vrhu stranice je) gdje su mi, između ostalog, trebali interapti i timeri. Normalno da sam prvo išao pisati u PBP pošto se je Pedja već potrudio napraviti kurs, no ubrzo sam naletio na zid. Naime problem je u tome što se naredbe u PBP ne mogu prekinuti nekom drugom naredbom.
Iz helpa:

PicBasic Pro statements are not re-entrant (i.e. you cannot execute another PicBasic Pro statement while one is being executed)

Što u prijevodu znači ako sam si konfigurirao timer da mi generira interapt svake milisekunde, a u glavnom programu stoji npr.

Main:
Pause 1000
Goto Main

Interapt se neće dogoditi svake ms, nego, pogodili ste, svake sekunde. U normalnom programu će se izvršavati kako mu se hoće, ovisno o trajanju trenutne naredbe, što je ozbiljni nedostatak, jer se gubi sami smisao interapta da se trenutno prekine što god da se radi i skoči u interapt rutinu. Naravno, ne možete se pouzdati u precizan tajming, niti da će se kritični dijelovi programa izvršiti na vrijeme. Druga stvar je što će kompajler između svake moguće naredbe ubaciti provjeru dali se pojavio interapt što samo dodatno zakrči već ionako pretrpani kod sa famoznim MOVWF i MOVLW.

Jasno da se stvar da donekle srediti u asembleru, što se kako vidim iz Pedjinog linka netko potrudio i napraviti, no sumnjam da je svima lako shvatljivo kako ovo radi, a s druge strane, koliko znam asembler za PIC je besplatan.

[pedja089]

To su razvili ljudi koji rade i ciji posao je pravljenje i poboljsanje pbp-a.
To je tim koji razvija picbasic. Verovatno ce se i taj sistem interapta naci u osnovnoj verziji pbp-a, pre ili kasnije.
Problem asemblera u odnosu na bilo koji visi programski jezik necu spominjati. Mislim da je to jasno.
Ali asemblerski interapti odradjeni na ovaj nacin, i ovako pristupacno u nekom visem programskom jeziku, mislim da je jedinstveno.
Nisam siguran da li si dobro shvatio sadrzaj sa stranice. Ovde se radi o asmblerskim interaptima u pbp-u.

Ja u kursu nisam opisivao ni tajmere ni interapte, ni serisku komunikaciju, ni usb ni ethernet, jer je ovo namenjeno kao polazna tacka. To sto stoji u kursu je samo neka osnova da bi se pocetnik dalje mogao snalaziti, nista vise... Za tako detaljno nesto mislim da nemam ni vremena ni zivaca...
A nisam te razumeo sta si hteo reci sa ovim asm je besplatan.

[Beginner]

Hvala Decki, Hvala vam od srca, mislim da sam pronasao rjesenje koje cu postati ali sad me nesto drugo UZASNO muci....

Pomagajte Molim VAS, osjecam se kao zadnji kreten nemogu isprogramirati pic 12f629....
Dogadja mi se ista stvar kao covjeku u ovome postu:
http://www.elektronika.ba/forum/viewtop ... 45#p100945" onclick="window.open(this.href);return false;

Naime isprogramirao sam pic12f629, kod je radio, ali vise nemogu citati iz njega niti bilo sta uprogramirati, sta da radim? i to ista prica sa vec nekoliko piceva 12f629.

WinPic800 nemoze ga prepoznati i isprogramirati, ic-prog nemoze ga isprogramirati, na verifikaciji pukne, za vrijeme i poslije programiranja, CP nije bio ukljucen....

Pomozite molim vas, totalno sam lud...
Hvala

[Beginner]

Radi se o allpic programatoru, i da jumper jedan je bio skinut....prilikom prvog programiranja...

[pedja089]

Nece pic da udje u program mod.
E sad zasto zavisi od postavki koje si uprogramirao.
Ako si iskljucio mclr pin, onda moras postaviti allpic tako da prvo dodje Vpp, pa Vcc.
I moguce je da zeza kondezator na Vpp, makni njega...

[Kizo]

@Pedja: nisam mislio niša zlonamjerno, samo sam htio naglasiti da ako smo već prisiljeni koristiti i znati ASM za napisati interapte, onda ovaj 250$ Basic compiler debelo gubi na vrijednosti pošto ćemo onda znati i ostatak programa napisati u MPASM-u koji je besplatan.
Ja se nadam da će ovo ispraviti čim prije, a do tada se moramo snalaziti na ovakve načine kako god znamo.

Ako ti se da isprobavati, baci oko na PIC simulator IDE. Dolazi sa Basic kompajlerom koji ne pati od ovakvih problema. Vjerojatno ima i on svojih mušica ko i svaki, te ne mogu tvrditi koji je bolji pošto sam oba koristio kratko vrijeme, no sa interaptima nikakvih problema pa ti se možda svidi.

Ali asemblerski interapti odradjeni na ovaj nacin, i ovako pristupacno u nekom visem programskom jeziku, mislim da je jedinstveno.

Svaki ozbiljniji kompajler podržava in-line ASM.

[pedja089]

Ma znam da ne moslis nista lose...
Samo pogledaj sintaksu. Ovi asemblerski interapti su odradjeni bas tako da nema nikakve potrebe za znanjem asemblera.
Sve sto treba napisati je ime interapta, i labelu na koju hoces da ti skoci kad se dogodi taj interapt.
Evo pogledaj primer http://darreltaylor.com/DT_INTS-14/hello.html" onclick="window.open(this.href);return false;
A ovaj include fajl se brine za podesavanje bita, i ostale gluposti koje idu uz asm. Bas zato sam naglasio da je to jedinstveno. Ali da se ogradim, bar koliko ja znam. Jer nigde osim ovde nisam video da kompajler sam ispodesava sve bite. Vec ih uglavnom moras juriti po datasheetu. A ovaj include fajl upravo to radi
I ono sto je jako zgodno kad prebacujes kod sa jednog na drugi pic uopste ne moras misliti o bitima, i imenima registara(iako su uglavnom isti).
Zato mislim da pbp sa ovim fajlom ima jako lepo resene interapte.

[Beginner]

LJUDI rijesio sam problem!!!

Premda mi nije bas naj jasnije sto se dogadja u pozadini pa mi netko moze objasniti.

Nevjerojatno - moze netko ovo staviti da bude dostupno svima koji su naisli na isti problem:

Dakle prilikom programiranja pica 12F629 isprogramirao sam ga uredno i program je radio uredno,
no nisam ga vise mogao procitati niti ponovo isprogramirati pic sa winpicom800 i ic-prog. Kada bih vratio jumper1 mogao bih procitati kod ali ponovo nebih mogao pisati u pic....

S obzirom da sam bio mudar i prije prvog programiranja procitao sam pic i spremio kompletan hex file s oscal veijednosti na kraju.

Taj heks sam sa pic programatorom programirao nartrag u pic, s opcijom "verify code after programming" i sa skinutim jumperom1. Probao sam na desetke puta istu metodu, obicno ne radi iz prve nego pretezno iz drugog pokusaja nekad iz treceg, od cca50 pokusaja upalilo je 40 iz druge, 5 iz trece, 5 iz prve...

Pod tim mislim nakon prvog programiranja tog heksa u pic sa ic-programom i uspjesnog verify-a, ugasio bih allpic programator, ukljucio ga i ponovo isprogramirao hex i tada bi pic bio prepoznatljiiv u winpic800 i programabilan. Stvar radi neznam kako ali radi....

dole cu postaviti taj prazan hex file za ic-prog, moze se programirati u bilo koji pic 12F629 no samo treba promijeniti oscal podatak na zadnjoj adresi od vaseg pica i to je to...
opcije se same podese sa ucitavanjem hexa a to su :
wdt_on
mclr_on
boden_on
rc clkout


A sad bi mi netko mogao objasniti zasto se to dogadja?
Naime stvar se desavala kada sam cackao oko MCLR switcha......

negdje sam procitao:

"Postoji mogućnost da nakon programiranja mikrokontrolera, više ga nije moguće ponovno isprogramirati.To se događa u situaciji ako je uključen unutarnji oscilator i isključen "MCLR", a Vaš programator nema kontrolu VDD-a ( +5v )."

"ako je napon napajanja (+5V) prisutan prije VPP, a mikrokontroler je bio već isprogramiran sa postavkama <IntOsc> i <MCLR - off>, tada nije moguće isprogramirati kontroler, jer je on već u režimu rada i neće reagirati na programiranje."


Pa allpic ima kontrolu VDD-a, zar ne?
I isto tako ima rjesen dolazak prvo +13V na MCLR pa VDD +5?

A u kodu nisam koristio MCLR pin, niti ga asocirao ni nista, samo sam bio iskljucio MCLR off svitch.....


Zasto se onda to desava moze li mi netko pojasniti?

[Beginner]

Apsolutno se salzem s obojicom...

A pedja pogodio si isto sto sam i ja pronasao od tog tipa Darrel Taylor-a samo na stranici picbasic.co,uk foruma iliti melabsa, Sa svojim gotovim univerzalnim TIMEROM i hendlanjem interrupta luda stvar! Neka svi pogledaju, tako jednostavno i radi PA kad meni proradilo sta nebi i drugima

Ovo svi trebaju pogledati ULTIMATe TIMER ko ima vremena moze i procitati te tri strane da vidi kakva je picajzla taj frajer, kako mjeri oscilator da bi podesio kod sto tocnije bla,bla...Evp linka:
http://www.picbasic.co.uk/forum/showthr ... 190&page=1" onclick="window.open(this.href);return false;


Inace pedja ovo sto si ti postao link na njegovu stranicu je jos ludje i doradjenije...
Da se s tim igrati.... No mogao bih ja prvo osnove savladati...


BTW. Bas sam se i s tim timerom zajeb... kad mi se nije pic vise dao isprogramirati.....hehe
Nitko da mi objasni....