www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 
Sponsored by SiOL

Programiranje v bascom avr
Pojdi na stran Prejšnja  1, 2, 3 ... 36, 37, 38
 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Bascom sekcija
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
Jaka57
Moderator
Moderator



Pridružen-a: Ned 12 Dec 2004 21:47
Prispevkov: 5143
Aktiv.: 30.42
Kraj: Grosuplje

PrispevekObjavljeno: Ned Avg 25, 2019 4:30 pm    Naslov sporočila:   Odgovori s citatom

Kot sem napisal, ne poznam Bascoma, vendar lahko rešiš vse skupaj s tremi If stavki:
Koda:
If večje Then....
ElseIf enako Then ......
ElseIf manjše Then .....
EndIf

_________________
Lp, Jaka
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
Krampus
Član
Član



Pridružen-a: Pon 08 Sep 2008 13:07
Prispevkov: 1728
Aktiv.: 12.67
Kraj: Središče ob Dravi

PrispevekObjavljeno: Ned Avg 25, 2019 7:57 pm    Naslov sporočila:   Odgovori s citatom

Jaka57 je napisal/a:
Ne poznam Bascoma, toda naj bi šlo takole:
Koda:
If T_k > (T_b + 3) Then vklopi_Rele1
elseIf T_k <= T_b Then izklopi_Rele1
EndIf


Če ne pozna operatorja <= potem še en if stavek ali logični OR ( If (T_k<T_b) OR (T_k=T_b) Then........ ).


Koda:

T_b1 = T_b + 3

If T_k > (T_c) Then vklopi_Rele1
elseIf T_k <= T_b Then izklopi_Rele1
EndIf

_________________
Nisem ravno najbolj pameten na svetu, tu in tam pa imam kakšno idejo.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
Jaka57
Moderator
Moderator



Pridružen-a: Ned 12 Dec 2004 21:47
Prispevkov: 5143
Aktiv.: 30.42
Kraj: Grosuplje

PrispevekObjavljeno: Ned Avg 25, 2019 8:21 pm    Naslov sporočila:   Odgovori s citatom

Krampus, verjetno si mislil:

If T_k > T_b1 in ne T_c

ali Bascom ne prenaša aritmetike v If stavkih?

_________________
Lp, Jaka
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
Krampus
Član
Član



Pridružen-a: Pon 08 Sep 2008 13:07
Prispevkov: 1728
Aktiv.: 12.67
Kraj: Središče ob Dravi

PrispevekObjavljeno: Pon Avg 26, 2019 7:16 am    Naslov sporočila:   Odgovori s citatom

Ja, štima
_________________
Nisem ravno najbolj pameten na svetu, tu in tam pa imam kakšno idejo.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
BojanR
Član
Član



Pridružen-a: Tor 08 Apr 2008 9:52
Prispevkov: 599
Aktiv.: 4.24
Kraj: Vnanje Gorice

PrispevekObjavljeno: Pon Avg 26, 2019 7:59 am    Naslov sporočila:   Odgovori s citatom

Uvedeš še eno spremenljivko.
B=T_b+3
if T_k>B then set Rele1
if T_k =< T_b then reset Rele1
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Bascom sekcija Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Pojdi na stran Prejšnja  1, 2, 3 ... 36, 37, 38
Stran 38 od 38

 
Pojdi na:  
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu

Uptime: 205 dni


Powered by phpBB © 2001, 2005 phpBB Group