Zaštita od udara groma i ostalih prenapona

Pronašao sam lijepi katalog i skripticu za navedenu temu. Nalazi se pod: literatura ; škola.

CM35S (Selk)

         Ovo ljeto sam imao građevinske radove unutar kuće, pa je spavača soba ostala bez nočnog vanjskog svjetla i zidnog sata, te sam sa tavana skinuo poznati Selkov modul CM35 i napravio sa nekoliko elemenata, malo drveta i aluminija satić....

Od elemenata za osnovnu funkciju potreban je trafo, gretz, elektrolit, 2 otpora od 100E i jedan od 5Mohm; + 2 tipkice za brzo i sporo namještanje....

Postoji još i opcija namještanja i uključivanja alrama; zatim drijemanje; itd.

Ako ima zainteresiranih za izradu ovog sata; ili šire opcije dajem besplatno modul i sheme za spajanje.

Atmel AVR Microcontroller Primer. Programming and Interfacing.pdf

Dodao sam jednu lijepu knjižicu  iz 2008. od Steven F. Barrett and Daniel J. Pack

soft start

Prijatelj koji se pomalo bavi inovacijom, proizvodnjom i montažom ušao je u jedan lijepi konstrukcijski zahvat:

Odnosno; pogledajte razvoj tog proizvoda na stranici: http://ngelectronics.webs.com/apps/blog/

27.08.2014 Počela je priprema za prodaju; evo dio teksta sa navedene stranice: I'm looking for the companies that wish to cooperate for the sale of SSZC-M2  products in the territory of the EU , UK and the Russian Federation.

ATTEN 858D+

Moj prijatelj Bojan i ja postali smo sretni vlasnici navedene puhalice. Nastupili su neki problemi, te si je Bojan dao dva dana truda i snimio shemu.

Pod Literatura i softver; elektroničke sheme se nalazi  *.sch fajl za Eagle program.

TR21 Junkers

Putujuči tekst

Šetajuči po mom bogatom podrumu, pronašao sam jedan stari projekt, koji je bio realiziran sa malim atmelom (89c4051). Nakon što sam prešao na malo moderniji čip (atmega8), mogu napisati veče programe. Metoda pisanja mojih programa je kopiranje različitih drugih projekata, uz uzimanje pojedinačnih dijelova i od svakoga i prepravljanje po mojim željama. Imam jednog  prijatelja (upoznali smo se preko elektroničkog foruma) koji je softverski jako dobro potkovan; i razumije svaku tu naredbu. Mene u ovim mojim malim projektima ne zanima uvijek kako to radi i zašto; važno je da dođem do zadovoljavajučeg rezultata.

 Displej je napravljen od 8 pločica. Na svakoj se nalazi 16 LED, 16 otpora i 2 komada mojih omiljenih 74HC595.

Ovdje se nalazi samo osnovni dio programa; ostatak je na stranicama literature i softvera; Bascom programi , pod imenom: trk_r6. Još treba  promijeniti ASCII tablicu u naša slova....To za koji dan....Tekst se još za sada ukucava u kontroler, ali za koji dan će da se uspostavi i veza sa računalom, pa će se tekst ukucati preko njega.


'                         (c) Boris Felc 2000
'       putujuči tekst
'                Prikaz  serijski na 2x74595  i tako 8 puta
' Zadnja revizija 16.11.2013.
'-------------------------------------------------------------------------------
   $regfile = "m8def.dat"
  ' $crystal = 8000000
   $hwstack = 40
   $swstack = 16
   $framesize = 32

   Config Portb = Output
   Config Portc = Output
   Zapamti Alias Portc.1
   Klok Alias Portc.2
'-------------------------------------------------------------------------------
  Dim Poruka As String * 150
Dim Polja(500) As Byte
Dim Kolona As Byte
Dim Jedan_znak As String * 1
Dim Znak As Byte
Dim Mjesto_znaka As Byte
Dim Temp As Byte
Dim Polja_ptr As Byte
Dim Citanje_table As Integer
Dim Duzina_poruke As Word
Dim Duzina_polja As Word
'-------------------------------------------------------------------------------
Poruka = "Danas je cijeli dan bilo lijepo vrijeme."
Duzina_poruke = Len(poruka)
Duzina_polja = Duzina_poruke * 6
Duzina_polja = Duzina_polja + 8

For Mjesto_znaka = 1 To Duzina_poruke

Jedan_znak = Mid(poruka , Mjesto_znaka , 1)
Citanje_table = Asc(jedan_znak)
Citanje_table = Citanje_table - 32
Citanje_table = Citanje_table * 6

For Kolona = 0 To 5
Temp = Lookup(citanje_table , Table)
Polja(polja_ptr) = Temp
Incr Citanje_table
Incr Polja_ptr
Next

Next

Polja_ptr = 1
'------------------------------------------------------------------------------
 Do

   Reset Zapamti : Waitms 1
   Set Klok : Waitms 1

   Portb = Polja(polja_ptr)
   Polja_ptr = Polja_ptr + 1
   If Polja_ptr > Duzina_polja Then Polja_ptr = 0
   Reset Klok : Waitms 1

   Set Zapamti : Waitms 1

Waitms 200

Loop
'-------------------------------------------------------------------------------
Table:



Data 0 , 0 , 0 , 0 , 0 , 0                                  'space
.......i tako dalje

5000 integrated circuits power audio amplifiers (2008)

Dodao sam jednu novu knjižicu od 518 stranica. Za početnika u elektronici, pa do naprednijih korisnika. Kažu 5000 shema (nisam brojao) hibridnih NF pojačala