select - case

Hogyan programozzak AVR chipet? Programozók beállításai...
Bascom nyelvű programok...
Avatar
Robert
Elektronbűvölő
Hozzászólások: 10213
Csatlakozott: 2005. december 9. péntek, 7:00

Hozzászólás Szerző: Robert »

Kód: Egész kijelölése

if utasitas >0 then
   if utasitas <255 then
        mittegyek
   endif
endif
Avatar
szovhoz
Bitfaragó
Hozzászólások: 608
Csatlakozott: 2007. április 7. szombat, 6:00

Hozzászólás Szerző: szovhoz »

vagy megoldás lehet ez:

Kód: Egész kijelölése

if  command > 0 and command < 255 then
goto xy
end if

az és feltételell mind a két értéknek teljesülnie kell ugyebár és így a között tartom, vagyis behatárolom a tartományt.

még meg lehet bolondítani egy else-vel hogy akkor ugye mi történjen.
Avatar
Robert
Elektronbűvölő
Hozzászólások: 10213
Csatlakozott: 2005. december 9. péntek, 7:00

Hozzászólás Szerző: Robert »

Bascomban az IF után nem támogatott/dokumentált a többszörös logikai feltétel!
Ez a fordító verzión múlik, hogy hogyan fordít....
Avatar
szovhoz
Bitfaragó
Hozzászólások: 608
Csatlakozott: 2007. április 7. szombat, 6:00

Hozzászólás Szerző: szovhoz »

ezt simán támogatja

Kód: Egész kijelölése

If A = Amin Or A = Aledsor1 Or A = Aledsor2 Or A = Aledsor3 Or A = Aledsor4 Or A = Aledsor5 Or A = Aledsor6 Or A = Aledsor7 Or A = Aledsor8 Or A = Aledsor9 Or A = Amax Then
Avatar
Robert
Elektronbűvölő
Hozzászólások: 10213
Csatlakozott: 2005. december 9. péntek, 7:00

Hozzászólás Szerző: Robert »

Maradjunk annyiban, hogy NEM javasolt....
Logikai kapcsolatok halmozása ugynaez az eset...

"Bascomban az IF után nem támogatott/dokumentált a többszörös logikai feltétel! "

Bár ha verzióváltásnál, frissítésnél nem akarsz fejreállni, akkor ne tedd!
Avatar
szovhoz
Bitfaragó
Hozzászólások: 608
Csatlakozott: 2007. április 7. szombat, 6:00

Hozzászólás Szerző: szovhoz »

akkor mondjuk egy ilyen összetett vagy feltételt hogyn programozol le?
Avatar
Robert
Elektronbűvölő
Hozzászólások: 10213
Csatlakozott: 2005. december 9. péntek, 7:00

Hozzászólás Szerző: Robert »

Kód: Egész kijelölése

If feltelel1 then gosub mittegyek
if feltetel2 then gosub mittegyek


.
.
.
.
end

mittegyek:
utasitasok
return
Válasz küldése