Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Picbasic pitanja za sve sto mi nije jasno

[es] :: Elektronika :: Mikrokontroleri :: Picbasic pitanja za sve sto mi nije jasno

Strane: << < .. 6 7 8 9 10 11 12 13 14 15 ... Dalje > >>

[ Pregleda: 108932 | Odgovora: 530 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 09:44 - pre 147 meseci
Hvala vam,ja sam tezak pocetnik pa nisam mogao da odmah vidim da ste mi poslali to sto mi je treba a pokusavam da sve sto naucim bude sa razumevanjem jer tako je mnogo lakse za ucenje nadalje.
MILAN ANDRIC
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 11:08 - pre 147 meseci
Code:
'*********************************
'*  Name    : za pocetnika                                      *
'*  Author  : Valjda ja :D                    *
'*  Notice  : Copyright (c) 2012 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 14.02.2012                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'***********************************
TRISB = $00 ;svi portovi b su izlazni
trisb.0 = 1  ; ulazni za taster
CMCON = 7

upali:
if portb.0 = 1 then portb.7 = 1 ;  kada pritisnes taster upali se led dioda
pause 50
if portb.7 = 1 and portb.0 = 0 then goto ugasi  ;uslov ako je led upaljena i taster pusten prelazis na label ugasi
goto upali                                                  
end
ugasi:
if portb.0 = 1 then portb.7 = 0 ; led dioda ugasena ponovnim pritiskom na taster
pause 50
if portb.7 = 0 and portb.0 = 0 then goto upali  ;uslov ako je ugasena led i taster pusten prelazis na label upali 
goto ugasi 
end                                          


Evo ti u Basic-u najprostije da bi shvatio mada se tu moze jos mnogo sta modifikovati .Ako te nesto muci pitaj , odgovaram koliko znam
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 11:23 - pre 147 meseci
Ti ako nisi js savladao osnove pic basica onda stvarne ne znam kako kapiras proton , u sustini je slican ali opet pocetniku je veoma zaeban
 
Odgovor na temu

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 12:26 - pre 147 meseci
Sad samo kapiram kako da kazem pocetak basica tj na pr to sa pinovima koji ce kad da radi ali sam cvrsto resio da idem dalje pa dokle stignem.
MILAN ANDRIC
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 12:46 - pre 147 meseci
Citat:
MILANAN: Sad samo kapiram kako da kazem pocetak basica tj na pr to sa pinovima koji ce kad da radi ali sam cvrsto resio da idem dalje pa dokle stignem.

Za pohvalu , dao sam ti primer najprostije da ukapiras , ako nesto nije jasno pitaj slobodno pa makar to bilo i najosnovnije .Pozdrav
 
Odgovor na temu

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:25 - pre 147 meseci
Ubacio sam ovaj kod u pic i cim dovedem napajanje dioda se odmah upali pa se tasterom gasi itd..Sta mogu da ubacim u ovaj kod da kad dovedem napajanje na pic dioda bude ugasena pa tek onda kad stisnem i pustim taster da se upali i gasi tek kad ponovo stisnem i pustim taster

TRISB = $00 ;svi portovi b su izlazni
trisb.0 = 1 ; ulazni za taster
CMCON = 7

upali:
if portb.0 = 1 then portb.7 = 1 ; kada pritisnes taster upali se led dioda
pause 50
if portb.7 = 1 and portb.0 = 0 then goto ugasi ;uslov ako je led upaljena i taster pusten prelazis na label ugasi
goto upali
end
ugasi:
if portb.0 = 1 then portb.7 = 0 ; led dioda ugasena ponovnim pritiskom na taster
pause 50
if portb.7 = 0 and portb.0 = 0 then goto upali ;uslov ako je ugasena led i taster pusten prelazis na label upali
goto ugasi
end

Probao sam:
upali:
if portb.0 = 0 . . . i jos neke kombinacije

ali neide mi
MILAN ANDRIC
 
Odgovor na temu

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4542

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..


+529 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:38 - pre 147 meseci
Evo u PBP:
Code:
trisb = %00000001
cmcon = 7
' Poicetno stanje: LED ugasena
portb.7 = 0

' Beskonacna petlja posto je 1 uvek jednako 1
While 1 = 1
    ' Ceka se pritisak na taster
    While portb.0 = 1
        pause 50
    Wend
    
    ' Taster pritisnut menja se stanje LED
    Toggle portb.7
    
    ' Ceka se otpustanje tastera
    While portb.0 = 0
        pause 50
    Wend
Wend

End


Aj' sad da vas vidim
--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:39 - pre 147 meseci
jesi li stavio otpornik ka masi na ulaznom pinu portb.0 od 10K ???
 
Odgovor na temu

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4542

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..


+529 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:41 - pre 147 meseci
U napisanome ide otpornik ka V+ (Pull Up), taster spaja na masu, podto pull up drzi ulazni pin na 1, i to se testira

@MILANAN: 'end' ti je potrebno na samo JEDNOM mestu, a to je na samom kraju programa.

Code:
TRISB = $00 ;svi portovi b su izlazni
trisb.0 = 1 ; ulazni za taster
CMCON = 7

upali:
if portb.0 = 1 then portb.7 = 1 ; kada pritisnes taster upali se led dioda
pause 50
if portb.7 = 1 and portb.0 = 0 then goto ugasi ;uslov ako je led upaljena i taster pusten prelazis na label ugasi
goto upali
end    <--- VISAK
ugasi:
if portb.0 = 1 then portb.7 = 0 ; led dioda ugasena ponovnim pritiskom na taster
pause 50
if portb.7 = 0 and portb.0 = 0 then goto upali ;uslov ako je ugasena led i taster pusten prelazis na label upali
goto ugasi
end 


Mada bi to trebalo da se malko drugacije napise ako hoces sa If/EndIf pa GoTo
--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:50 - pre 147 meseci
Zorane nije cilj u ovome sto si postavio na ovaj nacin WHILE...WEND sa uslovnim ciklusima , on ne zna osnovne funkcije Basica , treba mu klasicna upotreba pinova sto jasniji program da bi mogao ukapirati , a ne da pokazujemo koliko smo sposobni mi sami , da to odradio sto krace i efikasnije jer veruj mi njemu to nije od pomoci sto sam imao prilike da se licno uverim kada sam poceo i ja da radim sa nekim sitnim i osnovnim stvarima.
Ovo sto si postavio je za njega spansko selo , covek uci kako da konfigurise pinove i kako da ih koristi ,a ti mu takav primer nisi dao on ne zna sta znaci u programu beskonacna petlja i sta se tu desava , koliko sam ga shvatio zeli da ima sto jasniji program da moze ukapirati sta ,zasto i kako se desavaju te promene na izlaznim pinovima itd itd . Pozdrav

P.S Milane ako nemas brosuru sa osnovnim instrukcijama u basic-u javi



[Ovu poruku je menjao Darko_zed dana 14.02.2012. u 17:37 GMT+1]
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:55 - pre 147 meseci
Citat:
Mada bi to trebalo da se malko drugacije napise ako hoces sa If/EndIf pa GoTo

to me je uvek zanimalo , u cemu je razlika u ovome ako ovako stavim ili ostavim kao sto sam naopisao jer sam ko zna sta sve vec napravio i uvek sam pisao kao sto sam i ovde navika valjda , a razlike nisam video , radilo je u oba slucaja isto i bez greske.
Inace iz knjiga i literatutra iz kojih sam ucio su davali dva nacina upravo ova koja spominjemo da ne moram zavrsavati uslov ako je sve u nizu .
 
Odgovor na temu

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:58 - pre 147 meseci
RBO preko r10k na 5v i RB0 taster masa - kad se pritisne taster RB0 ide na masu.To sam pronasao sa nekim uputstvima na internetu i za sada sto odatle napisem radi ali nema mnogo primera kao na pr ovo sto sam trazio
MILAN ANDRIC
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 15:59 - pre 147 meseci
Inace u simulaciji je dioda prvo ugasena pa kad pritisnes taster onda se upali jer dovedem 1(+) na ulaz.
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 16:04 - pre 147 meseci
Citat:
MILANAN: RBO preko r10k na 5v i RB0 taster masa - kad se pritisne taster RB0 ide na masu.To sam pronasao sa nekim uputstvima na internetu i za sada sto odatle napisem radi ali nema mnogo primera kao na pr ovo sto sam trazio

Okreni sve kontra i radice
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 16:22 - pre 147 meseci
Citat:
Mada bi to trebalo da se malko drugacije napise ako hoces sa If/EndIf pa GoTo

Moje pojasnjenje pre svega Milanu a to je da ja kada koristim IF... THEN bez zavrsetka uslova sa ENDIF je u slucajevima kada skacem direktno na LABEL , a kada imam neku instrukciju unutar uslova onda zavrsavam sa ENDIF ako me razumes .Prepravicu program da ti bude jasnije sa end IF.
Evo te prepravke gde inace koristim ovaj nacin uvek kada nesto radim sto se tice IF THEN ... ENDIF i GOTO zavisno od instrukcija u programu i mislim da je to ok.

Code:
 '*********************************
'*  Name    : za pocetnika                                      *
'*  Author  : Valjda ja :D                    *
'*  Notice  : Copyright (c) 2012 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 14.02.2012                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'***********************************
TRISB = $00 ;svi portovi b su izlazni
trisb.0 = 1  ; ulazni za taster
CMCON = 7

upali:
if portb.0 = 1 then
 portb.7 = 1 ; 
 endif             kada pritisnes taster upali se led dioda
pause 50
if portb.7 = 1 and portb.0 = 0 then ugasi  ;uslov ako je led upaljena i taster pusten prelazis na label ugasi
goto upali                                                  
end
ugasi:
if portb.0 = 1 then
 portb.7 = 0
 endif                              ; led dioda ugasena ponovnim pritiskom na taster
pause 50
if portb.7 = 0 and portb.0 = 0 then  upali  ;uslov ako je ugasena led i taster pusten prelazis na label upali 
goto ugasi 
end                                          

 
Odgovor na temu

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 16:35 - pre 147 meseci
Proradelo je i kad okrenem sve naopko ali mnogo vam hvala i za ovaj drugi kod sa endif meni mnogo znaci da vidim i tu varijantu
MILAN ANDRIC
 
Odgovor na temu

ZAS011
Uzgajivač šargarepe izakuće
Vanuatu

Član broj: 288510
Poruke: 4542

ICQ: 8713400
Sajt: www.justfuckinggoogleit.c..


+529 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 16:41 - pre 147 meseci
@Darko_zed: I dalje imas jedan end viska
--
Make no mistake between my personality and my attitude.
My personality is who I am.
My attitude depends on who you are.
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 16:46 - pre 147 meseci
Citat:
ZAS011: @Darko_zed: I dalje imas jedan end viska


Moja velika greska je na koju si mi mislim bas ti uvek skretao paznju je sto radim copy/paste uvek i onda pravim svakakve gluposti (sto se i da videti iz prilozenog) jer ja bukvalno sklapam program ovako ako mi verujes , mrzi me da kucam .Al dobro ispravim na kraju kad moram il kad hocu da sve bude po PS-u

Ipak ako Milan zeli moze mu se sve objasniti jer sam ipak za tvoju verziju ovog programa i tako bih ja odradio , pa ako mu nije visak i da ga nece potpuno zbuniti moze mu se program objasniti sa ovim instrukcijama



[Ovu poruku je menjao Darko_zed dana 14.02.2012. u 17:59 GMT+1]
 
Odgovor na temu

Darko_zed
Aleksinac

Član broj: 137277
Poruke: 2312
*.dynamic.isp.telekom.rs.

Sajt: www.proelektro018.com


+98 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 17:04 - pre 147 meseci
Zorane jedno pitanje za tebe ako mozes da mi pojasnis ,a to je bas sa ovim IF THEN

primer:
Citat:
if portb.0 = 1 then portb.7 = 1

sta se moze desiti u programu ako ostane ovako za raliku od ovog primera
Citat:
if portb.0 = 1 then
portb.7 = 1
endif


kada zavrsim uslov sa ENDIF . KOje su razlike i sta moze krenuti po zlu ako ostavim ili napravim gresku u mom ''sklapanju'' programa sa copy/paste . Veliko hvala i pozdrav

P.S ipak cu morati da krenem da trosim tastaturu da je ne stedim al jbg svidja mi se pa mi je zao da je arcim
 
Odgovor na temu

MILANAN
MILAN ANDRIC
OPERATRER,PCRACUNARA
SVRLJIG,SRBIJA

Član broj: 257039
Poruke: 876
*.dynamic.isp.telekom.rs.



+10 Profil

icon Re: Picbasic pitanja za sve sto mi nije jasno14.02.2012. u 17:06 - pre 147 meseci
Sta ustvari radi ENDIF ? Primetio sam da se ne koristi kad su komande u istom redu a kad su komande jedna ispod druge tad se stavlja
.
.
.
ENDIF
END
MILAN ANDRIC
 
Odgovor na temu

[es] :: Elektronika :: Mikrokontroleri :: Picbasic pitanja za sve sto mi nije jasno

Strane: << < .. 6 7 8 9 10 11 12 13 14 15 ... Dalje > >>

[ Pregleda: 108932 | Odgovora: 530 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.