skraceni kurs ucenja picbasica

[nemanjans]

pedja izvini molim te,probao sam da stavim i def osc20 i opet neradi display na 20mhz u proteusu

[Branez]

.....
Veruj mi da ti pomazem mnogo vise nego sto mislis. Time sto te teram da sam dolazis do zakljucaka.
....

Tako je, neće biti Pdje stalno pri ruci.

[nemanjans]

Kolko sam shvatio pauza za inicijalizovanje displeja je mala,kako mogu izracunati kolka treba da bude ako je to tog

[pedja089]

Dobro si shvatio, ali pristup ti je los...
Procitaj jos jednom ono sto sam ti kopirao iz manuala, i obrati paznju na sto citas.

[nemanjans]

GLUP SAM GLUP I GLIP neide neznam gde da ubacim i kolku pausu da ceka oscilator pet puta sam ono iscitao

Code: Select all

define osc 4
adcon1 = 7
trisa=0

DEFINE LCD_BITS 4
DEFINE LCD_DREG PORTA
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 5
DEFINE LCD_EREG PORTD 
DEFINE LCD_EBIT 7
DEFINE LCD_LINES 2
pause 100 'cekanje inicijalizacije displeja
lcdout $fe,1, "PRITISNI START"

kako uffff

[pedja089]

Oscilator ne ceka pauzu... Oscilator osciluje.
Procitaj opet... Ako ne mozes to skontati, vrati se na prve strane, i citaj objasnjenja oko oscilatora.
Tamo lepo pise da moras da kazes picbasicu kojom brzinom mu oscilator osciluje, da bi sve radilo kako treba.

[Maki]

Pozdrav !
Pogledaj ovdije . U toj knjizi imas podosta tog pojasnjeno a zatim malo datasheet , help , a za sve ostalo tu je pedja
Edit :
evo link : http://www.elektronika.ba/forum/viewtop ... 36&t=13553

[nemanjans]

M nemas sile da skontam

[nemanjans]

nesto sam uspeo dodao sam da kasne podatci ovo:
DEFINE LCD_DATAUS 500
ali sada mi nenapise prvo slovo sa displeja
umesto
"zdravo" napise :dravo
a kad je na 4 mhz napise lepo

[pedja089]

Opet pogresan pristup...
Ajde gledaj u ovu liniju narednih 4 sata
DEFINE OSC 4 'Oscillator speed in MHz: 3 4 8 10 12 16 20 24 25 32 33 40
Pa probaj zakljuciti koji broj tu treba da stoji.

[nemanjans]

pedja 20mhz i to sam uradio al opet na displeju nema niceg samo sija

[nemanjans]

ovako neradi samo sija displey

Code: Select all

define osc 20
adcon1 = 7
trisa=0
 DEFINE LCD_DATAUS 500  'bez ovog neispise nista a sa ovim meispise prvo slovo
DEFINE LCD_BITS 4
DEFINE LCD_DREG PORTA
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 5
DEFINE LCD_EREG PORTD 
DEFINE LCD_EBIT 7
DEFINE LCD_LINES 2
pause 100 


lcdout $fe,1, "PRITISNI START"

tak kad dodam da kasne podaci ispise,al bez prvog slova

[pedja089]

Napisi to define velikim slovima.
Produzi ovu pauzu od 100mS, mozda proteus jede govna, pa u simulatoru treba vise vremena da se displej inicijalizuje...
To nije za kasnjenje, nego je za brzinu kojom se salju.

[nemanjans]

nece pa nece uradio sam to

[pedja089]

Baci proteus, i kupi kontroler i displej...

[nemanjans]

Mislis da bi radilo?

[pedja089]

Mora da radi...
Nije mi jasno sta simulacija jede govna.
Jel ucitas novi hex kad bilo sta izmenis u programu?
A u ostalom zasto ti je toliko bitno u simulaciji da imas 20MHz

[nemanjans]

zato sto ima puno u prazno da broji zato ma sve novi folder sam napravio i nanovo compailirao samo nece ni prvo slovo ni prvi broj da ispise bas me iznervira sranje E PIC JE 16F877

Code: Select all

DEFINE osc 20
adcon1 = 7
trisa=0
a var byte
a=10
DEFINE LCD_DATAUS 500  'OVO SAM DODAO
DEFINE LCD_BITS 4
DEFINE LCD_DREG PORTA
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 5
DEFINE LCD_EREG PORTD 
DEFINE LCD_EBIT 7
DEFINE LCD_LINES 2
 
    pause 100

lcdout $fe, 1, dec a
 END

na displeju je samo 0

[pedja089]

Rekoh ti, povecaj ovo pause 100...
I malo lepse pisi, stvarno mi je tesko citati tvoje poruke...

[nemanjans]

Pedja metao sam pause 100,200,300...1000 isto