www.elektronik.si

[mucek]

Pa imaš diodo na ključavnici?
Točno takšne probleme je imel en forumaš, ki je delal mojo "ključavnico" in je diodo nekako spregledal ...

LP, Grega

[protoncek]

Vilko, ne, ne....saj ni vojna, samo razprava. Podobno kot pogovor o tem, katero pivo je boljše - laško ali union? Sem pripravljen spiti enega ali drugega, samo potrebujem kakšen razlog, zakaj je eden ali drugi boljši (no, v specifičnem primeru je dovolj dober razlog že to da npr. Uniona nimajo )

Mucek - imam diodo ter 100n kondenzator. Mislim da imam celo dvakrat diodo -eno na relejskih kontaktih in še eno direkt pri sami ključavnici. (na releju je itak tudi dioda). Mislim da če bi celo zadevo naredil kot treba, do tega ne bi prihajalo...najprej sem pozabil dati tuljavo na 5V napajanje, se je to dogajalo skoraj vsakič, potem pa recimo vsakih 10-20 odpiranj...

[Tomazp]

Pred kratkim je bilo vprašanje glede razlike med C in Basic. Kot zanimivost: Testiral sem enostaven praktično identičen program vklop/ izklop PORTB.0 v C (AVR Studio), CodeVision - Bascom na ATmega16, interni frekvenčni osc. 1Mhz.

Velikost kode
C AVR GCC 435bytov
C CodeVision: 549bytov
Bascom: 639bytov

Čas med posameznimi signali pina PortB0:
C AVR GCC : 1,63ms
C CodeVision: 2,02ms
Bascom: 3,63ms

Zanimivo je tudi, da je razmerje hitrosti odvisno od uporabljenih ukazov. Včasih je večje ali manjše.

Program C GCC:
#include <avr/io.h>
int main(void)
{
DDRB|=(1<<0);
while(1)
{
for(int i = 1; i <= 100; i++)
{
PORTB|=(1<<0);
}
for(int i = 1; i <= 100; i++)
{
PORTB&=~(1<<0);
}
}
return 1;
}

C Codevision

#include <mega16.h>



void main(void)

{
int i;
DDRB|=(1<<0);
while (1)

{

while(1)
{

for(i = 1; i <= 100; i++)
{
PORTB|=(1<<0);
}

for(i = 1; i <= 100; i++)
{

PORTB&=~(1<<0);
}

}
}

}





Bascom:

$regfile = "m16def.dat"
$crystal = 1000000
$hwstack = 32
$swstack = 10
$framesize = 40
Dim A As Byte
Config Portb.0 = Output

Do
For A = 1 To 100
Portb.0 = 1
Next A
For A = 1 To 100
Portb.0 = 0
Next A
Loop

[vilko]

Ej, to je lep primer primerjave dveh programskih jezikov, Tomazp! Kaj takega sem si dolgo želel.

Rezultati so v korist C-a, v kolikor sta velikost programa in hitrost relevantna. Tu ima vsak svoje mnenje, nekomu bajti flasha veliko pomenijo, drugi se ne sekira in vzame večji procesor. (jaz sem že prilezel na ATMEGA64. Pred vsem zaradi obilice RAM-a. Često obravnavam prav dolge stringe, SMS sporočila.)

Pri hitrostih imam večje spoštovanje. Često je potrebno kaj narediti hitro.

Ali bi hotel narediti še dva taka poizkusa, meni bi veliko pomenilo.

Naredi C variatno programčkov bascoma, ki prilagam:

[Tomazp]

V zgornjo meritev sem dodal še CodeVision. Zanimiv podatek.

Za serijsko komunikacijo in primerjavo moram pa še prej pogledat nastavitev registrov.

[protoncek]

vilko, vidiš da nisi naredil nič slabega---! samo koristno razpravo si odprl.

[Silvo]

Za prvi vilkov primer assembler. (softwreski serijski port - za hardwerskega bi bilo kode še manj) Na testni namreč imam ravno tiny13

[igor_k]

Kaj pa to:

C:

[forest70]

[igor_k]

[NUFAN]

Ja, razlika je v obsegu oziroma velikosti spremenljivke.

- (signed) int: -32768 .. 32767
- unsigned char: 0 .. 255

[vilko]

[igor_k]

[Tomazp]

Hvala za odkrito napako. Res je. Moral bi uporabit uint8_t oz. unsigned char. Kar pomeni, da mora vse skupaj biti še hitrejše in krajše.

Spodnji podatki so sedaj še zgovornejši. Novi podatki so dopisani.

Velikost kode
C AVR GCC 435bytov => 402bytov
C CodeVision: 549bytov => 504bytov
Bascom: 639bytov

Čas med posameznimi signali pina PortB0:
C AVR GCC : 1,63ms => 1,31ms
C CodeVision: 2,02ms => 1,43ms
Bascom: 3,63ms

[Sadida]

Za začetnike bi bilo mogoče zanimivo gradivo iz predavanj, ki nastaja sproti.

http://paris.fe.uni-lj.si:81/izobrazevanje/1-stopnja-vs/osnove-mikroprocesorske-elektronike-ome/